[Home] [Help]
1367: --
1368: -- bulk performance
1369: --
1370: l_balance_type_code VARCHAR2(1);
1371: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
1372: l_log_module VARCHAR2(240);
1373:
1374: --
1375: -- Upgrade strategy
1457: ') = 'S'
1458: THEN
1459:
1460: --
1461: XLA_AE_LINES_PKG.SetNewLine;
1462:
1463: p_balance_type_code := l_balance_type_code;
1464: -- set the flag so later we will know whether the gain loss line needs to be created
1465:
1469:
1470: --
1471: -- bulk performance
1472: --
1473: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
1474: p_header_num => 0); -- 4262811
1475: --
1476: -- set accounting line options
1477: --
1474: p_header_num => 0); -- 4262811
1475: --
1476: -- set accounting line options
1477: --
1478: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
1479: p_natural_side_code => 'D'
1480: , p_gain_or_loss_flag => 'N'
1481: , p_gl_transfer_mode_code => 'S'
1482: , p_acct_entry_type_code => 'E'
1488: --
1489: --
1490: -- set accounting line type info
1491: --
1492: xla_ae_lines_pkg.SetAcctLineType
1493: (p_component_type => l_component_type
1494: ,p_event_type_code => l_event_type_code
1495: ,p_line_definition_owner_code => l_line_definition_owner_code
1496: ,p_line_definition_code => l_line_definition_code
1502: ,p_event_class_code => l_event_class_code);
1503: --
1504: -- set accounting class
1505: --
1506: xla_ae_lines_pkg.SetAcctClass(
1507: p_accounting_class_code => 'PO_PA_BURDENED'
1508: , p_ae_header_id => l_ae_header_id
1509: );
1510:
1510:
1511: --
1512: -- set rounding class
1513: --
1514: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
1515: 'PO_PA_BURDENED';
1516:
1517: --
1518: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
1514: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
1515: 'PO_PA_BURDENED';
1516:
1517: --
1518: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
1519: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
1520: --
1521: -- bulk performance
1522: --
1515: 'PO_PA_BURDENED';
1516:
1517: --
1518: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
1519: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
1520: --
1521: -- bulk performance
1522: --
1523: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
1519: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
1520: --
1521: -- bulk performance
1522: --
1523: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
1524:
1525: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
1526: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
1527:
1521: -- bulk performance
1522: --
1523: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
1524:
1525: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
1526: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
1527:
1528: -- 4955764
1529: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
1525: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
1526: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
1527:
1528: -- 4955764
1529: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
1530: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
1531:
1532: -- 4458381 Public Sector Enh
1533:
1607: l_rec_acct_attrs.array_num_value(34) := p_source_39;
1608: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
1609: l_rec_acct_attrs.array_num_value(35) := p_source_40;
1610:
1611: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
1612: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
1613:
1614: ---------------------------------------------------------------------------------------------------------------
1615: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1608: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
1609: l_rec_acct_attrs.array_num_value(35) := p_source_40;
1610:
1611: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
1612: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
1613:
1614: ---------------------------------------------------------------------------------------------------------------
1615: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1616: ---------------------------------------------------------------------------------------------------------------
1611: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
1612: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
1613:
1614: ---------------------------------------------------------------------------------------------------------------
1615: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1616: ---------------------------------------------------------------------------------------------------------------
1617: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
1618:
1619: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1613:
1614: ---------------------------------------------------------------------------------------------------------------
1615: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1616: ---------------------------------------------------------------------------------------------------------------
1617: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
1618:
1619: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1620: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1621:
1615: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1616: ---------------------------------------------------------------------------------------------------------------
1617: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
1618:
1619: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1620: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1621:
1622: IF xla_accounting_cache_pkg.GetValueChar
1623: (p_source_code => 'LEDGER_CATEGORY_CODE'
1616: ---------------------------------------------------------------------------------------------------------------
1617: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
1618:
1619: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1620: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1621:
1622: IF xla_accounting_cache_pkg.GetValueChar
1623: (p_source_code => 'LEDGER_CATEGORY_CODE'
1624: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
1627: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
1628: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
1629: )
1630: THEN
1631: xla_ae_lines_pkg.BflowUpgEntry
1632: (p_business_method_code => l_bflow_method_code
1633: ,p_business_class_code => l_bflow_class_code
1634: ,p_balance_type => l_balance_type_code);
1635: ELSE
1633: ,p_business_class_code => l_bflow_class_code
1634: ,p_balance_type => l_balance_type_code);
1635: ELSE
1636: NULL;
1637: XLA_AE_LINES_PKG.business_flow_validation(
1638: p_business_method_code => l_bflow_method_code
1639: ,p_business_class_code => l_bflow_class_code
1640: ,p_inherit_description_flag => l_inherit_desc_flag);
1641: END IF;
1647: --
1648: -- call description
1649: --
1650:
1651: xla_ae_lines_pkg.SetLineDescription(
1652: p_ae_header_id => l_ae_header_id
1653: ,p_description => Description_2 (
1654: p_application_id => p_application_id
1655: , p_ae_header_id => l_ae_header_id
1693: xla_accounting_err_pkg.build_message
1694: (p_appli_s_name => 'XLA'
1695: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
1696: ,p_token_1 => 'LINE_NUMBER'
1697: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
1698: ,p_token_2 => 'LINE_TYPE_NAME'
1699: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
1700: l_component_type
1701: ,l_component_code
1729: --
1730: --
1731: ------------------------------------------------------------------------------------------------
1732: -- 4219869 Business Flow
1733: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
1734: -- Prior Entry. Currently, the following code is always generated.
1735: ------------------------------------------------------------------------------------------------
1736: -- No ValidateCurrentLine for business flow method of Prior Entry
1737:
1738: ------------------------------------------------------------------------------------
1739: -- 4219869 Business Flow
1740: -- Populated credit and debit amounts -- Need to generate this within IF
1741: ------------------------------------------------------------------------------------
1742: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
1743:
1744: ----------------------------------------------------------------------------------
1745: -- 4219869 Business Flow
1746: -- Update journal entry status -- Need to generate this within IF
1770: -- To allow MPA report to determine if it should generate report process
1771: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
1772: ------------------------------------------------------------------------------------------
1773:
1774: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
1775: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
1776:
1777: --
1778: -- Update the line information that should be overwritten
1771: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
1772: ------------------------------------------------------------------------------------------
1773:
1774: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
1775: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
1776:
1777: --
1778: -- Update the line information that should be overwritten
1779: --
1776:
1777: --
1778: -- Update the line information that should be overwritten
1779: --
1780: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
1781: p_header_num => 1);
1782: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
1783:
1784: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
1778: -- Update the line information that should be overwritten
1779: --
1780: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
1781: p_header_num => 1);
1782: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
1783:
1784: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
1785:
1786: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
1780: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
1781: p_header_num => 1);
1782: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
1783:
1784: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
1785:
1786: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
1787: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
1788: END IF;
1783:
1784: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
1785:
1786: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
1787: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
1788: END IF;
1789:
1790: --
1791: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
1790: --
1791: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
1792: --
1793: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
1794: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
1795: ELSE
1796: ---------------------------------------------------------------------------------------------------
1797: -- 4262811a Switch Sign
1798: ---------------------------------------------------------------------------------------------------
1795: ELSE
1796: ---------------------------------------------------------------------------------------------------
1797: -- 4262811a Switch Sign
1798: ---------------------------------------------------------------------------------------------------
1799: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
1800: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1801: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1802: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1803: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1796: ---------------------------------------------------------------------------------------------------
1797: -- 4262811a Switch Sign
1798: ---------------------------------------------------------------------------------------------------
1799: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
1800: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1801: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1802: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1803: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1804: -- 5132302
1797: -- 4262811a Switch Sign
1798: ---------------------------------------------------------------------------------------------------
1799: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
1800: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1801: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1802: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1803: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1804: -- 5132302
1805: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
1798: ---------------------------------------------------------------------------------------------------
1799: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
1800: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1801: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1802: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1803: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1804: -- 5132302
1805: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
1806: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1799: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
1800: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1801: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1802: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1803: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1804: -- 5132302
1805: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
1806: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1807:
1801: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1802: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1803: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1804: -- 5132302
1805: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
1806: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1807:
1808: END IF;
1809:
1802: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1803: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1804: -- 5132302
1805: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
1806: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1807:
1808: END IF;
1809:
1810: -- 4955764
1807:
1808: END IF;
1809:
1810: -- 4955764
1811: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
1812: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
1813:
1814:
1815: XLA_AE_LINES_PKG.ValidateCurrentLine;
1811: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
1812: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
1813:
1814:
1815: XLA_AE_LINES_PKG.ValidateCurrentLine;
1816: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
1817:
1818: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
1819: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
1812: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
1813:
1814:
1815: XLA_AE_LINES_PKG.ValidateCurrentLine;
1816: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
1817:
1818: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
1819: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
1820: ,p_balance_type_code => l_balance_type_code);
1990: --
1991: -- bulk performance
1992: --
1993: l_balance_type_code VARCHAR2(1);
1994: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
1995: l_log_module VARCHAR2(240);
1996:
1997: --
1998: -- Upgrade strategy
2080: ') = 'S'
2081: THEN
2082:
2083: --
2084: XLA_AE_LINES_PKG.SetNewLine;
2085:
2086: p_balance_type_code := l_balance_type_code;
2087: -- set the flag so later we will know whether the gain loss line needs to be created
2088:
2092:
2093: --
2094: -- bulk performance
2095: --
2096: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
2097: p_header_num => 0); -- 4262811
2098: --
2099: -- set accounting line options
2100: --
2097: p_header_num => 0); -- 4262811
2098: --
2099: -- set accounting line options
2100: --
2101: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
2102: p_natural_side_code => 'D'
2103: , p_gain_or_loss_flag => 'N'
2104: , p_gl_transfer_mode_code => 'S'
2105: , p_acct_entry_type_code => 'E'
2111: --
2112: --
2113: -- set accounting line type info
2114: --
2115: xla_ae_lines_pkg.SetAcctLineType
2116: (p_component_type => l_component_type
2117: ,p_event_type_code => l_event_type_code
2118: ,p_line_definition_owner_code => l_line_definition_owner_code
2119: ,p_line_definition_code => l_line_definition_code
2125: ,p_event_class_code => l_event_class_code);
2126: --
2127: -- set accounting class
2128: --
2129: xla_ae_lines_pkg.SetAcctClass(
2130: p_accounting_class_code => 'PO_PA_BURDENED'
2131: , p_ae_header_id => l_ae_header_id
2132: );
2133:
2133:
2134: --
2135: -- set rounding class
2136: --
2137: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
2138: 'PO_PA_BURDENED';
2139:
2140: --
2141: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
2137: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
2138: 'PO_PA_BURDENED';
2139:
2140: --
2141: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
2142: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
2143: --
2144: -- bulk performance
2145: --
2138: 'PO_PA_BURDENED';
2139:
2140: --
2141: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
2142: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
2143: --
2144: -- bulk performance
2145: --
2146: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
2142: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
2143: --
2144: -- bulk performance
2145: --
2146: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
2147:
2148: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
2149: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
2150:
2144: -- bulk performance
2145: --
2146: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
2147:
2148: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
2149: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
2150:
2151: -- 4955764
2152: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
2148: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
2149: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
2150:
2151: -- 4955764
2152: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
2153: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
2154:
2155: -- 4458381 Public Sector Enh
2156:
2228: l_rec_acct_attrs.array_num_value(33) := p_source_39;
2229: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
2230: l_rec_acct_attrs.array_num_value(34) := p_source_40;
2231:
2232: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
2233: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
2234:
2235: ---------------------------------------------------------------------------------------------------------------
2236: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2229: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
2230: l_rec_acct_attrs.array_num_value(34) := p_source_40;
2231:
2232: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
2233: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
2234:
2235: ---------------------------------------------------------------------------------------------------------------
2236: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2237: ---------------------------------------------------------------------------------------------------------------
2232: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
2233: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
2234:
2235: ---------------------------------------------------------------------------------------------------------------
2236: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2237: ---------------------------------------------------------------------------------------------------------------
2238: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
2239:
2240: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2234:
2235: ---------------------------------------------------------------------------------------------------------------
2236: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2237: ---------------------------------------------------------------------------------------------------------------
2238: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
2239:
2240: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2241: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2242:
2236: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2237: ---------------------------------------------------------------------------------------------------------------
2238: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
2239:
2240: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2241: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2242:
2243: IF xla_accounting_cache_pkg.GetValueChar
2244: (p_source_code => 'LEDGER_CATEGORY_CODE'
2237: ---------------------------------------------------------------------------------------------------------------
2238: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
2239:
2240: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2241: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2242:
2243: IF xla_accounting_cache_pkg.GetValueChar
2244: (p_source_code => 'LEDGER_CATEGORY_CODE'
2245: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
2248: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
2249: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
2250: )
2251: THEN
2252: xla_ae_lines_pkg.BflowUpgEntry
2253: (p_business_method_code => l_bflow_method_code
2254: ,p_business_class_code => l_bflow_class_code
2255: ,p_balance_type => l_balance_type_code);
2256: ELSE
2254: ,p_business_class_code => l_bflow_class_code
2255: ,p_balance_type => l_balance_type_code);
2256: ELSE
2257: NULL;
2258: XLA_AE_LINES_PKG.business_flow_validation(
2259: p_business_method_code => l_bflow_method_code
2260: ,p_business_class_code => l_bflow_class_code
2261: ,p_inherit_description_flag => l_inherit_desc_flag);
2262: END IF;
2268: --
2269: -- call description
2270: --
2271:
2272: xla_ae_lines_pkg.SetLineDescription(
2273: p_ae_header_id => l_ae_header_id
2274: ,p_description => Description_2 (
2275: p_application_id => p_application_id
2276: , p_ae_header_id => l_ae_header_id
2314: xla_accounting_err_pkg.build_message
2315: (p_appli_s_name => 'XLA'
2316: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
2317: ,p_token_1 => 'LINE_NUMBER'
2318: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
2319: ,p_token_2 => 'LINE_TYPE_NAME'
2320: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
2321: l_component_type
2322: ,l_component_code
2350: --
2351: --
2352: ------------------------------------------------------------------------------------------------
2353: -- 4219869 Business Flow
2354: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
2355: -- Prior Entry. Currently, the following code is always generated.
2356: ------------------------------------------------------------------------------------------------
2357: -- No ValidateCurrentLine for business flow method of Prior Entry
2358:
2359: ------------------------------------------------------------------------------------
2360: -- 4219869 Business Flow
2361: -- Populated credit and debit amounts -- Need to generate this within IF
2362: ------------------------------------------------------------------------------------
2363: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
2364:
2365: ----------------------------------------------------------------------------------
2366: -- 4219869 Business Flow
2367: -- Update journal entry status -- Need to generate this within IF
2391: -- To allow MPA report to determine if it should generate report process
2392: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
2393: ------------------------------------------------------------------------------------------
2394:
2395: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
2396: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
2397:
2398: --
2399: -- Update the line information that should be overwritten
2392: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
2393: ------------------------------------------------------------------------------------------
2394:
2395: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
2396: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
2397:
2398: --
2399: -- Update the line information that should be overwritten
2400: --
2397:
2398: --
2399: -- Update the line information that should be overwritten
2400: --
2401: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
2402: p_header_num => 1);
2403: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
2404:
2405: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
2399: -- Update the line information that should be overwritten
2400: --
2401: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
2402: p_header_num => 1);
2403: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
2404:
2405: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
2406:
2407: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
2401: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
2402: p_header_num => 1);
2403: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
2404:
2405: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
2406:
2407: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
2408: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
2409: END IF;
2404:
2405: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
2406:
2407: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
2408: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
2409: END IF;
2410:
2411: --
2412: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
2411: --
2412: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
2413: --
2414: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
2415: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
2416: ELSE
2417: ---------------------------------------------------------------------------------------------------
2418: -- 4262811a Switch Sign
2419: ---------------------------------------------------------------------------------------------------
2416: ELSE
2417: ---------------------------------------------------------------------------------------------------
2418: -- 4262811a Switch Sign
2419: ---------------------------------------------------------------------------------------------------
2420: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2421: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2422: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2423: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2424: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2417: ---------------------------------------------------------------------------------------------------
2418: -- 4262811a Switch Sign
2419: ---------------------------------------------------------------------------------------------------
2420: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2421: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2422: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2423: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2424: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2425: -- 5132302
2418: -- 4262811a Switch Sign
2419: ---------------------------------------------------------------------------------------------------
2420: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2421: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2422: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2423: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2424: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2425: -- 5132302
2426: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2419: ---------------------------------------------------------------------------------------------------
2420: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2421: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2422: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2423: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2424: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2425: -- 5132302
2426: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2427: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2420: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2421: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2422: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2423: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2424: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2425: -- 5132302
2426: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2427: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2428:
2422: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2423: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2424: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2425: -- 5132302
2426: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2427: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2428:
2429: END IF;
2430:
2423: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2424: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2425: -- 5132302
2426: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2427: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2428:
2429: END IF;
2430:
2431: -- 4955764
2428:
2429: END IF;
2430:
2431: -- 4955764
2432: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
2433: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
2434:
2435:
2436: XLA_AE_LINES_PKG.ValidateCurrentLine;
2432: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
2433: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
2434:
2435:
2436: XLA_AE_LINES_PKG.ValidateCurrentLine;
2437: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
2438:
2439: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
2440: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
2433: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
2434:
2435:
2436: XLA_AE_LINES_PKG.ValidateCurrentLine;
2437: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
2438:
2439: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
2440: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
2441: ,p_balance_type_code => l_balance_type_code);
2611: --
2612: -- bulk performance
2613: --
2614: l_balance_type_code VARCHAR2(1);
2615: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
2616: l_log_module VARCHAR2(240);
2617:
2618: --
2619: -- Upgrade strategy
2692: ') = 'S'
2693: THEN
2694:
2695: --
2696: XLA_AE_LINES_PKG.SetNewLine;
2697:
2698: p_balance_type_code := l_balance_type_code;
2699: -- set the flag so later we will know whether the gain loss line needs to be created
2700:
2704:
2705: --
2706: -- bulk performance
2707: --
2708: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
2709: p_header_num => 0); -- 4262811
2710: --
2711: -- set accounting line options
2712: --
2709: p_header_num => 0); -- 4262811
2710: --
2711: -- set accounting line options
2712: --
2713: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
2714: p_natural_side_code => 'D'
2715: , p_gain_or_loss_flag => 'N'
2716: , p_gl_transfer_mode_code => 'S'
2717: , p_acct_entry_type_code => 'E'
2723: --
2724: --
2725: -- set accounting line type info
2726: --
2727: xla_ae_lines_pkg.SetAcctLineType
2728: (p_component_type => l_component_type
2729: ,p_event_type_code => l_event_type_code
2730: ,p_line_definition_owner_code => l_line_definition_owner_code
2731: ,p_line_definition_code => l_line_definition_code
2737: ,p_event_class_code => l_event_class_code);
2738: --
2739: -- set accounting class
2740: --
2741: xla_ae_lines_pkg.SetAcctClass(
2742: p_accounting_class_code => 'REQ_PA_BURDENED'
2743: , p_ae_header_id => l_ae_header_id
2744: );
2745:
2745:
2746: --
2747: -- set rounding class
2748: --
2749: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
2750: 'REQ_PA_BURDENED';
2751:
2752: --
2753: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
2749: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
2750: 'REQ_PA_BURDENED';
2751:
2752: --
2753: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
2754: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
2755: --
2756: -- bulk performance
2757: --
2750: 'REQ_PA_BURDENED';
2751:
2752: --
2753: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
2754: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
2755: --
2756: -- bulk performance
2757: --
2758: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
2754: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
2755: --
2756: -- bulk performance
2757: --
2758: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
2759:
2760: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
2761: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
2762:
2756: -- bulk performance
2757: --
2758: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
2759:
2760: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
2761: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
2762:
2763: -- 4955764
2764: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
2760: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
2761: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
2762:
2763: -- 4955764
2764: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
2765: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
2766:
2767: -- 4458381 Public Sector Enh
2768:
2842: l_rec_acct_attrs.array_num_value(34) := p_source_39;
2843: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
2844: l_rec_acct_attrs.array_num_value(35) := p_source_40;
2845:
2846: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
2847: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
2848:
2849: ---------------------------------------------------------------------------------------------------------------
2850: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2843: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
2844: l_rec_acct_attrs.array_num_value(35) := p_source_40;
2845:
2846: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
2847: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
2848:
2849: ---------------------------------------------------------------------------------------------------------------
2850: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2851: ---------------------------------------------------------------------------------------------------------------
2846: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
2847: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
2848:
2849: ---------------------------------------------------------------------------------------------------------------
2850: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2851: ---------------------------------------------------------------------------------------------------------------
2852: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
2853:
2854: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2848:
2849: ---------------------------------------------------------------------------------------------------------------
2850: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2851: ---------------------------------------------------------------------------------------------------------------
2852: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
2853:
2854: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2855: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2856:
2850: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2851: ---------------------------------------------------------------------------------------------------------------
2852: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
2853:
2854: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2855: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2856:
2857: IF xla_accounting_cache_pkg.GetValueChar
2858: (p_source_code => 'LEDGER_CATEGORY_CODE'
2851: ---------------------------------------------------------------------------------------------------------------
2852: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
2853:
2854: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2855: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2856:
2857: IF xla_accounting_cache_pkg.GetValueChar
2858: (p_source_code => 'LEDGER_CATEGORY_CODE'
2859: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
2862: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
2863: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
2864: )
2865: THEN
2866: xla_ae_lines_pkg.BflowUpgEntry
2867: (p_business_method_code => l_bflow_method_code
2868: ,p_business_class_code => l_bflow_class_code
2869: ,p_balance_type => l_balance_type_code);
2870: ELSE
2868: ,p_business_class_code => l_bflow_class_code
2869: ,p_balance_type => l_balance_type_code);
2870: ELSE
2871: NULL;
2872: XLA_AE_LINES_PKG.business_flow_validation(
2873: p_business_method_code => l_bflow_method_code
2874: ,p_business_class_code => l_bflow_class_code
2875: ,p_inherit_description_flag => l_inherit_desc_flag);
2876: END IF;
2882: --
2883: -- call description
2884: --
2885:
2886: xla_ae_lines_pkg.SetLineDescription(
2887: p_ae_header_id => l_ae_header_id
2888: ,p_description => Description_2 (
2889: p_application_id => p_application_id
2890: , p_ae_header_id => l_ae_header_id
2928: xla_accounting_err_pkg.build_message
2929: (p_appli_s_name => 'XLA'
2930: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
2931: ,p_token_1 => 'LINE_NUMBER'
2932: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
2933: ,p_token_2 => 'LINE_TYPE_NAME'
2934: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
2935: l_component_type
2936: ,l_component_code
2964: --
2965: --
2966: ------------------------------------------------------------------------------------------------
2967: -- 4219869 Business Flow
2968: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
2969: -- Prior Entry. Currently, the following code is always generated.
2970: ------------------------------------------------------------------------------------------------
2971: -- No ValidateCurrentLine for business flow method of Prior Entry
2972:
2973: ------------------------------------------------------------------------------------
2974: -- 4219869 Business Flow
2975: -- Populated credit and debit amounts -- Need to generate this within IF
2976: ------------------------------------------------------------------------------------
2977: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
2978:
2979: ----------------------------------------------------------------------------------
2980: -- 4219869 Business Flow
2981: -- Update journal entry status -- Need to generate this within IF
3005: -- To allow MPA report to determine if it should generate report process
3006: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
3007: ------------------------------------------------------------------------------------------
3008:
3009: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
3010: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
3011:
3012: --
3013: -- Update the line information that should be overwritten
3006: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
3007: ------------------------------------------------------------------------------------------
3008:
3009: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
3010: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
3011:
3012: --
3013: -- Update the line information that should be overwritten
3014: --
3011:
3012: --
3013: -- Update the line information that should be overwritten
3014: --
3015: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
3016: p_header_num => 1);
3017: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
3018:
3019: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
3013: -- Update the line information that should be overwritten
3014: --
3015: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
3016: p_header_num => 1);
3017: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
3018:
3019: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
3020:
3021: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
3015: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
3016: p_header_num => 1);
3017: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
3018:
3019: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
3020:
3021: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
3022: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
3023: END IF;
3018:
3019: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
3020:
3021: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
3022: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
3023: END IF;
3024:
3025: --
3026: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
3025: --
3026: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
3027: --
3028: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
3029: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
3030: ELSE
3031: ---------------------------------------------------------------------------------------------------
3032: -- 4262811a Switch Sign
3033: ---------------------------------------------------------------------------------------------------
3030: ELSE
3031: ---------------------------------------------------------------------------------------------------
3032: -- 4262811a Switch Sign
3033: ---------------------------------------------------------------------------------------------------
3034: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3035: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3036: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3037: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3038: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3031: ---------------------------------------------------------------------------------------------------
3032: -- 4262811a Switch Sign
3033: ---------------------------------------------------------------------------------------------------
3034: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3035: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3036: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3037: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3038: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3039: -- 5132302
3032: -- 4262811a Switch Sign
3033: ---------------------------------------------------------------------------------------------------
3034: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3035: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3036: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3037: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3038: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3039: -- 5132302
3040: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3033: ---------------------------------------------------------------------------------------------------
3034: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3035: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3036: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3037: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3038: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3039: -- 5132302
3040: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3041: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3034: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3035: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3036: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3037: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3038: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3039: -- 5132302
3040: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3041: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3042:
3036: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3037: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3038: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3039: -- 5132302
3040: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3041: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3042:
3043: END IF;
3044:
3037: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3038: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3039: -- 5132302
3040: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3041: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3042:
3043: END IF;
3044:
3045: -- 4955764
3042:
3043: END IF;
3044:
3045: -- 4955764
3046: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
3047: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
3048:
3049:
3050: XLA_AE_LINES_PKG.ValidateCurrentLine;
3046: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
3047: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
3048:
3049:
3050: XLA_AE_LINES_PKG.ValidateCurrentLine;
3051: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
3052:
3053: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
3054: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
3047: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
3048:
3049:
3050: XLA_AE_LINES_PKG.ValidateCurrentLine;
3051: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
3052:
3053: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
3054: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
3055: ,p_balance_type_code => l_balance_type_code);
3227: --
3228: -- bulk performance
3229: --
3230: l_balance_type_code VARCHAR2(1);
3231: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
3232: l_log_module VARCHAR2(240);
3233:
3234: --
3235: -- Upgrade strategy
3315: ') = 'D'
3316: THEN
3317:
3318: --
3319: XLA_AE_LINES_PKG.SetNewLine;
3320:
3321: p_balance_type_code := l_balance_type_code;
3322: -- set the flag so later we will know whether the gain loss line needs to be created
3323:
3327:
3328: --
3329: -- bulk performance
3330: --
3331: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
3332: p_header_num => 0); -- 4262811
3333: --
3334: -- set accounting line options
3335: --
3332: p_header_num => 0); -- 4262811
3333: --
3334: -- set accounting line options
3335: --
3336: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
3337: p_natural_side_code => 'D'
3338: , p_gain_or_loss_flag => 'N'
3339: , p_gl_transfer_mode_code => 'S'
3340: , p_acct_entry_type_code => 'E'
3346: --
3347: --
3348: -- set accounting line type info
3349: --
3350: xla_ae_lines_pkg.SetAcctLineType
3351: (p_component_type => l_component_type
3352: ,p_event_type_code => l_event_type_code
3353: ,p_line_definition_owner_code => l_line_definition_owner_code
3354: ,p_line_definition_code => l_line_definition_code
3360: ,p_event_class_code => l_event_class_code);
3361: --
3362: -- set accounting class
3363: --
3364: xla_ae_lines_pkg.SetAcctClass(
3365: p_accounting_class_code => 'PO_PA_BURDEN'
3366: , p_ae_header_id => l_ae_header_id
3367: );
3368:
3368:
3369: --
3370: -- set rounding class
3371: --
3372: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
3373: 'PO_PA_BURDEN';
3374:
3375: --
3376: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
3372: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
3373: 'PO_PA_BURDEN';
3374:
3375: --
3376: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
3377: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
3378: --
3379: -- bulk performance
3380: --
3373: 'PO_PA_BURDEN';
3374:
3375: --
3376: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
3377: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
3378: --
3379: -- bulk performance
3380: --
3381: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
3377: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
3378: --
3379: -- bulk performance
3380: --
3381: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
3382:
3383: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
3384: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
3385:
3379: -- bulk performance
3380: --
3381: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
3382:
3383: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
3384: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
3385:
3386: -- 4955764
3387: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
3383: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
3384: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
3385:
3386: -- 4955764
3387: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
3388: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
3389:
3390: -- 4458381 Public Sector Enh
3391:
3465: l_rec_acct_attrs.array_num_value(34) := p_source_39;
3466: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
3467: l_rec_acct_attrs.array_num_value(35) := p_source_40;
3468:
3469: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
3470: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
3471:
3472: ---------------------------------------------------------------------------------------------------------------
3473: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3466: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
3467: l_rec_acct_attrs.array_num_value(35) := p_source_40;
3468:
3469: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
3470: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
3471:
3472: ---------------------------------------------------------------------------------------------------------------
3473: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3474: ---------------------------------------------------------------------------------------------------------------
3469: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
3470: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
3471:
3472: ---------------------------------------------------------------------------------------------------------------
3473: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3474: ---------------------------------------------------------------------------------------------------------------
3475: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
3476:
3477: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3471:
3472: ---------------------------------------------------------------------------------------------------------------
3473: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3474: ---------------------------------------------------------------------------------------------------------------
3475: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
3476:
3477: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3478: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3479:
3473: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3474: ---------------------------------------------------------------------------------------------------------------
3475: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
3476:
3477: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3478: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3479:
3480: IF xla_accounting_cache_pkg.GetValueChar
3481: (p_source_code => 'LEDGER_CATEGORY_CODE'
3474: ---------------------------------------------------------------------------------------------------------------
3475: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
3476:
3477: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3478: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3479:
3480: IF xla_accounting_cache_pkg.GetValueChar
3481: (p_source_code => 'LEDGER_CATEGORY_CODE'
3482: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
3485: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
3486: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
3487: )
3488: THEN
3489: xla_ae_lines_pkg.BflowUpgEntry
3490: (p_business_method_code => l_bflow_method_code
3491: ,p_business_class_code => l_bflow_class_code
3492: ,p_balance_type => l_balance_type_code);
3493: ELSE
3491: ,p_business_class_code => l_bflow_class_code
3492: ,p_balance_type => l_balance_type_code);
3493: ELSE
3494: NULL;
3495: XLA_AE_LINES_PKG.business_flow_validation(
3496: p_business_method_code => l_bflow_method_code
3497: ,p_business_class_code => l_bflow_class_code
3498: ,p_inherit_description_flag => l_inherit_desc_flag);
3499: END IF;
3505: --
3506: -- call description
3507: --
3508:
3509: xla_ae_lines_pkg.SetLineDescription(
3510: p_ae_header_id => l_ae_header_id
3511: ,p_description => Description_2 (
3512: p_application_id => p_application_id
3513: , p_ae_header_id => l_ae_header_id
3551: xla_accounting_err_pkg.build_message
3552: (p_appli_s_name => 'XLA'
3553: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
3554: ,p_token_1 => 'LINE_NUMBER'
3555: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
3556: ,p_token_2 => 'LINE_TYPE_NAME'
3557: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
3558: l_component_type
3559: ,l_component_code
3587: --
3588: --
3589: ------------------------------------------------------------------------------------------------
3590: -- 4219869 Business Flow
3591: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
3592: -- Prior Entry. Currently, the following code is always generated.
3593: ------------------------------------------------------------------------------------------------
3594: -- No ValidateCurrentLine for business flow method of Prior Entry
3595:
3596: ------------------------------------------------------------------------------------
3597: -- 4219869 Business Flow
3598: -- Populated credit and debit amounts -- Need to generate this within IF
3599: ------------------------------------------------------------------------------------
3600: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
3601:
3602: ----------------------------------------------------------------------------------
3603: -- 4219869 Business Flow
3604: -- Update journal entry status -- Need to generate this within IF
3628: -- To allow MPA report to determine if it should generate report process
3629: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
3630: ------------------------------------------------------------------------------------------
3631:
3632: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
3633: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
3634:
3635: --
3636: -- Update the line information that should be overwritten
3629: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
3630: ------------------------------------------------------------------------------------------
3631:
3632: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
3633: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
3634:
3635: --
3636: -- Update the line information that should be overwritten
3637: --
3634:
3635: --
3636: -- Update the line information that should be overwritten
3637: --
3638: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
3639: p_header_num => 1);
3640: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
3641:
3642: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
3636: -- Update the line information that should be overwritten
3637: --
3638: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
3639: p_header_num => 1);
3640: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
3641:
3642: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
3643:
3644: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
3638: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
3639: p_header_num => 1);
3640: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
3641:
3642: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
3643:
3644: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
3645: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
3646: END IF;
3641:
3642: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
3643:
3644: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
3645: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
3646: END IF;
3647:
3648: --
3649: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
3648: --
3649: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
3650: --
3651: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
3652: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
3653: ELSE
3654: ---------------------------------------------------------------------------------------------------
3655: -- 4262811a Switch Sign
3656: ---------------------------------------------------------------------------------------------------
3653: ELSE
3654: ---------------------------------------------------------------------------------------------------
3655: -- 4262811a Switch Sign
3656: ---------------------------------------------------------------------------------------------------
3657: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3658: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3659: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3660: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3661: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3654: ---------------------------------------------------------------------------------------------------
3655: -- 4262811a Switch Sign
3656: ---------------------------------------------------------------------------------------------------
3657: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3658: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3659: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3660: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3661: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3662: -- 5132302
3655: -- 4262811a Switch Sign
3656: ---------------------------------------------------------------------------------------------------
3657: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3658: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3659: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3660: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3661: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3662: -- 5132302
3663: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3656: ---------------------------------------------------------------------------------------------------
3657: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3658: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3659: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3660: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3661: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3662: -- 5132302
3663: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3664: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3657: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3658: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3659: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3660: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3661: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3662: -- 5132302
3663: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3664: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3665:
3659: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3660: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3661: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3662: -- 5132302
3663: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3664: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3665:
3666: END IF;
3667:
3660: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3661: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3662: -- 5132302
3663: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3664: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3665:
3666: END IF;
3667:
3668: -- 4955764
3665:
3666: END IF;
3667:
3668: -- 4955764
3669: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
3670: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
3671:
3672:
3673: XLA_AE_LINES_PKG.ValidateCurrentLine;
3669: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
3670: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
3671:
3672:
3673: XLA_AE_LINES_PKG.ValidateCurrentLine;
3674: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
3675:
3676: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
3677: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
3670: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
3671:
3672:
3673: XLA_AE_LINES_PKG.ValidateCurrentLine;
3674: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
3675:
3676: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
3677: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
3678: ,p_balance_type_code => l_balance_type_code);
3848: --
3849: -- bulk performance
3850: --
3851: l_balance_type_code VARCHAR2(1);
3852: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
3853: l_log_module VARCHAR2(240);
3854:
3855: --
3856: -- Upgrade strategy
3936: ') = 'D'
3937: THEN
3938:
3939: --
3940: XLA_AE_LINES_PKG.SetNewLine;
3941:
3942: p_balance_type_code := l_balance_type_code;
3943: -- set the flag so later we will know whether the gain loss line needs to be created
3944:
3948:
3949: --
3950: -- bulk performance
3951: --
3952: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
3953: p_header_num => 0); -- 4262811
3954: --
3955: -- set accounting line options
3956: --
3953: p_header_num => 0); -- 4262811
3954: --
3955: -- set accounting line options
3956: --
3957: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
3958: p_natural_side_code => 'D'
3959: , p_gain_or_loss_flag => 'N'
3960: , p_gl_transfer_mode_code => 'S'
3961: , p_acct_entry_type_code => 'E'
3967: --
3968: --
3969: -- set accounting line type info
3970: --
3971: xla_ae_lines_pkg.SetAcctLineType
3972: (p_component_type => l_component_type
3973: ,p_event_type_code => l_event_type_code
3974: ,p_line_definition_owner_code => l_line_definition_owner_code
3975: ,p_line_definition_code => l_line_definition_code
3981: ,p_event_class_code => l_event_class_code);
3982: --
3983: -- set accounting class
3984: --
3985: xla_ae_lines_pkg.SetAcctClass(
3986: p_accounting_class_code => 'PO_PA_BURDEN'
3987: , p_ae_header_id => l_ae_header_id
3988: );
3989:
3989:
3990: --
3991: -- set rounding class
3992: --
3993: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
3994: 'PO_PA_BURDEN';
3995:
3996: --
3997: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
3993: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
3994: 'PO_PA_BURDEN';
3995:
3996: --
3997: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
3998: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
3999: --
4000: -- bulk performance
4001: --
3994: 'PO_PA_BURDEN';
3995:
3996: --
3997: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
3998: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
3999: --
4000: -- bulk performance
4001: --
4002: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
3998: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
3999: --
4000: -- bulk performance
4001: --
4002: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
4003:
4004: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
4005: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
4006:
4000: -- bulk performance
4001: --
4002: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
4003:
4004: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
4005: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
4006:
4007: -- 4955764
4008: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4004: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
4005: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
4006:
4007: -- 4955764
4008: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4009: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
4010:
4011: -- 4458381 Public Sector Enh
4012:
4084: l_rec_acct_attrs.array_num_value(33) := p_source_39;
4085: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
4086: l_rec_acct_attrs.array_num_value(34) := p_source_40;
4087:
4088: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4089: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4090:
4091: ---------------------------------------------------------------------------------------------------------------
4092: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4085: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
4086: l_rec_acct_attrs.array_num_value(34) := p_source_40;
4087:
4088: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4089: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4090:
4091: ---------------------------------------------------------------------------------------------------------------
4092: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4093: ---------------------------------------------------------------------------------------------------------------
4088: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4089: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4090:
4091: ---------------------------------------------------------------------------------------------------------------
4092: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4093: ---------------------------------------------------------------------------------------------------------------
4094: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4095:
4096: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4090:
4091: ---------------------------------------------------------------------------------------------------------------
4092: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4093: ---------------------------------------------------------------------------------------------------------------
4094: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4095:
4096: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4097: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4098:
4092: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4093: ---------------------------------------------------------------------------------------------------------------
4094: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4095:
4096: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4097: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4098:
4099: IF xla_accounting_cache_pkg.GetValueChar
4100: (p_source_code => 'LEDGER_CATEGORY_CODE'
4093: ---------------------------------------------------------------------------------------------------------------
4094: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4095:
4096: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4097: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4098:
4099: IF xla_accounting_cache_pkg.GetValueChar
4100: (p_source_code => 'LEDGER_CATEGORY_CODE'
4101: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
4104: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
4105: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
4106: )
4107: THEN
4108: xla_ae_lines_pkg.BflowUpgEntry
4109: (p_business_method_code => l_bflow_method_code
4110: ,p_business_class_code => l_bflow_class_code
4111: ,p_balance_type => l_balance_type_code);
4112: ELSE
4110: ,p_business_class_code => l_bflow_class_code
4111: ,p_balance_type => l_balance_type_code);
4112: ELSE
4113: NULL;
4114: XLA_AE_LINES_PKG.business_flow_validation(
4115: p_business_method_code => l_bflow_method_code
4116: ,p_business_class_code => l_bflow_class_code
4117: ,p_inherit_description_flag => l_inherit_desc_flag);
4118: END IF;
4124: --
4125: -- call description
4126: --
4127:
4128: xla_ae_lines_pkg.SetLineDescription(
4129: p_ae_header_id => l_ae_header_id
4130: ,p_description => Description_2 (
4131: p_application_id => p_application_id
4132: , p_ae_header_id => l_ae_header_id
4170: xla_accounting_err_pkg.build_message
4171: (p_appli_s_name => 'XLA'
4172: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
4173: ,p_token_1 => 'LINE_NUMBER'
4174: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
4175: ,p_token_2 => 'LINE_TYPE_NAME'
4176: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
4177: l_component_type
4178: ,l_component_code
4206: --
4207: --
4208: ------------------------------------------------------------------------------------------------
4209: -- 4219869 Business Flow
4210: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
4211: -- Prior Entry. Currently, the following code is always generated.
4212: ------------------------------------------------------------------------------------------------
4213: -- No ValidateCurrentLine for business flow method of Prior Entry
4214:
4215: ------------------------------------------------------------------------------------
4216: -- 4219869 Business Flow
4217: -- Populated credit and debit amounts -- Need to generate this within IF
4218: ------------------------------------------------------------------------------------
4219: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
4220:
4221: ----------------------------------------------------------------------------------
4222: -- 4219869 Business Flow
4223: -- Update journal entry status -- Need to generate this within IF
4247: -- To allow MPA report to determine if it should generate report process
4248: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
4249: ------------------------------------------------------------------------------------------
4250:
4251: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
4252: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
4253:
4254: --
4255: -- Update the line information that should be overwritten
4248: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
4249: ------------------------------------------------------------------------------------------
4250:
4251: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
4252: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
4253:
4254: --
4255: -- Update the line information that should be overwritten
4256: --
4253:
4254: --
4255: -- Update the line information that should be overwritten
4256: --
4257: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4258: p_header_num => 1);
4259: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4260:
4261: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4255: -- Update the line information that should be overwritten
4256: --
4257: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4258: p_header_num => 1);
4259: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4260:
4261: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4262:
4263: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4257: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4258: p_header_num => 1);
4259: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4260:
4261: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4262:
4263: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4264: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
4265: END IF;
4260:
4261: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4262:
4263: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4264: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
4265: END IF;
4266:
4267: --
4268: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
4267: --
4268: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
4269: --
4270: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
4271: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
4272: ELSE
4273: ---------------------------------------------------------------------------------------------------
4274: -- 4262811a Switch Sign
4275: ---------------------------------------------------------------------------------------------------
4272: ELSE
4273: ---------------------------------------------------------------------------------------------------
4274: -- 4262811a Switch Sign
4275: ---------------------------------------------------------------------------------------------------
4276: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4277: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4278: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4279: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4280: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4273: ---------------------------------------------------------------------------------------------------
4274: -- 4262811a Switch Sign
4275: ---------------------------------------------------------------------------------------------------
4276: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4277: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4278: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4279: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4280: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4281: -- 5132302
4274: -- 4262811a Switch Sign
4275: ---------------------------------------------------------------------------------------------------
4276: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4277: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4278: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4279: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4280: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4281: -- 5132302
4282: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4275: ---------------------------------------------------------------------------------------------------
4276: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4277: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4278: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4279: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4280: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4281: -- 5132302
4282: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4283: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4276: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4277: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4278: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4279: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4280: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4281: -- 5132302
4282: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4283: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4284:
4278: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4279: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4280: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4281: -- 5132302
4282: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4283: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4284:
4285: END IF;
4286:
4279: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4280: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4281: -- 5132302
4282: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4283: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4284:
4285: END IF;
4286:
4287: -- 4955764
4284:
4285: END IF;
4286:
4287: -- 4955764
4288: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4289: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4290:
4291:
4292: XLA_AE_LINES_PKG.ValidateCurrentLine;
4288: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4289: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4290:
4291:
4292: XLA_AE_LINES_PKG.ValidateCurrentLine;
4293: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
4294:
4295: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
4296: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
4289: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4290:
4291:
4292: XLA_AE_LINES_PKG.ValidateCurrentLine;
4293: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
4294:
4295: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
4296: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
4297: ,p_balance_type_code => l_balance_type_code);
4467: --
4468: -- bulk performance
4469: --
4470: l_balance_type_code VARCHAR2(1);
4471: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
4472: l_log_module VARCHAR2(240);
4473:
4474: --
4475: -- Upgrade strategy
4546: ') = 'D'
4547: THEN
4548:
4549: --
4550: XLA_AE_LINES_PKG.SetNewLine;
4551:
4552: p_balance_type_code := l_balance_type_code;
4553: -- set the flag so later we will know whether the gain loss line needs to be created
4554:
4558:
4559: --
4560: -- bulk performance
4561: --
4562: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
4563: p_header_num => 0); -- 4262811
4564: --
4565: -- set accounting line options
4566: --
4563: p_header_num => 0); -- 4262811
4564: --
4565: -- set accounting line options
4566: --
4567: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
4568: p_natural_side_code => 'D'
4569: , p_gain_or_loss_flag => 'N'
4570: , p_gl_transfer_mode_code => 'S'
4571: , p_acct_entry_type_code => 'E'
4577: --
4578: --
4579: -- set accounting line type info
4580: --
4581: xla_ae_lines_pkg.SetAcctLineType
4582: (p_component_type => l_component_type
4583: ,p_event_type_code => l_event_type_code
4584: ,p_line_definition_owner_code => l_line_definition_owner_code
4585: ,p_line_definition_code => l_line_definition_code
4591: ,p_event_class_code => l_event_class_code);
4592: --
4593: -- set accounting class
4594: --
4595: xla_ae_lines_pkg.SetAcctClass(
4596: p_accounting_class_code => 'REQ_PA_BURDEN'
4597: , p_ae_header_id => l_ae_header_id
4598: );
4599:
4599:
4600: --
4601: -- set rounding class
4602: --
4603: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
4604: 'REQ_PA_BURDEN';
4605:
4606: --
4607: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
4603: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
4604: 'REQ_PA_BURDEN';
4605:
4606: --
4607: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
4608: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
4609: --
4610: -- bulk performance
4611: --
4604: 'REQ_PA_BURDEN';
4605:
4606: --
4607: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
4608: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
4609: --
4610: -- bulk performance
4611: --
4612: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
4608: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
4609: --
4610: -- bulk performance
4611: --
4612: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
4613:
4614: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
4615: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
4616:
4610: -- bulk performance
4611: --
4612: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
4613:
4614: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
4615: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
4616:
4617: -- 4955764
4618: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4614: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
4615: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
4616:
4617: -- 4955764
4618: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4619: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
4620:
4621: -- 4458381 Public Sector Enh
4622:
4696: l_rec_acct_attrs.array_num_value(34) := p_source_39;
4697: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
4698: l_rec_acct_attrs.array_num_value(35) := p_source_40;
4699:
4700: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4701: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4702:
4703: ---------------------------------------------------------------------------------------------------------------
4704: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4697: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
4698: l_rec_acct_attrs.array_num_value(35) := p_source_40;
4699:
4700: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4701: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4702:
4703: ---------------------------------------------------------------------------------------------------------------
4704: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4705: ---------------------------------------------------------------------------------------------------------------
4700: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4701: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4702:
4703: ---------------------------------------------------------------------------------------------------------------
4704: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4705: ---------------------------------------------------------------------------------------------------------------
4706: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4707:
4708: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4702:
4703: ---------------------------------------------------------------------------------------------------------------
4704: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4705: ---------------------------------------------------------------------------------------------------------------
4706: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4707:
4708: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4709: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4710:
4704: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4705: ---------------------------------------------------------------------------------------------------------------
4706: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4707:
4708: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4709: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4710:
4711: IF xla_accounting_cache_pkg.GetValueChar
4712: (p_source_code => 'LEDGER_CATEGORY_CODE'
4705: ---------------------------------------------------------------------------------------------------------------
4706: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4707:
4708: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4709: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4710:
4711: IF xla_accounting_cache_pkg.GetValueChar
4712: (p_source_code => 'LEDGER_CATEGORY_CODE'
4713: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
4716: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
4717: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
4718: )
4719: THEN
4720: xla_ae_lines_pkg.BflowUpgEntry
4721: (p_business_method_code => l_bflow_method_code
4722: ,p_business_class_code => l_bflow_class_code
4723: ,p_balance_type => l_balance_type_code);
4724: ELSE
4722: ,p_business_class_code => l_bflow_class_code
4723: ,p_balance_type => l_balance_type_code);
4724: ELSE
4725: NULL;
4726: XLA_AE_LINES_PKG.business_flow_validation(
4727: p_business_method_code => l_bflow_method_code
4728: ,p_business_class_code => l_bflow_class_code
4729: ,p_inherit_description_flag => l_inherit_desc_flag);
4730: END IF;
4736: --
4737: -- call description
4738: --
4739:
4740: xla_ae_lines_pkg.SetLineDescription(
4741: p_ae_header_id => l_ae_header_id
4742: ,p_description => Description_2 (
4743: p_application_id => p_application_id
4744: , p_ae_header_id => l_ae_header_id
4782: xla_accounting_err_pkg.build_message
4783: (p_appli_s_name => 'XLA'
4784: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
4785: ,p_token_1 => 'LINE_NUMBER'
4786: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
4787: ,p_token_2 => 'LINE_TYPE_NAME'
4788: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
4789: l_component_type
4790: ,l_component_code
4818: --
4819: --
4820: ------------------------------------------------------------------------------------------------
4821: -- 4219869 Business Flow
4822: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
4823: -- Prior Entry. Currently, the following code is always generated.
4824: ------------------------------------------------------------------------------------------------
4825: -- No ValidateCurrentLine for business flow method of Prior Entry
4826:
4827: ------------------------------------------------------------------------------------
4828: -- 4219869 Business Flow
4829: -- Populated credit and debit amounts -- Need to generate this within IF
4830: ------------------------------------------------------------------------------------
4831: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
4832:
4833: ----------------------------------------------------------------------------------
4834: -- 4219869 Business Flow
4835: -- Update journal entry status -- Need to generate this within IF
4859: -- To allow MPA report to determine if it should generate report process
4860: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
4861: ------------------------------------------------------------------------------------------
4862:
4863: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
4864: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
4865:
4866: --
4867: -- Update the line information that should be overwritten
4860: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
4861: ------------------------------------------------------------------------------------------
4862:
4863: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
4864: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
4865:
4866: --
4867: -- Update the line information that should be overwritten
4868: --
4865:
4866: --
4867: -- Update the line information that should be overwritten
4868: --
4869: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4870: p_header_num => 1);
4871: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4872:
4873: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4867: -- Update the line information that should be overwritten
4868: --
4869: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4870: p_header_num => 1);
4871: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4872:
4873: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4874:
4875: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4869: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4870: p_header_num => 1);
4871: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4872:
4873: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4874:
4875: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4876: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
4877: END IF;
4872:
4873: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4874:
4875: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4876: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
4877: END IF;
4878:
4879: --
4880: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
4879: --
4880: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
4881: --
4882: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
4883: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
4884: ELSE
4885: ---------------------------------------------------------------------------------------------------
4886: -- 4262811a Switch Sign
4887: ---------------------------------------------------------------------------------------------------
4884: ELSE
4885: ---------------------------------------------------------------------------------------------------
4886: -- 4262811a Switch Sign
4887: ---------------------------------------------------------------------------------------------------
4888: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4889: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4890: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4891: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4892: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4885: ---------------------------------------------------------------------------------------------------
4886: -- 4262811a Switch Sign
4887: ---------------------------------------------------------------------------------------------------
4888: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4889: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4890: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4891: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4892: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4893: -- 5132302
4886: -- 4262811a Switch Sign
4887: ---------------------------------------------------------------------------------------------------
4888: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4889: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4890: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4891: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4892: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4893: -- 5132302
4894: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4887: ---------------------------------------------------------------------------------------------------
4888: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4889: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4890: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4891: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4892: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4893: -- 5132302
4894: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4895: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4888: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4889: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4890: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4891: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4892: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4893: -- 5132302
4894: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4895: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4896:
4890: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4891: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4892: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4893: -- 5132302
4894: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4895: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4896:
4897: END IF;
4898:
4891: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4892: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4893: -- 5132302
4894: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4895: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4896:
4897: END IF;
4898:
4899: -- 4955764
4896:
4897: END IF;
4898:
4899: -- 4955764
4900: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4901: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4902:
4903:
4904: XLA_AE_LINES_PKG.ValidateCurrentLine;
4900: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4901: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4902:
4903:
4904: XLA_AE_LINES_PKG.ValidateCurrentLine;
4905: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
4906:
4907: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
4908: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
4901: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4902:
4903:
4904: XLA_AE_LINES_PKG.ValidateCurrentLine;
4905: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
4906:
4907: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
4908: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
4909: ,p_balance_type_code => l_balance_type_code);
5052: --
5053: -- bulk performance
5054: --
5055: l_balance_type_code VARCHAR2(1);
5056: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
5057: l_log_module VARCHAR2(240);
5058:
5059: --
5060: -- Upgrade strategy
5134: ') = 'B_PA'
5135: THEN
5136:
5137: --
5138: XLA_AE_LINES_PKG.SetNewLine;
5139:
5140: p_balance_type_code := l_balance_type_code;
5141: -- set the flag so later we will know whether the gain loss line needs to be created
5142:
5146:
5147: --
5148: -- bulk performance
5149: --
5150: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
5151: p_header_num => 0); -- 4262811
5152: --
5153: -- set accounting line options
5154: --
5151: p_header_num => 0); -- 4262811
5152: --
5153: -- set accounting line options
5154: --
5155: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
5156: p_natural_side_code => 'C'
5157: , p_gain_or_loss_flag => 'N'
5158: , p_gl_transfer_mode_code => 'S'
5159: , p_acct_entry_type_code => 'E'
5165: --
5166: --
5167: -- set accounting line type info
5168: --
5169: xla_ae_lines_pkg.SetAcctLineType
5170: (p_component_type => l_component_type
5171: ,p_event_type_code => l_event_type_code
5172: ,p_line_definition_owner_code => l_line_definition_owner_code
5173: ,p_line_definition_code => l_line_definition_code
5179: ,p_event_class_code => l_event_class_code);
5180: --
5181: -- set accounting class
5182: --
5183: xla_ae_lines_pkg.SetAcctClass(
5184: p_accounting_class_code => 'PURCHASE_ORDER'
5185: , p_ae_header_id => l_ae_header_id
5186: );
5187:
5187:
5188: --
5189: -- set rounding class
5190: --
5191: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
5192: 'PURCHASE_ORDER';
5193:
5194: --
5195: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
5191: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
5192: 'PURCHASE_ORDER';
5193:
5194: --
5195: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
5196: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
5197: --
5198: -- bulk performance
5199: --
5192: 'PURCHASE_ORDER';
5193:
5194: --
5195: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
5196: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
5197: --
5198: -- bulk performance
5199: --
5200: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
5196: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
5197: --
5198: -- bulk performance
5199: --
5200: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
5201:
5202: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
5203: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
5204:
5198: -- bulk performance
5199: --
5200: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
5201:
5202: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
5203: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
5204:
5205: -- 4955764
5206: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5202: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
5203: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
5204:
5205: -- 4955764
5206: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5207: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
5208:
5209: -- 4458381 Public Sector Enh
5210:
5286: l_rec_acct_attrs.array_num_value(30) := p_source_61;
5287: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
5288: l_rec_acct_attrs.array_num_value(31) := p_source_61;
5289:
5290: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
5291: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
5292:
5293: ---------------------------------------------------------------------------------------------------------------
5294: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5287: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
5288: l_rec_acct_attrs.array_num_value(31) := p_source_61;
5289:
5290: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
5291: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
5292:
5293: ---------------------------------------------------------------------------------------------------------------
5294: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5295: ---------------------------------------------------------------------------------------------------------------
5290: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
5291: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
5292:
5293: ---------------------------------------------------------------------------------------------------------------
5294: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5295: ---------------------------------------------------------------------------------------------------------------
5296: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5297:
5298: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5292:
5293: ---------------------------------------------------------------------------------------------------------------
5294: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5295: ---------------------------------------------------------------------------------------------------------------
5296: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5297:
5298: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5299: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5300:
5294: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5295: ---------------------------------------------------------------------------------------------------------------
5296: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5297:
5298: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5299: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5300:
5301: IF xla_accounting_cache_pkg.GetValueChar
5302: (p_source_code => 'LEDGER_CATEGORY_CODE'
5295: ---------------------------------------------------------------------------------------------------------------
5296: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5297:
5298: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5299: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5300:
5301: IF xla_accounting_cache_pkg.GetValueChar
5302: (p_source_code => 'LEDGER_CATEGORY_CODE'
5303: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
5306: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
5307: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
5308: )
5309: THEN
5310: xla_ae_lines_pkg.BflowUpgEntry
5311: (p_business_method_code => l_bflow_method_code
5312: ,p_business_class_code => l_bflow_class_code
5313: ,p_balance_type => l_balance_type_code);
5314: ELSE
5312: ,p_business_class_code => l_bflow_class_code
5313: ,p_balance_type => l_balance_type_code);
5314: ELSE
5315: NULL;
5316: XLA_AE_LINES_PKG.business_flow_validation(
5317: p_business_method_code => l_bflow_method_code
5318: ,p_business_class_code => l_bflow_class_code
5319: ,p_inherit_description_flag => l_inherit_desc_flag);
5320: END IF;
5359: xla_accounting_err_pkg.build_message
5360: (p_appli_s_name => 'XLA'
5361: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
5362: ,p_token_1 => 'LINE_NUMBER'
5363: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
5364: ,p_token_2 => 'LINE_TYPE_NAME'
5365: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
5366: l_component_type
5367: ,l_component_code
5395: --
5396: --
5397: ------------------------------------------------------------------------------------------------
5398: -- 4219869 Business Flow
5399: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
5400: -- Prior Entry. Currently, the following code is always generated.
5401: ------------------------------------------------------------------------------------------------
5402: -- No ValidateCurrentLine for business flow method of Prior Entry
5403:
5404: ------------------------------------------------------------------------------------
5405: -- 4219869 Business Flow
5406: -- Populated credit and debit amounts -- Need to generate this within IF
5407: ------------------------------------------------------------------------------------
5408: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
5409:
5410: ----------------------------------------------------------------------------------
5411: -- 4219869 Business Flow
5412: -- Update journal entry status -- Need to generate this within IF
5436: -- To allow MPA report to determine if it should generate report process
5437: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
5438: ------------------------------------------------------------------------------------------
5439:
5440: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
5441: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
5442:
5443: --
5444: -- Update the line information that should be overwritten
5437: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
5438: ------------------------------------------------------------------------------------------
5439:
5440: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
5441: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
5442:
5443: --
5444: -- Update the line information that should be overwritten
5445: --
5442:
5443: --
5444: -- Update the line information that should be overwritten
5445: --
5446: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
5447: p_header_num => 1);
5448: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
5449:
5450: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5444: -- Update the line information that should be overwritten
5445: --
5446: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
5447: p_header_num => 1);
5448: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
5449:
5450: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5451:
5452: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
5446: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
5447: p_header_num => 1);
5448: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
5449:
5450: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5451:
5452: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
5453: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
5454: END IF;
5449:
5450: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5451:
5452: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
5453: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
5454: END IF;
5455:
5456: --
5457: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
5456: --
5457: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
5458: --
5459: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
5460: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
5461: ELSE
5462: ---------------------------------------------------------------------------------------------------
5463: -- 4262811a Switch Sign
5464: ---------------------------------------------------------------------------------------------------
5461: ELSE
5462: ---------------------------------------------------------------------------------------------------
5463: -- 4262811a Switch Sign
5464: ---------------------------------------------------------------------------------------------------
5465: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5466: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5467: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5468: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5469: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5462: ---------------------------------------------------------------------------------------------------
5463: -- 4262811a Switch Sign
5464: ---------------------------------------------------------------------------------------------------
5465: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5466: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5467: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5468: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5469: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5470: -- 5132302
5463: -- 4262811a Switch Sign
5464: ---------------------------------------------------------------------------------------------------
5465: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5466: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5467: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5468: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5469: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5470: -- 5132302
5471: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5464: ---------------------------------------------------------------------------------------------------
5465: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5466: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5467: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5468: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5469: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5470: -- 5132302
5471: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5472: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5465: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5466: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5467: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5468: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5469: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5470: -- 5132302
5471: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5472: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5473:
5467: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5468: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5469: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5470: -- 5132302
5471: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5472: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5473:
5474: END IF;
5475:
5468: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5469: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5470: -- 5132302
5471: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5472: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5473:
5474: END IF;
5475:
5476: -- 4955764
5473:
5474: END IF;
5475:
5476: -- 4955764
5477: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5478: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
5479:
5480:
5481: XLA_AE_LINES_PKG.ValidateCurrentLine;
5477: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5478: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
5479:
5480:
5481: XLA_AE_LINES_PKG.ValidateCurrentLine;
5482: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
5483:
5484: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
5485: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
5478: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
5479:
5480:
5481: XLA_AE_LINES_PKG.ValidateCurrentLine;
5482: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
5483:
5484: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
5485: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
5486: ,p_balance_type_code => l_balance_type_code);
5629: --
5630: -- bulk performance
5631: --
5632: l_balance_type_code VARCHAR2(1);
5633: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
5634: l_log_module VARCHAR2(240);
5635:
5636: --
5637: -- Upgrade strategy
5718: ') = 'B_PA'
5719: THEN
5720:
5721: --
5722: XLA_AE_LINES_PKG.SetNewLine;
5723:
5724: p_balance_type_code := l_balance_type_code;
5725: -- set the flag so later we will know whether the gain loss line needs to be created
5726:
5730:
5731: --
5732: -- bulk performance
5733: --
5734: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
5735: p_header_num => 0); -- 4262811
5736: --
5737: -- set accounting line options
5738: --
5735: p_header_num => 0); -- 4262811
5736: --
5737: -- set accounting line options
5738: --
5739: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
5740: p_natural_side_code => 'D'
5741: , p_gain_or_loss_flag => 'N'
5742: , p_gl_transfer_mode_code => 'S'
5743: , p_acct_entry_type_code => 'E'
5749: --
5750: --
5751: -- set accounting line type info
5752: --
5753: xla_ae_lines_pkg.SetAcctLineType
5754: (p_component_type => l_component_type
5755: ,p_event_type_code => l_event_type_code
5756: ,p_line_definition_owner_code => l_line_definition_owner_code
5757: ,p_line_definition_code => l_line_definition_code
5763: ,p_event_class_code => l_event_class_code);
5764: --
5765: -- set accounting class
5766: --
5767: xla_ae_lines_pkg.SetAcctClass(
5768: p_accounting_class_code => 'PURCHASE_ORDER'
5769: , p_ae_header_id => l_ae_header_id
5770: );
5771:
5771:
5772: --
5773: -- set rounding class
5774: --
5775: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
5776: 'PURCHASE_ORDER';
5777:
5778: --
5779: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
5775: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
5776: 'PURCHASE_ORDER';
5777:
5778: --
5779: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
5780: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
5781: --
5782: -- bulk performance
5783: --
5776: 'PURCHASE_ORDER';
5777:
5778: --
5779: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
5780: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
5781: --
5782: -- bulk performance
5783: --
5784: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
5780: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
5781: --
5782: -- bulk performance
5783: --
5784: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
5785:
5786: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
5787: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
5788:
5782: -- bulk performance
5783: --
5784: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
5785:
5786: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
5787: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
5788:
5789: -- 4955764
5790: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5786: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
5787: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
5788:
5789: -- 4955764
5790: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5791: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
5792:
5793: -- 4458381 Public Sector Enh
5794:
5870: l_rec_acct_attrs.array_num_value(30) := p_source_61;
5871: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
5872: l_rec_acct_attrs.array_num_value(31) := p_source_61;
5873:
5874: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
5875: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
5876:
5877: ---------------------------------------------------------------------------------------------------------------
5878: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5871: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
5872: l_rec_acct_attrs.array_num_value(31) := p_source_61;
5873:
5874: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
5875: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
5876:
5877: ---------------------------------------------------------------------------------------------------------------
5878: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5879: ---------------------------------------------------------------------------------------------------------------
5874: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
5875: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
5876:
5877: ---------------------------------------------------------------------------------------------------------------
5878: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5879: ---------------------------------------------------------------------------------------------------------------
5880: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5881:
5882: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5876:
5877: ---------------------------------------------------------------------------------------------------------------
5878: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5879: ---------------------------------------------------------------------------------------------------------------
5880: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5881:
5882: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5883: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5884:
5878: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5879: ---------------------------------------------------------------------------------------------------------------
5880: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5881:
5882: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5883: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5884:
5885: IF xla_accounting_cache_pkg.GetValueChar
5886: (p_source_code => 'LEDGER_CATEGORY_CODE'
5879: ---------------------------------------------------------------------------------------------------------------
5880: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5881:
5882: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5883: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5884:
5885: IF xla_accounting_cache_pkg.GetValueChar
5886: (p_source_code => 'LEDGER_CATEGORY_CODE'
5887: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
5890: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
5891: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
5892: )
5893: THEN
5894: xla_ae_lines_pkg.BflowUpgEntry
5895: (p_business_method_code => l_bflow_method_code
5896: ,p_business_class_code => l_bflow_class_code
5897: ,p_balance_type => l_balance_type_code);
5898: ELSE
5896: ,p_business_class_code => l_bflow_class_code
5897: ,p_balance_type => l_balance_type_code);
5898: ELSE
5899: NULL;
5900: XLA_AE_LINES_PKG.business_flow_validation(
5901: p_business_method_code => l_bflow_method_code
5902: ,p_business_class_code => l_bflow_class_code
5903: ,p_inherit_description_flag => l_inherit_desc_flag);
5904: END IF;
5943: xla_accounting_err_pkg.build_message
5944: (p_appli_s_name => 'XLA'
5945: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
5946: ,p_token_1 => 'LINE_NUMBER'
5947: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
5948: ,p_token_2 => 'LINE_TYPE_NAME'
5949: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
5950: l_component_type
5951: ,l_component_code
5979: --
5980: --
5981: ------------------------------------------------------------------------------------------------
5982: -- 4219869 Business Flow
5983: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
5984: -- Prior Entry. Currently, the following code is always generated.
5985: ------------------------------------------------------------------------------------------------
5986: -- No ValidateCurrentLine for business flow method of Prior Entry
5987:
5988: ------------------------------------------------------------------------------------
5989: -- 4219869 Business Flow
5990: -- Populated credit and debit amounts -- Need to generate this within IF
5991: ------------------------------------------------------------------------------------
5992: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
5993:
5994: ----------------------------------------------------------------------------------
5995: -- 4219869 Business Flow
5996: -- Update journal entry status -- Need to generate this within IF
6020: -- To allow MPA report to determine if it should generate report process
6021: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
6022: ------------------------------------------------------------------------------------------
6023:
6024: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
6025: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
6026:
6027: --
6028: -- Update the line information that should be overwritten
6021: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
6022: ------------------------------------------------------------------------------------------
6023:
6024: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
6025: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
6026:
6027: --
6028: -- Update the line information that should be overwritten
6029: --
6026:
6027: --
6028: -- Update the line information that should be overwritten
6029: --
6030: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
6031: p_header_num => 1);
6032: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
6033:
6034: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6028: -- Update the line information that should be overwritten
6029: --
6030: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
6031: p_header_num => 1);
6032: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
6033:
6034: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6035:
6036: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
6030: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
6031: p_header_num => 1);
6032: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
6033:
6034: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6035:
6036: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
6037: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
6038: END IF;
6033:
6034: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6035:
6036: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
6037: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
6038: END IF;
6039:
6040: --
6041: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
6040: --
6041: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
6042: --
6043: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
6044: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
6045: ELSE
6046: ---------------------------------------------------------------------------------------------------
6047: -- 4262811a Switch Sign
6048: ---------------------------------------------------------------------------------------------------
6045: ELSE
6046: ---------------------------------------------------------------------------------------------------
6047: -- 4262811a Switch Sign
6048: ---------------------------------------------------------------------------------------------------
6049: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6050: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6051: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6052: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6053: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6046: ---------------------------------------------------------------------------------------------------
6047: -- 4262811a Switch Sign
6048: ---------------------------------------------------------------------------------------------------
6049: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6050: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6051: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6052: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6053: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6054: -- 5132302
6047: -- 4262811a Switch Sign
6048: ---------------------------------------------------------------------------------------------------
6049: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6050: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6051: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6052: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6053: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6054: -- 5132302
6055: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6048: ---------------------------------------------------------------------------------------------------
6049: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6050: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6051: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6052: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6053: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6054: -- 5132302
6055: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6056: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6049: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6050: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6051: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6052: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6053: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6054: -- 5132302
6055: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6056: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6057:
6051: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6052: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6053: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6054: -- 5132302
6055: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6056: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6057:
6058: END IF;
6059:
6052: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6053: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6054: -- 5132302
6055: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6056: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6057:
6058: END IF;
6059:
6060: -- 4955764
6057:
6058: END IF;
6059:
6060: -- 4955764
6061: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6062: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
6063:
6064:
6065: XLA_AE_LINES_PKG.ValidateCurrentLine;
6061: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6062: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
6063:
6064:
6065: XLA_AE_LINES_PKG.ValidateCurrentLine;
6066: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
6067:
6068: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
6069: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
6062: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
6063:
6064:
6065: XLA_AE_LINES_PKG.ValidateCurrentLine;
6066: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
6067:
6068: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
6069: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
6070: ,p_balance_type_code => l_balance_type_code);
6221: --
6222: -- bulk performance
6223: --
6224: l_balance_type_code VARCHAR2(1);
6225: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
6226: l_log_module VARCHAR2(240);
6227:
6228: --
6229: -- Upgrade strategy
6303: ') = 'B_REQ'
6304: THEN
6305:
6306: --
6307: XLA_AE_LINES_PKG.SetNewLine;
6308:
6309: p_balance_type_code := l_balance_type_code;
6310: -- set the flag so later we will know whether the gain loss line needs to be created
6311:
6315:
6316: --
6317: -- bulk performance
6318: --
6319: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
6320: p_header_num => 0); -- 4262811
6321: --
6322: -- set accounting line options
6323: --
6320: p_header_num => 0); -- 4262811
6321: --
6322: -- set accounting line options
6323: --
6324: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
6325: p_natural_side_code => 'C'
6326: , p_gain_or_loss_flag => 'N'
6327: , p_gl_transfer_mode_code => 'S'
6328: , p_acct_entry_type_code => 'E'
6334: --
6335: --
6336: -- set accounting line type info
6337: --
6338: xla_ae_lines_pkg.SetAcctLineType
6339: (p_component_type => l_component_type
6340: ,p_event_type_code => l_event_type_code
6341: ,p_line_definition_owner_code => l_line_definition_owner_code
6342: ,p_line_definition_code => l_line_definition_code
6348: ,p_event_class_code => l_event_class_code);
6349: --
6350: -- set accounting class
6351: --
6352: xla_ae_lines_pkg.SetAcctClass(
6353: p_accounting_class_code => 'REQUISITION'
6354: , p_ae_header_id => l_ae_header_id
6355: );
6356:
6356:
6357: --
6358: -- set rounding class
6359: --
6360: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
6361: 'REQUISITION';
6362:
6363: --
6364: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6360: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
6361: 'REQUISITION';
6362:
6363: --
6364: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6365: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6366: --
6367: -- bulk performance
6368: --
6361: 'REQUISITION';
6362:
6363: --
6364: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6365: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6366: --
6367: -- bulk performance
6368: --
6369: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6365: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6366: --
6367: -- bulk performance
6368: --
6369: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6370:
6371: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6372: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
6373:
6367: -- bulk performance
6368: --
6369: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6370:
6371: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6372: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
6373:
6374: -- 4955764
6375: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6371: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6372: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
6373:
6374: -- 4955764
6375: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6376: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
6377:
6378: -- 4458381 Public Sector Enh
6379: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
6375: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6376: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
6377:
6378: -- 4458381 Public Sector Enh
6379: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
6380: --
6381: -- set accounting attributes for the line type
6382: --
6383: l_entered_amt_idx := 23;
6461: l_rec_acct_attrs.array_num_value(33) := p_source_61;
6462: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
6463: l_rec_acct_attrs.array_num_value(34) := p_source_61;
6464:
6465: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
6466: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
6467:
6468: ---------------------------------------------------------------------------------------------------------------
6469: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6462: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
6463: l_rec_acct_attrs.array_num_value(34) := p_source_61;
6464:
6465: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
6466: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
6467:
6468: ---------------------------------------------------------------------------------------------------------------
6469: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6470: ---------------------------------------------------------------------------------------------------------------
6465: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
6466: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
6467:
6468: ---------------------------------------------------------------------------------------------------------------
6469: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6470: ---------------------------------------------------------------------------------------------------------------
6471: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6472:
6473: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6467:
6468: ---------------------------------------------------------------------------------------------------------------
6469: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6470: ---------------------------------------------------------------------------------------------------------------
6471: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6472:
6473: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6474: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6475:
6469: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6470: ---------------------------------------------------------------------------------------------------------------
6471: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6472:
6473: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6474: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6475:
6476: IF xla_accounting_cache_pkg.GetValueChar
6477: (p_source_code => 'LEDGER_CATEGORY_CODE'
6470: ---------------------------------------------------------------------------------------------------------------
6471: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6472:
6473: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6474: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6475:
6476: IF xla_accounting_cache_pkg.GetValueChar
6477: (p_source_code => 'LEDGER_CATEGORY_CODE'
6478: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
6481: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
6482: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
6483: )
6484: THEN
6485: xla_ae_lines_pkg.BflowUpgEntry
6486: (p_business_method_code => l_bflow_method_code
6487: ,p_business_class_code => l_bflow_class_code
6488: ,p_balance_type => l_balance_type_code);
6489: ELSE
6498: --
6499: -- call description
6500: --
6501:
6502: xla_ae_lines_pkg.SetLineDescription(
6503: p_ae_header_id => l_ae_header_id
6504: ,p_description => Description_3 (
6505: p_application_id => p_application_id
6506: , p_ae_header_id => l_ae_header_id
6531: , x_value_type_code => l_adr_value_type_code
6532: , p_side => 'NA'
6533: );
6534:
6535: xla_ae_lines_pkg.set_ccid(
6536: p_code_combination_id => l_ccid
6537: , p_value_type_code => l_adr_value_type_code
6538: , p_transaction_coa_id => l_adr_transaction_coa_id
6539: , p_accounting_coa_id => l_adr_accounting_coa_id
6567: xla_accounting_err_pkg.build_message
6568: (p_appli_s_name => 'XLA'
6569: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
6570: ,p_token_1 => 'LINE_NUMBER'
6571: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
6572: ,p_token_2 => 'LINE_TYPE_NAME'
6573: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
6574: l_component_type
6575: ,l_component_code
6603: --
6604: --
6605: ------------------------------------------------------------------------------------------------
6606: -- 4219869 Business Flow
6607: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
6608: -- Prior Entry. Currently, the following code is always generated.
6609: ------------------------------------------------------------------------------------------------
6610: XLA_AE_LINES_PKG.ValidateCurrentLine;
6611:
6606: -- 4219869 Business Flow
6607: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
6608: -- Prior Entry. Currently, the following code is always generated.
6609: ------------------------------------------------------------------------------------------------
6610: XLA_AE_LINES_PKG.ValidateCurrentLine;
6611:
6612: ------------------------------------------------------------------------------------
6613: -- 4219869 Business Flow
6614: -- Populated credit and debit amounts -- Need to generate this within IF
6612: ------------------------------------------------------------------------------------
6613: -- 4219869 Business Flow
6614: -- Populated credit and debit amounts -- Need to generate this within IF
6615: ------------------------------------------------------------------------------------
6616: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
6617:
6618: ----------------------------------------------------------------------------------
6619: -- 4219869 Business Flow
6620: -- Update journal entry status -- Need to generate this within IF
6644: -- To allow MPA report to determine if it should generate report process
6645: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
6646: ------------------------------------------------------------------------------------------
6647:
6648: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
6649: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
6650:
6651: --
6652: -- Update the line information that should be overwritten
6645: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
6646: ------------------------------------------------------------------------------------------
6647:
6648: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
6649: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
6650:
6651: --
6652: -- Update the line information that should be overwritten
6653: --
6650:
6651: --
6652: -- Update the line information that should be overwritten
6653: --
6654: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
6655: p_header_num => 1);
6656: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
6657:
6658: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6652: -- Update the line information that should be overwritten
6653: --
6654: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
6655: p_header_num => 1);
6656: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
6657:
6658: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6659:
6660: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
6654: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
6655: p_header_num => 1);
6656: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
6657:
6658: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6659:
6660: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
6661: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
6662: END IF;
6657:
6658: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6659:
6660: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
6661: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
6662: END IF;
6663:
6664: --
6665: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
6664: --
6665: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
6666: --
6667: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
6668: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
6669: ELSE
6670: ---------------------------------------------------------------------------------------------------
6671: -- 4262811a Switch Sign
6672: ---------------------------------------------------------------------------------------------------
6669: ELSE
6670: ---------------------------------------------------------------------------------------------------
6671: -- 4262811a Switch Sign
6672: ---------------------------------------------------------------------------------------------------
6673: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6674: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6675: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6676: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6677: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6670: ---------------------------------------------------------------------------------------------------
6671: -- 4262811a Switch Sign
6672: ---------------------------------------------------------------------------------------------------
6673: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6674: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6675: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6676: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6677: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6678: -- 5132302
6671: -- 4262811a Switch Sign
6672: ---------------------------------------------------------------------------------------------------
6673: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6674: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6675: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6676: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6677: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6678: -- 5132302
6679: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6672: ---------------------------------------------------------------------------------------------------
6673: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6674: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6675: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6676: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6677: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6678: -- 5132302
6679: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6680: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6673: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6674: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6675: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6676: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6677: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6678: -- 5132302
6679: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6680: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6681:
6675: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6676: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6677: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6678: -- 5132302
6679: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6680: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6681:
6682: END IF;
6683:
6676: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6677: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6678: -- 5132302
6679: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6680: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6681:
6682: END IF;
6683:
6684: -- 4955764
6681:
6682: END IF;
6683:
6684: -- 4955764
6685: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6686: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
6687:
6688:
6689: XLA_AE_LINES_PKG.ValidateCurrentLine;
6685: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6686: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
6687:
6688:
6689: XLA_AE_LINES_PKG.ValidateCurrentLine;
6690: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
6691:
6692: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
6693: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
6686: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
6687:
6688:
6689: XLA_AE_LINES_PKG.ValidateCurrentLine;
6690: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
6691:
6692: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
6693: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
6694: ,p_balance_type_code => l_balance_type_code);
6839: --
6840: -- bulk performance
6841: --
6842: l_balance_type_code VARCHAR2(1);
6843: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
6844: l_log_module VARCHAR2(240);
6845:
6846: --
6847: -- Upgrade strategy
6930: ') = 'N'
6931: THEN
6932:
6933: --
6934: XLA_AE_LINES_PKG.SetNewLine;
6935:
6936: p_balance_type_code := l_balance_type_code;
6937: -- set the flag so later we will know whether the gain loss line needs to be created
6938:
6942:
6943: --
6944: -- bulk performance
6945: --
6946: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
6947: p_header_num => 0); -- 4262811
6948: --
6949: -- set accounting line options
6950: --
6947: p_header_num => 0); -- 4262811
6948: --
6949: -- set accounting line options
6950: --
6951: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
6952: p_natural_side_code => 'D'
6953: , p_gain_or_loss_flag => 'N'
6954: , p_gl_transfer_mode_code => 'S'
6955: , p_acct_entry_type_code => 'E'
6961: --
6962: --
6963: -- set accounting line type info
6964: --
6965: xla_ae_lines_pkg.SetAcctLineType
6966: (p_component_type => l_component_type
6967: ,p_event_type_code => l_event_type_code
6968: ,p_line_definition_owner_code => l_line_definition_owner_code
6969: ,p_line_definition_code => l_line_definition_code
6975: ,p_event_class_code => l_event_class_code);
6976: --
6977: -- set accounting class
6978: --
6979: xla_ae_lines_pkg.SetAcctClass(
6980: p_accounting_class_code => 'REQUISITION'
6981: , p_ae_header_id => l_ae_header_id
6982: );
6983:
6983:
6984: --
6985: -- set rounding class
6986: --
6987: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
6988: 'REQUISITION';
6989:
6990: --
6991: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6987: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
6988: 'REQUISITION';
6989:
6990: --
6991: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6992: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6993: --
6994: -- bulk performance
6995: --
6988: 'REQUISITION';
6989:
6990: --
6991: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6992: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6993: --
6994: -- bulk performance
6995: --
6996: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6992: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6993: --
6994: -- bulk performance
6995: --
6996: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6997:
6998: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6999: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7000:
6994: -- bulk performance
6995: --
6996: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6997:
6998: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6999: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7000:
7001: -- 4955764
7002: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6998: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6999: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7000:
7001: -- 4955764
7002: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7003: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
7004:
7005: -- 4458381 Public Sector Enh
7006:
7082: l_rec_acct_attrs.array_num_value(30) := p_source_61;
7083: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
7084: l_rec_acct_attrs.array_num_value(31) := p_source_61;
7085:
7086: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
7087: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
7088:
7089: ---------------------------------------------------------------------------------------------------------------
7090: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7083: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
7084: l_rec_acct_attrs.array_num_value(31) := p_source_61;
7085:
7086: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
7087: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
7088:
7089: ---------------------------------------------------------------------------------------------------------------
7090: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7091: ---------------------------------------------------------------------------------------------------------------
7086: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
7087: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
7088:
7089: ---------------------------------------------------------------------------------------------------------------
7090: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7091: ---------------------------------------------------------------------------------------------------------------
7092: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7093:
7094: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7088:
7089: ---------------------------------------------------------------------------------------------------------------
7090: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7091: ---------------------------------------------------------------------------------------------------------------
7092: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7093:
7094: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7095: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7096:
7090: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7091: ---------------------------------------------------------------------------------------------------------------
7092: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7093:
7094: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7095: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7096:
7097: IF xla_accounting_cache_pkg.GetValueChar
7098: (p_source_code => 'LEDGER_CATEGORY_CODE'
7091: ---------------------------------------------------------------------------------------------------------------
7092: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7093:
7094: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7095: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7096:
7097: IF xla_accounting_cache_pkg.GetValueChar
7098: (p_source_code => 'LEDGER_CATEGORY_CODE'
7099: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
7102: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
7103: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
7104: )
7105: THEN
7106: xla_ae_lines_pkg.BflowUpgEntry
7107: (p_business_method_code => l_bflow_method_code
7108: ,p_business_class_code => l_bflow_class_code
7109: ,p_balance_type => l_balance_type_code);
7110: ELSE
7108: ,p_business_class_code => l_bflow_class_code
7109: ,p_balance_type => l_balance_type_code);
7110: ELSE
7111: NULL;
7112: XLA_AE_LINES_PKG.business_flow_validation(
7113: p_business_method_code => l_bflow_method_code
7114: ,p_business_class_code => l_bflow_class_code
7115: ,p_inherit_description_flag => l_inherit_desc_flag);
7116: END IF;
7155: xla_accounting_err_pkg.build_message
7156: (p_appli_s_name => 'XLA'
7157: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
7158: ,p_token_1 => 'LINE_NUMBER'
7159: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
7160: ,p_token_2 => 'LINE_TYPE_NAME'
7161: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
7162: l_component_type
7163: ,l_component_code
7191: --
7192: --
7193: ------------------------------------------------------------------------------------------------
7194: -- 4219869 Business Flow
7195: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
7196: -- Prior Entry. Currently, the following code is always generated.
7197: ------------------------------------------------------------------------------------------------
7198: -- No ValidateCurrentLine for business flow method of Prior Entry
7199:
7200: ------------------------------------------------------------------------------------
7201: -- 4219869 Business Flow
7202: -- Populated credit and debit amounts -- Need to generate this within IF
7203: ------------------------------------------------------------------------------------
7204: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
7205:
7206: ----------------------------------------------------------------------------------
7207: -- 4219869 Business Flow
7208: -- Update journal entry status -- Need to generate this within IF
7232: -- To allow MPA report to determine if it should generate report process
7233: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
7234: ------------------------------------------------------------------------------------------
7235:
7236: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
7237: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
7238:
7239: --
7240: -- Update the line information that should be overwritten
7233: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
7234: ------------------------------------------------------------------------------------------
7235:
7236: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
7237: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
7238:
7239: --
7240: -- Update the line information that should be overwritten
7241: --
7238:
7239: --
7240: -- Update the line information that should be overwritten
7241: --
7242: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
7243: p_header_num => 1);
7244: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
7245:
7246: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7240: -- Update the line information that should be overwritten
7241: --
7242: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
7243: p_header_num => 1);
7244: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
7245:
7246: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7247:
7248: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
7242: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
7243: p_header_num => 1);
7244: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
7245:
7246: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7247:
7248: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
7249: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
7250: END IF;
7245:
7246: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7247:
7248: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
7249: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
7250: END IF;
7251:
7252: --
7253: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
7252: --
7253: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
7254: --
7255: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
7256: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
7257: ELSE
7258: ---------------------------------------------------------------------------------------------------
7259: -- 4262811a Switch Sign
7260: ---------------------------------------------------------------------------------------------------
7257: ELSE
7258: ---------------------------------------------------------------------------------------------------
7259: -- 4262811a Switch Sign
7260: ---------------------------------------------------------------------------------------------------
7261: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7262: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7263: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7264: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7265: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7258: ---------------------------------------------------------------------------------------------------
7259: -- 4262811a Switch Sign
7260: ---------------------------------------------------------------------------------------------------
7261: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7262: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7263: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7264: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7265: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7266: -- 5132302
7259: -- 4262811a Switch Sign
7260: ---------------------------------------------------------------------------------------------------
7261: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7262: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7263: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7264: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7265: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7266: -- 5132302
7267: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7260: ---------------------------------------------------------------------------------------------------
7261: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7262: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7263: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7264: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7265: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7266: -- 5132302
7267: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7268: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7261: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7262: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7263: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7264: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7265: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7266: -- 5132302
7267: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7268: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7269:
7263: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7264: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7265: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7266: -- 5132302
7267: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7268: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7269:
7270: END IF;
7271:
7264: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7265: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7266: -- 5132302
7267: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7268: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7269:
7270: END IF;
7271:
7272: -- 4955764
7269:
7270: END IF;
7271:
7272: -- 4955764
7273: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7274: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
7275:
7276:
7277: XLA_AE_LINES_PKG.ValidateCurrentLine;
7273: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7274: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
7275:
7276:
7277: XLA_AE_LINES_PKG.ValidateCurrentLine;
7278: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
7279:
7280: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
7281: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
7274: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
7275:
7276:
7277: XLA_AE_LINES_PKG.ValidateCurrentLine;
7278: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
7279:
7280: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
7281: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
7282: ,p_balance_type_code => l_balance_type_code);
7425: --
7426: -- bulk performance
7427: --
7428: l_balance_type_code VARCHAR2(1);
7429: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
7430: l_log_module VARCHAR2(240);
7431:
7432: --
7433: -- Upgrade strategy
7507: ') = 'B_REQ'
7508: THEN
7509:
7510: --
7511: XLA_AE_LINES_PKG.SetNewLine;
7512:
7513: p_balance_type_code := l_balance_type_code;
7514: -- set the flag so later we will know whether the gain loss line needs to be created
7515:
7519:
7520: --
7521: -- bulk performance
7522: --
7523: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
7524: p_header_num => 0); -- 4262811
7525: --
7526: -- set accounting line options
7527: --
7524: p_header_num => 0); -- 4262811
7525: --
7526: -- set accounting line options
7527: --
7528: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
7529: p_natural_side_code => 'C'
7530: , p_gain_or_loss_flag => 'N'
7531: , p_gl_transfer_mode_code => 'S'
7532: , p_acct_entry_type_code => 'E'
7538: --
7539: --
7540: -- set accounting line type info
7541: --
7542: xla_ae_lines_pkg.SetAcctLineType
7543: (p_component_type => l_component_type
7544: ,p_event_type_code => l_event_type_code
7545: ,p_line_definition_owner_code => l_line_definition_owner_code
7546: ,p_line_definition_code => l_line_definition_code
7552: ,p_event_class_code => l_event_class_code);
7553: --
7554: -- set accounting class
7555: --
7556: xla_ae_lines_pkg.SetAcctClass(
7557: p_accounting_class_code => 'PURCHASE_ORDER'
7558: , p_ae_header_id => l_ae_header_id
7559: );
7560:
7560:
7561: --
7562: -- set rounding class
7563: --
7564: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
7565: 'PURCHASE_ORDER';
7566:
7567: --
7568: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
7564: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
7565: 'PURCHASE_ORDER';
7566:
7567: --
7568: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
7569: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
7570: --
7571: -- bulk performance
7572: --
7565: 'PURCHASE_ORDER';
7566:
7567: --
7568: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
7569: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
7570: --
7571: -- bulk performance
7572: --
7573: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
7569: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
7570: --
7571: -- bulk performance
7572: --
7573: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
7574:
7575: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
7576: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7577:
7571: -- bulk performance
7572: --
7573: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
7574:
7575: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
7576: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7577:
7578: -- 4955764
7579: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7575: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
7576: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7577:
7578: -- 4955764
7579: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7580: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
7581:
7582: -- 4458381 Public Sector Enh
7583:
7659: l_rec_acct_attrs.array_num_value(30) := p_source_61;
7660: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
7661: l_rec_acct_attrs.array_num_value(31) := p_source_61;
7662:
7663: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
7664: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
7665:
7666: ---------------------------------------------------------------------------------------------------------------
7667: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7660: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
7661: l_rec_acct_attrs.array_num_value(31) := p_source_61;
7662:
7663: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
7664: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
7665:
7666: ---------------------------------------------------------------------------------------------------------------
7667: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7668: ---------------------------------------------------------------------------------------------------------------
7663: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
7664: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
7665:
7666: ---------------------------------------------------------------------------------------------------------------
7667: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7668: ---------------------------------------------------------------------------------------------------------------
7669: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7670:
7671: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7665:
7666: ---------------------------------------------------------------------------------------------------------------
7667: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7668: ---------------------------------------------------------------------------------------------------------------
7669: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7670:
7671: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7672: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7673:
7667: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7668: ---------------------------------------------------------------------------------------------------------------
7669: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7670:
7671: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7672: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7673:
7674: IF xla_accounting_cache_pkg.GetValueChar
7675: (p_source_code => 'LEDGER_CATEGORY_CODE'
7668: ---------------------------------------------------------------------------------------------------------------
7669: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7670:
7671: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7672: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7673:
7674: IF xla_accounting_cache_pkg.GetValueChar
7675: (p_source_code => 'LEDGER_CATEGORY_CODE'
7676: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
7679: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
7680: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
7681: )
7682: THEN
7683: xla_ae_lines_pkg.BflowUpgEntry
7684: (p_business_method_code => l_bflow_method_code
7685: ,p_business_class_code => l_bflow_class_code
7686: ,p_balance_type => l_balance_type_code);
7687: ELSE
7685: ,p_business_class_code => l_bflow_class_code
7686: ,p_balance_type => l_balance_type_code);
7687: ELSE
7688: NULL;
7689: XLA_AE_LINES_PKG.business_flow_validation(
7690: p_business_method_code => l_bflow_method_code
7691: ,p_business_class_code => l_bflow_class_code
7692: ,p_inherit_description_flag => l_inherit_desc_flag);
7693: END IF;
7732: xla_accounting_err_pkg.build_message
7733: (p_appli_s_name => 'XLA'
7734: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
7735: ,p_token_1 => 'LINE_NUMBER'
7736: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
7737: ,p_token_2 => 'LINE_TYPE_NAME'
7738: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
7739: l_component_type
7740: ,l_component_code
7768: --
7769: --
7770: ------------------------------------------------------------------------------------------------
7771: -- 4219869 Business Flow
7772: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
7773: -- Prior Entry. Currently, the following code is always generated.
7774: ------------------------------------------------------------------------------------------------
7775: -- No ValidateCurrentLine for business flow method of Prior Entry
7776:
7777: ------------------------------------------------------------------------------------
7778: -- 4219869 Business Flow
7779: -- Populated credit and debit amounts -- Need to generate this within IF
7780: ------------------------------------------------------------------------------------
7781: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
7782:
7783: ----------------------------------------------------------------------------------
7784: -- 4219869 Business Flow
7785: -- Update journal entry status -- Need to generate this within IF
7809: -- To allow MPA report to determine if it should generate report process
7810: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
7811: ------------------------------------------------------------------------------------------
7812:
7813: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
7814: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
7815:
7816: --
7817: -- Update the line information that should be overwritten
7810: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
7811: ------------------------------------------------------------------------------------------
7812:
7813: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
7814: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
7815:
7816: --
7817: -- Update the line information that should be overwritten
7818: --
7815:
7816: --
7817: -- Update the line information that should be overwritten
7818: --
7819: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
7820: p_header_num => 1);
7821: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
7822:
7823: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7817: -- Update the line information that should be overwritten
7818: --
7819: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
7820: p_header_num => 1);
7821: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
7822:
7823: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7824:
7825: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
7819: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
7820: p_header_num => 1);
7821: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
7822:
7823: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7824:
7825: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
7826: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
7827: END IF;
7822:
7823: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7824:
7825: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
7826: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
7827: END IF;
7828:
7829: --
7830: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
7829: --
7830: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
7831: --
7832: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
7833: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
7834: ELSE
7835: ---------------------------------------------------------------------------------------------------
7836: -- 4262811a Switch Sign
7837: ---------------------------------------------------------------------------------------------------
7834: ELSE
7835: ---------------------------------------------------------------------------------------------------
7836: -- 4262811a Switch Sign
7837: ---------------------------------------------------------------------------------------------------
7838: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7839: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7840: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7841: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7842: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7835: ---------------------------------------------------------------------------------------------------
7836: -- 4262811a Switch Sign
7837: ---------------------------------------------------------------------------------------------------
7838: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7839: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7840: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7841: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7842: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7843: -- 5132302
7836: -- 4262811a Switch Sign
7837: ---------------------------------------------------------------------------------------------------
7838: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7839: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7840: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7841: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7842: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7843: -- 5132302
7844: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7837: ---------------------------------------------------------------------------------------------------
7838: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7839: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7840: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7841: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7842: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7843: -- 5132302
7844: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7845: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7838: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7839: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7840: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7841: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7842: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7843: -- 5132302
7844: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7845: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7846:
7840: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7841: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7842: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7843: -- 5132302
7844: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7845: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7846:
7847: END IF;
7848:
7841: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7842: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7843: -- 5132302
7844: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7845: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7846:
7847: END IF;
7848:
7849: -- 4955764
7846:
7847: END IF;
7848:
7849: -- 4955764
7850: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7851: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
7852:
7853:
7854: XLA_AE_LINES_PKG.ValidateCurrentLine;
7850: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7851: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
7852:
7853:
7854: XLA_AE_LINES_PKG.ValidateCurrentLine;
7855: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
7856:
7857: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
7858: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
7851: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
7852:
7853:
7854: XLA_AE_LINES_PKG.ValidateCurrentLine;
7855: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
7856:
7857: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
7858: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
7859: ,p_balance_type_code => l_balance_type_code);
8002: --
8003: -- bulk performance
8004: --
8005: l_balance_type_code VARCHAR2(1);
8006: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
8007: l_log_module VARCHAR2(240);
8008:
8009: --
8010: -- Upgrade strategy
8091: ') = 'B_REQ'
8092: THEN
8093:
8094: --
8095: XLA_AE_LINES_PKG.SetNewLine;
8096:
8097: p_balance_type_code := l_balance_type_code;
8098: -- set the flag so later we will know whether the gain loss line needs to be created
8099:
8103:
8104: --
8105: -- bulk performance
8106: --
8107: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
8108: p_header_num => 0); -- 4262811
8109: --
8110: -- set accounting line options
8111: --
8108: p_header_num => 0); -- 4262811
8109: --
8110: -- set accounting line options
8111: --
8112: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
8113: p_natural_side_code => 'D'
8114: , p_gain_or_loss_flag => 'N'
8115: , p_gl_transfer_mode_code => 'S'
8116: , p_acct_entry_type_code => 'E'
8122: --
8123: --
8124: -- set accounting line type info
8125: --
8126: xla_ae_lines_pkg.SetAcctLineType
8127: (p_component_type => l_component_type
8128: ,p_event_type_code => l_event_type_code
8129: ,p_line_definition_owner_code => l_line_definition_owner_code
8130: ,p_line_definition_code => l_line_definition_code
8136: ,p_event_class_code => l_event_class_code);
8137: --
8138: -- set accounting class
8139: --
8140: xla_ae_lines_pkg.SetAcctClass(
8141: p_accounting_class_code => 'PURCHASE_ORDER'
8142: , p_ae_header_id => l_ae_header_id
8143: );
8144:
8144:
8145: --
8146: -- set rounding class
8147: --
8148: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
8149: 'PURCHASE_ORDER';
8150:
8151: --
8152: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
8148: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
8149: 'PURCHASE_ORDER';
8150:
8151: --
8152: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
8153: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
8154: --
8155: -- bulk performance
8156: --
8149: 'PURCHASE_ORDER';
8150:
8151: --
8152: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
8153: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
8154: --
8155: -- bulk performance
8156: --
8157: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
8153: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
8154: --
8155: -- bulk performance
8156: --
8157: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
8158:
8159: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
8160: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
8161:
8155: -- bulk performance
8156: --
8157: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
8158:
8159: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
8160: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
8161:
8162: -- 4955764
8163: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8159: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
8160: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
8161:
8162: -- 4955764
8163: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8164: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
8165:
8166: -- 4458381 Public Sector Enh
8167:
8243: l_rec_acct_attrs.array_num_value(30) := p_source_61;
8244: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
8245: l_rec_acct_attrs.array_num_value(31) := p_source_61;
8246:
8247: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
8248: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
8249:
8250: ---------------------------------------------------------------------------------------------------------------
8251: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8244: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
8245: l_rec_acct_attrs.array_num_value(31) := p_source_61;
8246:
8247: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
8248: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
8249:
8250: ---------------------------------------------------------------------------------------------------------------
8251: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8252: ---------------------------------------------------------------------------------------------------------------
8247: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
8248: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
8249:
8250: ---------------------------------------------------------------------------------------------------------------
8251: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8252: ---------------------------------------------------------------------------------------------------------------
8253: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8254:
8255: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8249:
8250: ---------------------------------------------------------------------------------------------------------------
8251: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8252: ---------------------------------------------------------------------------------------------------------------
8253: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8254:
8255: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8256: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8257:
8251: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8252: ---------------------------------------------------------------------------------------------------------------
8253: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8254:
8255: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8256: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8257:
8258: IF xla_accounting_cache_pkg.GetValueChar
8259: (p_source_code => 'LEDGER_CATEGORY_CODE'
8252: ---------------------------------------------------------------------------------------------------------------
8253: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8254:
8255: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8256: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8257:
8258: IF xla_accounting_cache_pkg.GetValueChar
8259: (p_source_code => 'LEDGER_CATEGORY_CODE'
8260: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
8263: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
8264: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
8265: )
8266: THEN
8267: xla_ae_lines_pkg.BflowUpgEntry
8268: (p_business_method_code => l_bflow_method_code
8269: ,p_business_class_code => l_bflow_class_code
8270: ,p_balance_type => l_balance_type_code);
8271: ELSE
8269: ,p_business_class_code => l_bflow_class_code
8270: ,p_balance_type => l_balance_type_code);
8271: ELSE
8272: NULL;
8273: XLA_AE_LINES_PKG.business_flow_validation(
8274: p_business_method_code => l_bflow_method_code
8275: ,p_business_class_code => l_bflow_class_code
8276: ,p_inherit_description_flag => l_inherit_desc_flag);
8277: END IF;
8316: xla_accounting_err_pkg.build_message
8317: (p_appli_s_name => 'XLA'
8318: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
8319: ,p_token_1 => 'LINE_NUMBER'
8320: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
8321: ,p_token_2 => 'LINE_TYPE_NAME'
8322: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
8323: l_component_type
8324: ,l_component_code
8352: --
8353: --
8354: ------------------------------------------------------------------------------------------------
8355: -- 4219869 Business Flow
8356: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
8357: -- Prior Entry. Currently, the following code is always generated.
8358: ------------------------------------------------------------------------------------------------
8359: -- No ValidateCurrentLine for business flow method of Prior Entry
8360:
8361: ------------------------------------------------------------------------------------
8362: -- 4219869 Business Flow
8363: -- Populated credit and debit amounts -- Need to generate this within IF
8364: ------------------------------------------------------------------------------------
8365: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
8366:
8367: ----------------------------------------------------------------------------------
8368: -- 4219869 Business Flow
8369: -- Update journal entry status -- Need to generate this within IF
8393: -- To allow MPA report to determine if it should generate report process
8394: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
8395: ------------------------------------------------------------------------------------------
8396:
8397: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
8398: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
8399:
8400: --
8401: -- Update the line information that should be overwritten
8394: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
8395: ------------------------------------------------------------------------------------------
8396:
8397: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
8398: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
8399:
8400: --
8401: -- Update the line information that should be overwritten
8402: --
8399:
8400: --
8401: -- Update the line information that should be overwritten
8402: --
8403: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
8404: p_header_num => 1);
8405: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
8406:
8407: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8401: -- Update the line information that should be overwritten
8402: --
8403: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
8404: p_header_num => 1);
8405: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
8406:
8407: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8408:
8409: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
8403: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
8404: p_header_num => 1);
8405: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
8406:
8407: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8408:
8409: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
8410: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
8411: END IF;
8406:
8407: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8408:
8409: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
8410: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
8411: END IF;
8412:
8413: --
8414: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
8413: --
8414: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
8415: --
8416: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
8417: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
8418: ELSE
8419: ---------------------------------------------------------------------------------------------------
8420: -- 4262811a Switch Sign
8421: ---------------------------------------------------------------------------------------------------
8418: ELSE
8419: ---------------------------------------------------------------------------------------------------
8420: -- 4262811a Switch Sign
8421: ---------------------------------------------------------------------------------------------------
8422: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8423: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8424: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8425: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8426: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8419: ---------------------------------------------------------------------------------------------------
8420: -- 4262811a Switch Sign
8421: ---------------------------------------------------------------------------------------------------
8422: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8423: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8424: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8425: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8426: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8427: -- 5132302
8420: -- 4262811a Switch Sign
8421: ---------------------------------------------------------------------------------------------------
8422: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8423: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8424: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8425: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8426: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8427: -- 5132302
8428: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8421: ---------------------------------------------------------------------------------------------------
8422: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8423: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8424: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8425: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8426: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8427: -- 5132302
8428: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8429: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8422: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8423: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8424: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8425: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8426: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8427: -- 5132302
8428: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8429: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8430:
8424: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8425: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8426: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8427: -- 5132302
8428: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8429: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8430:
8431: END IF;
8432:
8425: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8426: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8427: -- 5132302
8428: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8429: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8430:
8431: END IF;
8432:
8433: -- 4955764
8430:
8431: END IF;
8432:
8433: -- 4955764
8434: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8435: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
8436:
8437:
8438: XLA_AE_LINES_PKG.ValidateCurrentLine;
8434: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8435: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
8436:
8437:
8438: XLA_AE_LINES_PKG.ValidateCurrentLine;
8439: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
8440:
8441: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
8442: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
8435: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
8436:
8437:
8438: XLA_AE_LINES_PKG.ValidateCurrentLine;
8439: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
8440:
8441: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
8442: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
8443: ,p_balance_type_code => l_balance_type_code);
8594: --
8595: -- bulk performance
8596: --
8597: l_balance_type_code VARCHAR2(1);
8598: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
8599: l_log_module VARCHAR2(240);
8600:
8601: --
8602: -- Upgrade strategy
8685: ') = 'Y'
8686: THEN
8687:
8688: --
8689: XLA_AE_LINES_PKG.SetNewLine;
8690:
8691: p_balance_type_code := l_balance_type_code;
8692: -- set the flag so later we will know whether the gain loss line needs to be created
8693:
8697:
8698: --
8699: -- bulk performance
8700: --
8701: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
8702: p_header_num => 0); -- 4262811
8703: --
8704: -- set accounting line options
8705: --
8702: p_header_num => 0); -- 4262811
8703: --
8704: -- set accounting line options
8705: --
8706: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
8707: p_natural_side_code => 'D'
8708: , p_gain_or_loss_flag => 'N'
8709: , p_gl_transfer_mode_code => 'S'
8710: , p_acct_entry_type_code => 'E'
8716: --
8717: --
8718: -- set accounting line type info
8719: --
8720: xla_ae_lines_pkg.SetAcctLineType
8721: (p_component_type => l_component_type
8722: ,p_event_type_code => l_event_type_code
8723: ,p_line_definition_owner_code => l_line_definition_owner_code
8724: ,p_line_definition_code => l_line_definition_code
8730: ,p_event_class_code => l_event_class_code);
8731: --
8732: -- set accounting class
8733: --
8734: xla_ae_lines_pkg.SetAcctClass(
8735: p_accounting_class_code => 'REQUISITION'
8736: , p_ae_header_id => l_ae_header_id
8737: );
8738:
8738:
8739: --
8740: -- set rounding class
8741: --
8742: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
8743: 'REQUISITION';
8744:
8745: --
8746: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
8742: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
8743: 'REQUISITION';
8744:
8745: --
8746: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
8747: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
8748: --
8749: -- bulk performance
8750: --
8743: 'REQUISITION';
8744:
8745: --
8746: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
8747: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
8748: --
8749: -- bulk performance
8750: --
8751: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
8747: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
8748: --
8749: -- bulk performance
8750: --
8751: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
8752:
8753: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
8754: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
8755:
8749: -- bulk performance
8750: --
8751: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
8752:
8753: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
8754: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
8755:
8756: -- 4955764
8757: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8753: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
8754: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
8755:
8756: -- 4955764
8757: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8758: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
8759:
8760: -- 4458381 Public Sector Enh
8761: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
8757: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8758: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
8759:
8760: -- 4458381 Public Sector Enh
8761: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
8762: --
8763: -- set accounting attributes for the line type
8764: --
8765: l_entered_amt_idx := 23;
8843: l_rec_acct_attrs.array_num_value(33) := p_source_61;
8844: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
8845: l_rec_acct_attrs.array_num_value(34) := p_source_61;
8846:
8847: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
8848: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
8849:
8850: ---------------------------------------------------------------------------------------------------------------
8851: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8844: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
8845: l_rec_acct_attrs.array_num_value(34) := p_source_61;
8846:
8847: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
8848: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
8849:
8850: ---------------------------------------------------------------------------------------------------------------
8851: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8852: ---------------------------------------------------------------------------------------------------------------
8847: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
8848: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
8849:
8850: ---------------------------------------------------------------------------------------------------------------
8851: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8852: ---------------------------------------------------------------------------------------------------------------
8853: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8854:
8855: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8849:
8850: ---------------------------------------------------------------------------------------------------------------
8851: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8852: ---------------------------------------------------------------------------------------------------------------
8853: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8854:
8855: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8856: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8857:
8851: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8852: ---------------------------------------------------------------------------------------------------------------
8853: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8854:
8855: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8856: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8857:
8858: IF xla_accounting_cache_pkg.GetValueChar
8859: (p_source_code => 'LEDGER_CATEGORY_CODE'
8852: ---------------------------------------------------------------------------------------------------------------
8853: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8854:
8855: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8856: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8857:
8858: IF xla_accounting_cache_pkg.GetValueChar
8859: (p_source_code => 'LEDGER_CATEGORY_CODE'
8860: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
8863: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
8864: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
8865: )
8866: THEN
8867: xla_ae_lines_pkg.BflowUpgEntry
8868: (p_business_method_code => l_bflow_method_code
8869: ,p_business_class_code => l_bflow_class_code
8870: ,p_balance_type => l_balance_type_code);
8871: ELSE
8880: --
8881: -- call description
8882: --
8883:
8884: xla_ae_lines_pkg.SetLineDescription(
8885: p_ae_header_id => l_ae_header_id
8886: ,p_description => Description_3 (
8887: p_application_id => p_application_id
8888: , p_ae_header_id => l_ae_header_id
8913: , x_value_type_code => l_adr_value_type_code
8914: , p_side => 'NA'
8915: );
8916:
8917: xla_ae_lines_pkg.set_ccid(
8918: p_code_combination_id => l_ccid
8919: , p_value_type_code => l_adr_value_type_code
8920: , p_transaction_coa_id => l_adr_transaction_coa_id
8921: , p_accounting_coa_id => l_adr_accounting_coa_id
8949: xla_accounting_err_pkg.build_message
8950: (p_appli_s_name => 'XLA'
8951: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
8952: ,p_token_1 => 'LINE_NUMBER'
8953: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
8954: ,p_token_2 => 'LINE_TYPE_NAME'
8955: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
8956: l_component_type
8957: ,l_component_code
8985: --
8986: --
8987: ------------------------------------------------------------------------------------------------
8988: -- 4219869 Business Flow
8989: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
8990: -- Prior Entry. Currently, the following code is always generated.
8991: ------------------------------------------------------------------------------------------------
8992: XLA_AE_LINES_PKG.ValidateCurrentLine;
8993:
8988: -- 4219869 Business Flow
8989: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
8990: -- Prior Entry. Currently, the following code is always generated.
8991: ------------------------------------------------------------------------------------------------
8992: XLA_AE_LINES_PKG.ValidateCurrentLine;
8993:
8994: ------------------------------------------------------------------------------------
8995: -- 4219869 Business Flow
8996: -- Populated credit and debit amounts -- Need to generate this within IF
8994: ------------------------------------------------------------------------------------
8995: -- 4219869 Business Flow
8996: -- Populated credit and debit amounts -- Need to generate this within IF
8997: ------------------------------------------------------------------------------------
8998: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
8999:
9000: ----------------------------------------------------------------------------------
9001: -- 4219869 Business Flow
9002: -- Update journal entry status -- Need to generate this within IF
9026: -- To allow MPA report to determine if it should generate report process
9027: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
9028: ------------------------------------------------------------------------------------------
9029:
9030: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
9031: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
9032:
9033: --
9034: -- Update the line information that should be overwritten
9027: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
9028: ------------------------------------------------------------------------------------------
9029:
9030: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
9031: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
9032:
9033: --
9034: -- Update the line information that should be overwritten
9035: --
9032:
9033: --
9034: -- Update the line information that should be overwritten
9035: --
9036: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
9037: p_header_num => 1);
9038: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
9039:
9040: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9034: -- Update the line information that should be overwritten
9035: --
9036: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
9037: p_header_num => 1);
9038: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
9039:
9040: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9041:
9042: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
9036: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
9037: p_header_num => 1);
9038: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
9039:
9040: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9041:
9042: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
9043: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
9044: END IF;
9039:
9040: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9041:
9042: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
9043: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
9044: END IF;
9045:
9046: --
9047: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
9046: --
9047: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
9048: --
9049: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
9050: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
9051: ELSE
9052: ---------------------------------------------------------------------------------------------------
9053: -- 4262811a Switch Sign
9054: ---------------------------------------------------------------------------------------------------
9051: ELSE
9052: ---------------------------------------------------------------------------------------------------
9053: -- 4262811a Switch Sign
9054: ---------------------------------------------------------------------------------------------------
9055: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9056: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9057: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9058: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9059: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9052: ---------------------------------------------------------------------------------------------------
9053: -- 4262811a Switch Sign
9054: ---------------------------------------------------------------------------------------------------
9055: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9056: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9057: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9058: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9059: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9060: -- 5132302
9053: -- 4262811a Switch Sign
9054: ---------------------------------------------------------------------------------------------------
9055: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9056: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9057: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9058: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9059: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9060: -- 5132302
9061: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9054: ---------------------------------------------------------------------------------------------------
9055: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9056: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9057: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9058: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9059: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9060: -- 5132302
9061: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9062: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9055: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9056: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9057: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9058: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9059: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9060: -- 5132302
9061: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9062: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9063:
9057: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9058: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9059: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9060: -- 5132302
9061: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9062: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9063:
9064: END IF;
9065:
9058: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9059: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9060: -- 5132302
9061: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9062: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9063:
9064: END IF;
9065:
9066: -- 4955764
9063:
9064: END IF;
9065:
9066: -- 4955764
9067: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9068: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
9069:
9070:
9071: XLA_AE_LINES_PKG.ValidateCurrentLine;
9067: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9068: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
9069:
9070:
9071: XLA_AE_LINES_PKG.ValidateCurrentLine;
9072: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
9073:
9074: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
9075: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
9068: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
9069:
9070:
9071: XLA_AE_LINES_PKG.ValidateCurrentLine;
9072: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
9073:
9074: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
9075: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
9076: ,p_balance_type_code => l_balance_type_code);
9248: --
9249: -- bulk performance
9250: --
9251: l_balance_type_code VARCHAR2(1);
9252: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
9253: l_log_module VARCHAR2(240);
9254:
9255: --
9256: -- Upgrade strategy
9340: ') = 'S'
9341: THEN
9342:
9343: --
9344: XLA_AE_LINES_PKG.SetNewLine;
9345:
9346: p_balance_type_code := l_balance_type_code;
9347: -- set the flag so later we will know whether the gain loss line needs to be created
9348:
9352:
9353: --
9354: -- bulk performance
9355: --
9356: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
9357: p_header_num => 0); -- 4262811
9358: --
9359: -- set accounting line options
9360: --
9357: p_header_num => 0); -- 4262811
9358: --
9359: -- set accounting line options
9360: --
9361: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
9362: p_natural_side_code => 'C'
9363: , p_gain_or_loss_flag => 'N'
9364: , p_gl_transfer_mode_code => 'S'
9365: , p_acct_entry_type_code => 'E'
9371: --
9372: --
9373: -- set accounting line type info
9374: --
9375: xla_ae_lines_pkg.SetAcctLineType
9376: (p_component_type => l_component_type
9377: ,p_event_type_code => l_event_type_code
9378: ,p_line_definition_owner_code => l_line_definition_owner_code
9379: ,p_line_definition_code => l_line_definition_code
9385: ,p_event_class_code => l_event_class_code);
9386: --
9387: -- set accounting class
9388: --
9389: xla_ae_lines_pkg.SetAcctClass(
9390: p_accounting_class_code => 'PO_PA_BURDENED'
9391: , p_ae_header_id => l_ae_header_id
9392: );
9393:
9393:
9394: --
9395: -- set rounding class
9396: --
9397: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
9398: 'PO_PA_BURDENED';
9399:
9400: --
9401: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
9397: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
9398: 'PO_PA_BURDENED';
9399:
9400: --
9401: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
9402: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
9403: --
9404: -- bulk performance
9405: --
9398: 'PO_PA_BURDENED';
9399:
9400: --
9401: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
9402: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
9403: --
9404: -- bulk performance
9405: --
9406: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
9402: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
9403: --
9404: -- bulk performance
9405: --
9406: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
9407:
9408: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
9409: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
9410:
9404: -- bulk performance
9405: --
9406: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
9407:
9408: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
9409: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
9410:
9411: -- 4955764
9412: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9408: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
9409: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
9410:
9411: -- 4955764
9412: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9413: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
9414:
9415: -- 4458381 Public Sector Enh
9416:
9490: l_rec_acct_attrs.array_num_value(34) := p_source_39;
9491: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
9492: l_rec_acct_attrs.array_num_value(35) := p_source_40;
9493:
9494: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
9495: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
9496:
9497: ---------------------------------------------------------------------------------------------------------------
9498: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9491: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
9492: l_rec_acct_attrs.array_num_value(35) := p_source_40;
9493:
9494: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
9495: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
9496:
9497: ---------------------------------------------------------------------------------------------------------------
9498: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9499: ---------------------------------------------------------------------------------------------------------------
9494: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
9495: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
9496:
9497: ---------------------------------------------------------------------------------------------------------------
9498: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9499: ---------------------------------------------------------------------------------------------------------------
9500: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9501:
9502: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9496:
9497: ---------------------------------------------------------------------------------------------------------------
9498: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9499: ---------------------------------------------------------------------------------------------------------------
9500: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9501:
9502: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9503: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9504:
9498: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9499: ---------------------------------------------------------------------------------------------------------------
9500: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9501:
9502: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9503: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9504:
9505: IF xla_accounting_cache_pkg.GetValueChar
9506: (p_source_code => 'LEDGER_CATEGORY_CODE'
9499: ---------------------------------------------------------------------------------------------------------------
9500: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9501:
9502: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9503: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9504:
9505: IF xla_accounting_cache_pkg.GetValueChar
9506: (p_source_code => 'LEDGER_CATEGORY_CODE'
9507: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
9510: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
9511: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
9512: )
9513: THEN
9514: xla_ae_lines_pkg.BflowUpgEntry
9515: (p_business_method_code => l_bflow_method_code
9516: ,p_business_class_code => l_bflow_class_code
9517: ,p_balance_type => l_balance_type_code);
9518: ELSE
9516: ,p_business_class_code => l_bflow_class_code
9517: ,p_balance_type => l_balance_type_code);
9518: ELSE
9519: NULL;
9520: XLA_AE_LINES_PKG.business_flow_validation(
9521: p_business_method_code => l_bflow_method_code
9522: ,p_business_class_code => l_bflow_class_code
9523: ,p_inherit_description_flag => l_inherit_desc_flag);
9524: END IF;
9530: --
9531: -- call description
9532: --
9533:
9534: xla_ae_lines_pkg.SetLineDescription(
9535: p_ae_header_id => l_ae_header_id
9536: ,p_description => Description_2 (
9537: p_application_id => p_application_id
9538: , p_ae_header_id => l_ae_header_id
9576: xla_accounting_err_pkg.build_message
9577: (p_appli_s_name => 'XLA'
9578: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
9579: ,p_token_1 => 'LINE_NUMBER'
9580: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
9581: ,p_token_2 => 'LINE_TYPE_NAME'
9582: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
9583: l_component_type
9584: ,l_component_code
9612: --
9613: --
9614: ------------------------------------------------------------------------------------------------
9615: -- 4219869 Business Flow
9616: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
9617: -- Prior Entry. Currently, the following code is always generated.
9618: ------------------------------------------------------------------------------------------------
9619: -- No ValidateCurrentLine for business flow method of Prior Entry
9620:
9621: ------------------------------------------------------------------------------------
9622: -- 4219869 Business Flow
9623: -- Populated credit and debit amounts -- Need to generate this within IF
9624: ------------------------------------------------------------------------------------
9625: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
9626:
9627: ----------------------------------------------------------------------------------
9628: -- 4219869 Business Flow
9629: -- Update journal entry status -- Need to generate this within IF
9653: -- To allow MPA report to determine if it should generate report process
9654: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
9655: ------------------------------------------------------------------------------------------
9656:
9657: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
9658: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
9659:
9660: --
9661: -- Update the line information that should be overwritten
9654: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
9655: ------------------------------------------------------------------------------------------
9656:
9657: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
9658: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
9659:
9660: --
9661: -- Update the line information that should be overwritten
9662: --
9659:
9660: --
9661: -- Update the line information that should be overwritten
9662: --
9663: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
9664: p_header_num => 1);
9665: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
9666:
9667: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9661: -- Update the line information that should be overwritten
9662: --
9663: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
9664: p_header_num => 1);
9665: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
9666:
9667: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9668:
9669: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
9663: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
9664: p_header_num => 1);
9665: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
9666:
9667: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9668:
9669: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
9670: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
9671: END IF;
9666:
9667: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9668:
9669: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
9670: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
9671: END IF;
9672:
9673: --
9674: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
9673: --
9674: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
9675: --
9676: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
9677: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
9678: ELSE
9679: ---------------------------------------------------------------------------------------------------
9680: -- 4262811a Switch Sign
9681: ---------------------------------------------------------------------------------------------------
9678: ELSE
9679: ---------------------------------------------------------------------------------------------------
9680: -- 4262811a Switch Sign
9681: ---------------------------------------------------------------------------------------------------
9682: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9683: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9684: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9685: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9686: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9679: ---------------------------------------------------------------------------------------------------
9680: -- 4262811a Switch Sign
9681: ---------------------------------------------------------------------------------------------------
9682: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9683: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9684: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9685: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9686: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9687: -- 5132302
9680: -- 4262811a Switch Sign
9681: ---------------------------------------------------------------------------------------------------
9682: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9683: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9684: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9685: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9686: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9687: -- 5132302
9688: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9681: ---------------------------------------------------------------------------------------------------
9682: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9683: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9684: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9685: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9686: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9687: -- 5132302
9688: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9689: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9682: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9683: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9684: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9685: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9686: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9687: -- 5132302
9688: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9689: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9690:
9684: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9685: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9686: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9687: -- 5132302
9688: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9689: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9690:
9691: END IF;
9692:
9685: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9686: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9687: -- 5132302
9688: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9689: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9690:
9691: END IF;
9692:
9693: -- 4955764
9690:
9691: END IF;
9692:
9693: -- 4955764
9694: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9695: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
9696:
9697:
9698: XLA_AE_LINES_PKG.ValidateCurrentLine;
9694: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9695: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
9696:
9697:
9698: XLA_AE_LINES_PKG.ValidateCurrentLine;
9699: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
9700:
9701: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
9702: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
9695: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
9696:
9697:
9698: XLA_AE_LINES_PKG.ValidateCurrentLine;
9699: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
9700:
9701: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
9702: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
9703: ,p_balance_type_code => l_balance_type_code);
9875: --
9876: -- bulk performance
9877: --
9878: l_balance_type_code VARCHAR2(1);
9879: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
9880: l_log_module VARCHAR2(240);
9881:
9882: --
9883: -- Upgrade strategy
9974: ') = 'S'
9975: THEN
9976:
9977: --
9978: XLA_AE_LINES_PKG.SetNewLine;
9979:
9980: p_balance_type_code := l_balance_type_code;
9981: -- set the flag so later we will know whether the gain loss line needs to be created
9982:
9986:
9987: --
9988: -- bulk performance
9989: --
9990: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
9991: p_header_num => 0); -- 4262811
9992: --
9993: -- set accounting line options
9994: --
9991: p_header_num => 0); -- 4262811
9992: --
9993: -- set accounting line options
9994: --
9995: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
9996: p_natural_side_code => 'D'
9997: , p_gain_or_loss_flag => 'N'
9998: , p_gl_transfer_mode_code => 'S'
9999: , p_acct_entry_type_code => 'E'
10005: --
10006: --
10007: -- set accounting line type info
10008: --
10009: xla_ae_lines_pkg.SetAcctLineType
10010: (p_component_type => l_component_type
10011: ,p_event_type_code => l_event_type_code
10012: ,p_line_definition_owner_code => l_line_definition_owner_code
10013: ,p_line_definition_code => l_line_definition_code
10019: ,p_event_class_code => l_event_class_code);
10020: --
10021: -- set accounting class
10022: --
10023: xla_ae_lines_pkg.SetAcctClass(
10024: p_accounting_class_code => 'PO_PA_BURDENED'
10025: , p_ae_header_id => l_ae_header_id
10026: );
10027:
10027:
10028: --
10029: -- set rounding class
10030: --
10031: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
10032: 'PO_PA_BURDENED';
10033:
10034: --
10035: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
10031: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
10032: 'PO_PA_BURDENED';
10033:
10034: --
10035: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
10036: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
10037: --
10038: -- bulk performance
10039: --
10032: 'PO_PA_BURDENED';
10033:
10034: --
10035: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
10036: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
10037: --
10038: -- bulk performance
10039: --
10040: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
10036: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
10037: --
10038: -- bulk performance
10039: --
10040: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
10041:
10042: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
10043: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
10044:
10038: -- bulk performance
10039: --
10040: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
10041:
10042: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
10043: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
10044:
10045: -- 4955764
10046: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10042: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
10043: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
10044:
10045: -- 4955764
10046: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10047: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
10048:
10049: -- 4458381 Public Sector Enh
10050:
10124: l_rec_acct_attrs.array_num_value(34) := p_source_39;
10125: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
10126: l_rec_acct_attrs.array_num_value(35) := p_source_40;
10127:
10128: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10129: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10130:
10131: ---------------------------------------------------------------------------------------------------------------
10132: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10125: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
10126: l_rec_acct_attrs.array_num_value(35) := p_source_40;
10127:
10128: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10129: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10130:
10131: ---------------------------------------------------------------------------------------------------------------
10132: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10133: ---------------------------------------------------------------------------------------------------------------
10128: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10129: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10130:
10131: ---------------------------------------------------------------------------------------------------------------
10132: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10133: ---------------------------------------------------------------------------------------------------------------
10134: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10135:
10136: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10130:
10131: ---------------------------------------------------------------------------------------------------------------
10132: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10133: ---------------------------------------------------------------------------------------------------------------
10134: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10135:
10136: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10137: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10138:
10132: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10133: ---------------------------------------------------------------------------------------------------------------
10134: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10135:
10136: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10137: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10138:
10139: IF xla_accounting_cache_pkg.GetValueChar
10140: (p_source_code => 'LEDGER_CATEGORY_CODE'
10133: ---------------------------------------------------------------------------------------------------------------
10134: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10135:
10136: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10137: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10138:
10139: IF xla_accounting_cache_pkg.GetValueChar
10140: (p_source_code => 'LEDGER_CATEGORY_CODE'
10141: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
10144: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
10145: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
10146: )
10147: THEN
10148: xla_ae_lines_pkg.BflowUpgEntry
10149: (p_business_method_code => l_bflow_method_code
10150: ,p_business_class_code => l_bflow_class_code
10151: ,p_balance_type => l_balance_type_code);
10152: ELSE
10150: ,p_business_class_code => l_bflow_class_code
10151: ,p_balance_type => l_balance_type_code);
10152: ELSE
10153: NULL;
10154: XLA_AE_LINES_PKG.business_flow_validation(
10155: p_business_method_code => l_bflow_method_code
10156: ,p_business_class_code => l_bflow_class_code
10157: ,p_inherit_description_flag => l_inherit_desc_flag);
10158: END IF;
10164: --
10165: -- call description
10166: --
10167:
10168: xla_ae_lines_pkg.SetLineDescription(
10169: p_ae_header_id => l_ae_header_id
10170: ,p_description => Description_2 (
10171: p_application_id => p_application_id
10172: , p_ae_header_id => l_ae_header_id
10210: xla_accounting_err_pkg.build_message
10211: (p_appli_s_name => 'XLA'
10212: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
10213: ,p_token_1 => 'LINE_NUMBER'
10214: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
10215: ,p_token_2 => 'LINE_TYPE_NAME'
10216: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
10217: l_component_type
10218: ,l_component_code
10246: --
10247: --
10248: ------------------------------------------------------------------------------------------------
10249: -- 4219869 Business Flow
10250: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
10251: -- Prior Entry. Currently, the following code is always generated.
10252: ------------------------------------------------------------------------------------------------
10253: -- No ValidateCurrentLine for business flow method of Prior Entry
10254:
10255: ------------------------------------------------------------------------------------
10256: -- 4219869 Business Flow
10257: -- Populated credit and debit amounts -- Need to generate this within IF
10258: ------------------------------------------------------------------------------------
10259: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
10260:
10261: ----------------------------------------------------------------------------------
10262: -- 4219869 Business Flow
10263: -- Update journal entry status -- Need to generate this within IF
10287: -- To allow MPA report to determine if it should generate report process
10288: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
10289: ------------------------------------------------------------------------------------------
10290:
10291: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
10292: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
10293:
10294: --
10295: -- Update the line information that should be overwritten
10288: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
10289: ------------------------------------------------------------------------------------------
10290:
10291: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
10292: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
10293:
10294: --
10295: -- Update the line information that should be overwritten
10296: --
10293:
10294: --
10295: -- Update the line information that should be overwritten
10296: --
10297: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
10298: p_header_num => 1);
10299: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
10300:
10301: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10295: -- Update the line information that should be overwritten
10296: --
10297: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
10298: p_header_num => 1);
10299: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
10300:
10301: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10302:
10303: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
10297: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
10298: p_header_num => 1);
10299: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
10300:
10301: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10302:
10303: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
10304: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
10305: END IF;
10300:
10301: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10302:
10303: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
10304: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
10305: END IF;
10306:
10307: --
10308: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
10307: --
10308: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
10309: --
10310: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
10311: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
10312: ELSE
10313: ---------------------------------------------------------------------------------------------------
10314: -- 4262811a Switch Sign
10315: ---------------------------------------------------------------------------------------------------
10312: ELSE
10313: ---------------------------------------------------------------------------------------------------
10314: -- 4262811a Switch Sign
10315: ---------------------------------------------------------------------------------------------------
10316: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10317: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10318: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10319: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10320: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10313: ---------------------------------------------------------------------------------------------------
10314: -- 4262811a Switch Sign
10315: ---------------------------------------------------------------------------------------------------
10316: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10317: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10318: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10319: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10320: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10321: -- 5132302
10314: -- 4262811a Switch Sign
10315: ---------------------------------------------------------------------------------------------------
10316: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10317: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10318: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10319: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10320: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10321: -- 5132302
10322: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10315: ---------------------------------------------------------------------------------------------------
10316: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10317: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10318: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10319: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10320: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10321: -- 5132302
10322: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10323: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10316: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10317: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10318: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10319: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10320: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10321: -- 5132302
10322: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10323: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10324:
10318: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10319: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10320: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10321: -- 5132302
10322: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10323: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10324:
10325: END IF;
10326:
10319: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10320: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10321: -- 5132302
10322: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10323: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10324:
10325: END IF;
10326:
10327: -- 4955764
10324:
10325: END IF;
10326:
10327: -- 4955764
10328: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10329: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
10330:
10331:
10332: XLA_AE_LINES_PKG.ValidateCurrentLine;
10328: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10329: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
10330:
10331:
10332: XLA_AE_LINES_PKG.ValidateCurrentLine;
10333: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
10334:
10335: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
10336: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
10329: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
10330:
10331:
10332: XLA_AE_LINES_PKG.ValidateCurrentLine;
10333: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
10334:
10335: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
10336: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
10337: ,p_balance_type_code => l_balance_type_code);
10509: --
10510: -- bulk performance
10511: --
10512: l_balance_type_code VARCHAR2(1);
10513: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
10514: l_log_module VARCHAR2(240);
10515:
10516: --
10517: -- Upgrade strategy
10599: ') = 'D'
10600: THEN
10601:
10602: --
10603: XLA_AE_LINES_PKG.SetNewLine;
10604:
10605: p_balance_type_code := l_balance_type_code;
10606: -- set the flag so later we will know whether the gain loss line needs to be created
10607:
10611:
10612: --
10613: -- bulk performance
10614: --
10615: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
10616: p_header_num => 0); -- 4262811
10617: --
10618: -- set accounting line options
10619: --
10616: p_header_num => 0); -- 4262811
10617: --
10618: -- set accounting line options
10619: --
10620: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
10621: p_natural_side_code => 'C'
10622: , p_gain_or_loss_flag => 'N'
10623: , p_gl_transfer_mode_code => 'S'
10624: , p_acct_entry_type_code => 'E'
10630: --
10631: --
10632: -- set accounting line type info
10633: --
10634: xla_ae_lines_pkg.SetAcctLineType
10635: (p_component_type => l_component_type
10636: ,p_event_type_code => l_event_type_code
10637: ,p_line_definition_owner_code => l_line_definition_owner_code
10638: ,p_line_definition_code => l_line_definition_code
10644: ,p_event_class_code => l_event_class_code);
10645: --
10646: -- set accounting class
10647: --
10648: xla_ae_lines_pkg.SetAcctClass(
10649: p_accounting_class_code => 'PO_PA_BURDEN'
10650: , p_ae_header_id => l_ae_header_id
10651: );
10652:
10652:
10653: --
10654: -- set rounding class
10655: --
10656: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
10657: 'PO_PA_BURDEN';
10658:
10659: --
10660: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
10656: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
10657: 'PO_PA_BURDEN';
10658:
10659: --
10660: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
10661: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
10662: --
10663: -- bulk performance
10664: --
10657: 'PO_PA_BURDEN';
10658:
10659: --
10660: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
10661: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
10662: --
10663: -- bulk performance
10664: --
10665: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
10661: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
10662: --
10663: -- bulk performance
10664: --
10665: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
10666:
10667: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
10668: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
10669:
10663: -- bulk performance
10664: --
10665: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
10666:
10667: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
10668: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
10669:
10670: -- 4955764
10671: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10667: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
10668: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
10669:
10670: -- 4955764
10671: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10672: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
10673:
10674: -- 4458381 Public Sector Enh
10675:
10749: l_rec_acct_attrs.array_num_value(34) := p_source_39;
10750: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
10751: l_rec_acct_attrs.array_num_value(35) := p_source_40;
10752:
10753: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10754: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10755:
10756: ---------------------------------------------------------------------------------------------------------------
10757: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10750: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
10751: l_rec_acct_attrs.array_num_value(35) := p_source_40;
10752:
10753: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10754: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10755:
10756: ---------------------------------------------------------------------------------------------------------------
10757: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10758: ---------------------------------------------------------------------------------------------------------------
10753: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10754: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10755:
10756: ---------------------------------------------------------------------------------------------------------------
10757: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10758: ---------------------------------------------------------------------------------------------------------------
10759: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10760:
10761: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10755:
10756: ---------------------------------------------------------------------------------------------------------------
10757: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10758: ---------------------------------------------------------------------------------------------------------------
10759: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10760:
10761: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10762: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10763:
10757: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10758: ---------------------------------------------------------------------------------------------------------------
10759: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10760:
10761: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10762: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10763:
10764: IF xla_accounting_cache_pkg.GetValueChar
10765: (p_source_code => 'LEDGER_CATEGORY_CODE'
10758: ---------------------------------------------------------------------------------------------------------------
10759: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10760:
10761: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10762: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10763:
10764: IF xla_accounting_cache_pkg.GetValueChar
10765: (p_source_code => 'LEDGER_CATEGORY_CODE'
10766: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
10769: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
10770: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
10771: )
10772: THEN
10773: xla_ae_lines_pkg.BflowUpgEntry
10774: (p_business_method_code => l_bflow_method_code
10775: ,p_business_class_code => l_bflow_class_code
10776: ,p_balance_type => l_balance_type_code);
10777: ELSE
10775: ,p_business_class_code => l_bflow_class_code
10776: ,p_balance_type => l_balance_type_code);
10777: ELSE
10778: NULL;
10779: XLA_AE_LINES_PKG.business_flow_validation(
10780: p_business_method_code => l_bflow_method_code
10781: ,p_business_class_code => l_bflow_class_code
10782: ,p_inherit_description_flag => l_inherit_desc_flag);
10783: END IF;
10789: --
10790: -- call description
10791: --
10792:
10793: xla_ae_lines_pkg.SetLineDescription(
10794: p_ae_header_id => l_ae_header_id
10795: ,p_description => Description_2 (
10796: p_application_id => p_application_id
10797: , p_ae_header_id => l_ae_header_id
10835: xla_accounting_err_pkg.build_message
10836: (p_appli_s_name => 'XLA'
10837: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
10838: ,p_token_1 => 'LINE_NUMBER'
10839: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
10840: ,p_token_2 => 'LINE_TYPE_NAME'
10841: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
10842: l_component_type
10843: ,l_component_code
10871: --
10872: --
10873: ------------------------------------------------------------------------------------------------
10874: -- 4219869 Business Flow
10875: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
10876: -- Prior Entry. Currently, the following code is always generated.
10877: ------------------------------------------------------------------------------------------------
10878: -- No ValidateCurrentLine for business flow method of Prior Entry
10879:
10880: ------------------------------------------------------------------------------------
10881: -- 4219869 Business Flow
10882: -- Populated credit and debit amounts -- Need to generate this within IF
10883: ------------------------------------------------------------------------------------
10884: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
10885:
10886: ----------------------------------------------------------------------------------
10887: -- 4219869 Business Flow
10888: -- Update journal entry status -- Need to generate this within IF
10912: -- To allow MPA report to determine if it should generate report process
10913: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
10914: ------------------------------------------------------------------------------------------
10915:
10916: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
10917: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
10918:
10919: --
10920: -- Update the line information that should be overwritten
10913: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
10914: ------------------------------------------------------------------------------------------
10915:
10916: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
10917: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
10918:
10919: --
10920: -- Update the line information that should be overwritten
10921: --
10918:
10919: --
10920: -- Update the line information that should be overwritten
10921: --
10922: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
10923: p_header_num => 1);
10924: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
10925:
10926: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10920: -- Update the line information that should be overwritten
10921: --
10922: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
10923: p_header_num => 1);
10924: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
10925:
10926: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10927:
10928: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
10922: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
10923: p_header_num => 1);
10924: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
10925:
10926: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10927:
10928: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
10929: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
10930: END IF;
10925:
10926: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10927:
10928: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
10929: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
10930: END IF;
10931:
10932: --
10933: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
10932: --
10933: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
10934: --
10935: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
10936: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
10937: ELSE
10938: ---------------------------------------------------------------------------------------------------
10939: -- 4262811a Switch Sign
10940: ---------------------------------------------------------------------------------------------------
10937: ELSE
10938: ---------------------------------------------------------------------------------------------------
10939: -- 4262811a Switch Sign
10940: ---------------------------------------------------------------------------------------------------
10941: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10942: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10943: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10944: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10945: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10938: ---------------------------------------------------------------------------------------------------
10939: -- 4262811a Switch Sign
10940: ---------------------------------------------------------------------------------------------------
10941: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10942: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10943: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10944: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10945: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10946: -- 5132302
10939: -- 4262811a Switch Sign
10940: ---------------------------------------------------------------------------------------------------
10941: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10942: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10943: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10944: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10945: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10946: -- 5132302
10947: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10940: ---------------------------------------------------------------------------------------------------
10941: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10942: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10943: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10944: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10945: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10946: -- 5132302
10947: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10948: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10941: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10942: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10943: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10944: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10945: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10946: -- 5132302
10947: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10948: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10949:
10943: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10944: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10945: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10946: -- 5132302
10947: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10948: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10949:
10950: END IF;
10951:
10944: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10945: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10946: -- 5132302
10947: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10948: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10949:
10950: END IF;
10951:
10952: -- 4955764
10949:
10950: END IF;
10951:
10952: -- 4955764
10953: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10954: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
10955:
10956:
10957: XLA_AE_LINES_PKG.ValidateCurrentLine;
10953: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10954: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
10955:
10956:
10957: XLA_AE_LINES_PKG.ValidateCurrentLine;
10958: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
10959:
10960: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
10961: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
10954: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
10955:
10956:
10957: XLA_AE_LINES_PKG.ValidateCurrentLine;
10958: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
10959:
10960: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
10961: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
10962: ,p_balance_type_code => l_balance_type_code);
11134: --
11135: -- bulk performance
11136: --
11137: l_balance_type_code VARCHAR2(1);
11138: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
11139: l_log_module VARCHAR2(240);
11140:
11141: --
11142: -- Upgrade strategy
11231: ') = 'D'
11232: THEN
11233:
11234: --
11235: XLA_AE_LINES_PKG.SetNewLine;
11236:
11237: p_balance_type_code := l_balance_type_code;
11238: -- set the flag so later we will know whether the gain loss line needs to be created
11239:
11243:
11244: --
11245: -- bulk performance
11246: --
11247: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
11248: p_header_num => 0); -- 4262811
11249: --
11250: -- set accounting line options
11251: --
11248: p_header_num => 0); -- 4262811
11249: --
11250: -- set accounting line options
11251: --
11252: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
11253: p_natural_side_code => 'D'
11254: , p_gain_or_loss_flag => 'N'
11255: , p_gl_transfer_mode_code => 'S'
11256: , p_acct_entry_type_code => 'E'
11262: --
11263: --
11264: -- set accounting line type info
11265: --
11266: xla_ae_lines_pkg.SetAcctLineType
11267: (p_component_type => l_component_type
11268: ,p_event_type_code => l_event_type_code
11269: ,p_line_definition_owner_code => l_line_definition_owner_code
11270: ,p_line_definition_code => l_line_definition_code
11276: ,p_event_class_code => l_event_class_code);
11277: --
11278: -- set accounting class
11279: --
11280: xla_ae_lines_pkg.SetAcctClass(
11281: p_accounting_class_code => 'PO_PA_BURDEN'
11282: , p_ae_header_id => l_ae_header_id
11283: );
11284:
11284:
11285: --
11286: -- set rounding class
11287: --
11288: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
11289: 'PO_PA_BURDEN';
11290:
11291: --
11292: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11288: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
11289: 'PO_PA_BURDEN';
11290:
11291: --
11292: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11293: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11294: --
11295: -- bulk performance
11296: --
11289: 'PO_PA_BURDEN';
11290:
11291: --
11292: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11293: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11294: --
11295: -- bulk performance
11296: --
11297: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11293: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11294: --
11295: -- bulk performance
11296: --
11297: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11298:
11299: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
11300: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
11301:
11295: -- bulk performance
11296: --
11297: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11298:
11299: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
11300: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
11301:
11302: -- 4955764
11303: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11299: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
11300: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
11301:
11302: -- 4955764
11303: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11304: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
11305:
11306: -- 4458381 Public Sector Enh
11307:
11381: l_rec_acct_attrs.array_num_value(34) := p_source_39;
11382: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
11383: l_rec_acct_attrs.array_num_value(35) := p_source_40;
11384:
11385: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
11386: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
11387:
11388: ---------------------------------------------------------------------------------------------------------------
11389: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11382: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
11383: l_rec_acct_attrs.array_num_value(35) := p_source_40;
11384:
11385: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
11386: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
11387:
11388: ---------------------------------------------------------------------------------------------------------------
11389: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11390: ---------------------------------------------------------------------------------------------------------------
11385: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
11386: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
11387:
11388: ---------------------------------------------------------------------------------------------------------------
11389: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11390: ---------------------------------------------------------------------------------------------------------------
11391: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11392:
11393: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11387:
11388: ---------------------------------------------------------------------------------------------------------------
11389: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11390: ---------------------------------------------------------------------------------------------------------------
11391: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11392:
11393: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11394: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11395:
11389: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11390: ---------------------------------------------------------------------------------------------------------------
11391: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11392:
11393: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11394: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11395:
11396: IF xla_accounting_cache_pkg.GetValueChar
11397: (p_source_code => 'LEDGER_CATEGORY_CODE'
11390: ---------------------------------------------------------------------------------------------------------------
11391: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11392:
11393: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11394: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11395:
11396: IF xla_accounting_cache_pkg.GetValueChar
11397: (p_source_code => 'LEDGER_CATEGORY_CODE'
11398: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
11401: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
11402: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
11403: )
11404: THEN
11405: xla_ae_lines_pkg.BflowUpgEntry
11406: (p_business_method_code => l_bflow_method_code
11407: ,p_business_class_code => l_bflow_class_code
11408: ,p_balance_type => l_balance_type_code);
11409: ELSE
11407: ,p_business_class_code => l_bflow_class_code
11408: ,p_balance_type => l_balance_type_code);
11409: ELSE
11410: NULL;
11411: XLA_AE_LINES_PKG.business_flow_validation(
11412: p_business_method_code => l_bflow_method_code
11413: ,p_business_class_code => l_bflow_class_code
11414: ,p_inherit_description_flag => l_inherit_desc_flag);
11415: END IF;
11421: --
11422: -- call description
11423: --
11424:
11425: xla_ae_lines_pkg.SetLineDescription(
11426: p_ae_header_id => l_ae_header_id
11427: ,p_description => Description_2 (
11428: p_application_id => p_application_id
11429: , p_ae_header_id => l_ae_header_id
11467: xla_accounting_err_pkg.build_message
11468: (p_appli_s_name => 'XLA'
11469: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
11470: ,p_token_1 => 'LINE_NUMBER'
11471: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
11472: ,p_token_2 => 'LINE_TYPE_NAME'
11473: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
11474: l_component_type
11475: ,l_component_code
11503: --
11504: --
11505: ------------------------------------------------------------------------------------------------
11506: -- 4219869 Business Flow
11507: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
11508: -- Prior Entry. Currently, the following code is always generated.
11509: ------------------------------------------------------------------------------------------------
11510: -- No ValidateCurrentLine for business flow method of Prior Entry
11511:
11512: ------------------------------------------------------------------------------------
11513: -- 4219869 Business Flow
11514: -- Populated credit and debit amounts -- Need to generate this within IF
11515: ------------------------------------------------------------------------------------
11516: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
11517:
11518: ----------------------------------------------------------------------------------
11519: -- 4219869 Business Flow
11520: -- Update journal entry status -- Need to generate this within IF
11544: -- To allow MPA report to determine if it should generate report process
11545: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
11546: ------------------------------------------------------------------------------------------
11547:
11548: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
11549: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
11550:
11551: --
11552: -- Update the line information that should be overwritten
11545: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
11546: ------------------------------------------------------------------------------------------
11547:
11548: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
11549: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
11550:
11551: --
11552: -- Update the line information that should be overwritten
11553: --
11550:
11551: --
11552: -- Update the line information that should be overwritten
11553: --
11554: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
11555: p_header_num => 1);
11556: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
11557:
11558: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
11552: -- Update the line information that should be overwritten
11553: --
11554: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
11555: p_header_num => 1);
11556: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
11557:
11558: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
11559:
11560: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
11554: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
11555: p_header_num => 1);
11556: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
11557:
11558: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
11559:
11560: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
11561: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
11562: END IF;
11557:
11558: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
11559:
11560: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
11561: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
11562: END IF;
11563:
11564: --
11565: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
11564: --
11565: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
11566: --
11567: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
11568: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
11569: ELSE
11570: ---------------------------------------------------------------------------------------------------
11571: -- 4262811a Switch Sign
11572: ---------------------------------------------------------------------------------------------------
11569: ELSE
11570: ---------------------------------------------------------------------------------------------------
11571: -- 4262811a Switch Sign
11572: ---------------------------------------------------------------------------------------------------
11573: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11574: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11575: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11576: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11577: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11570: ---------------------------------------------------------------------------------------------------
11571: -- 4262811a Switch Sign
11572: ---------------------------------------------------------------------------------------------------
11573: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11574: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11575: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11576: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11577: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11578: -- 5132302
11571: -- 4262811a Switch Sign
11572: ---------------------------------------------------------------------------------------------------
11573: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11574: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11575: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11576: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11577: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11578: -- 5132302
11579: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11572: ---------------------------------------------------------------------------------------------------
11573: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11574: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11575: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11576: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11577: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11578: -- 5132302
11579: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11580: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11573: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11574: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11575: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11576: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11577: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11578: -- 5132302
11579: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11580: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11581:
11575: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11576: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11577: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11578: -- 5132302
11579: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11580: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11581:
11582: END IF;
11583:
11576: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11577: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11578: -- 5132302
11579: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11580: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11581:
11582: END IF;
11583:
11584: -- 4955764
11581:
11582: END IF;
11583:
11584: -- 4955764
11585: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11586: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
11587:
11588:
11589: XLA_AE_LINES_PKG.ValidateCurrentLine;
11585: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11586: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
11587:
11588:
11589: XLA_AE_LINES_PKG.ValidateCurrentLine;
11590: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
11591:
11592: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
11593: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
11586: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
11587:
11588:
11589: XLA_AE_LINES_PKG.ValidateCurrentLine;
11590: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
11591:
11592: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
11593: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
11594: ,p_balance_type_code => l_balance_type_code);
11737: --
11738: -- bulk performance
11739: --
11740: l_balance_type_code VARCHAR2(1);
11741: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
11742: l_log_module VARCHAR2(240);
11743:
11744: --
11745: -- Upgrade strategy
11821: ') = 'B_PA')
11822: THEN
11823:
11824: --
11825: XLA_AE_LINES_PKG.SetNewLine;
11826:
11827: p_balance_type_code := l_balance_type_code;
11828: -- set the flag so later we will know whether the gain loss line needs to be created
11829:
11833:
11834: --
11835: -- bulk performance
11836: --
11837: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
11838: p_header_num => 0); -- 4262811
11839: --
11840: -- set accounting line options
11841: --
11838: p_header_num => 0); -- 4262811
11839: --
11840: -- set accounting line options
11841: --
11842: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
11843: p_natural_side_code => 'C'
11844: , p_gain_or_loss_flag => 'N'
11845: , p_gl_transfer_mode_code => 'S'
11846: , p_acct_entry_type_code => 'E'
11852: --
11853: --
11854: -- set accounting line type info
11855: --
11856: xla_ae_lines_pkg.SetAcctLineType
11857: (p_component_type => l_component_type
11858: ,p_event_type_code => l_event_type_code
11859: ,p_line_definition_owner_code => l_line_definition_owner_code
11860: ,p_line_definition_code => l_line_definition_code
11866: ,p_event_class_code => l_event_class_code);
11867: --
11868: -- set accounting class
11869: --
11870: xla_ae_lines_pkg.SetAcctClass(
11871: p_accounting_class_code => 'PURCHASE_ORDER'
11872: , p_ae_header_id => l_ae_header_id
11873: );
11874:
11874:
11875: --
11876: -- set rounding class
11877: --
11878: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
11879: 'PURCHASE_ORDER';
11880:
11881: --
11882: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11878: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
11879: 'PURCHASE_ORDER';
11880:
11881: --
11882: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11883: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11884: --
11885: -- bulk performance
11886: --
11879: 'PURCHASE_ORDER';
11880:
11881: --
11882: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11883: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11884: --
11885: -- bulk performance
11886: --
11887: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11883: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11884: --
11885: -- bulk performance
11886: --
11887: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11888:
11889: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
11890: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
11891:
11885: -- bulk performance
11886: --
11887: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11888:
11889: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
11890: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
11891:
11892: -- 4955764
11893: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11889: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
11890: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
11891:
11892: -- 4955764
11893: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11894: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
11895:
11896: -- 4458381 Public Sector Enh
11897:
11973: l_rec_acct_attrs.array_num_value(30) := p_source_61;
11974: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
11975: l_rec_acct_attrs.array_num_value(31) := p_source_61;
11976:
11977: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
11978: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
11979:
11980: ---------------------------------------------------------------------------------------------------------------
11981: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11974: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
11975: l_rec_acct_attrs.array_num_value(31) := p_source_61;
11976:
11977: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
11978: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
11979:
11980: ---------------------------------------------------------------------------------------------------------------
11981: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11982: ---------------------------------------------------------------------------------------------------------------
11977: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
11978: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
11979:
11980: ---------------------------------------------------------------------------------------------------------------
11981: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11982: ---------------------------------------------------------------------------------------------------------------
11983: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11984:
11985: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11979:
11980: ---------------------------------------------------------------------------------------------------------------
11981: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11982: ---------------------------------------------------------------------------------------------------------------
11983: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11984:
11985: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11986: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11987:
11981: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11982: ---------------------------------------------------------------------------------------------------------------
11983: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11984:
11985: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11986: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11987:
11988: IF xla_accounting_cache_pkg.GetValueChar
11989: (p_source_code => 'LEDGER_CATEGORY_CODE'
11982: ---------------------------------------------------------------------------------------------------------------
11983: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11984:
11985: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11986: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11987:
11988: IF xla_accounting_cache_pkg.GetValueChar
11989: (p_source_code => 'LEDGER_CATEGORY_CODE'
11990: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
11993: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
11994: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
11995: )
11996: THEN
11997: xla_ae_lines_pkg.BflowUpgEntry
11998: (p_business_method_code => l_bflow_method_code
11999: ,p_business_class_code => l_bflow_class_code
12000: ,p_balance_type => l_balance_type_code);
12001: ELSE
11999: ,p_business_class_code => l_bflow_class_code
12000: ,p_balance_type => l_balance_type_code);
12001: ELSE
12002: NULL;
12003: XLA_AE_LINES_PKG.business_flow_validation(
12004: p_business_method_code => l_bflow_method_code
12005: ,p_business_class_code => l_bflow_class_code
12006: ,p_inherit_description_flag => l_inherit_desc_flag);
12007: END IF;
12046: xla_accounting_err_pkg.build_message
12047: (p_appli_s_name => 'XLA'
12048: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
12049: ,p_token_1 => 'LINE_NUMBER'
12050: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
12051: ,p_token_2 => 'LINE_TYPE_NAME'
12052: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
12053: l_component_type
12054: ,l_component_code
12082: --
12083: --
12084: ------------------------------------------------------------------------------------------------
12085: -- 4219869 Business Flow
12086: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
12087: -- Prior Entry. Currently, the following code is always generated.
12088: ------------------------------------------------------------------------------------------------
12089: -- No ValidateCurrentLine for business flow method of Prior Entry
12090:
12091: ------------------------------------------------------------------------------------
12092: -- 4219869 Business Flow
12093: -- Populated credit and debit amounts -- Need to generate this within IF
12094: ------------------------------------------------------------------------------------
12095: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
12096:
12097: ----------------------------------------------------------------------------------
12098: -- 4219869 Business Flow
12099: -- Update journal entry status -- Need to generate this within IF
12123: -- To allow MPA report to determine if it should generate report process
12124: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
12125: ------------------------------------------------------------------------------------------
12126:
12127: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
12128: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
12129:
12130: --
12131: -- Update the line information that should be overwritten
12124: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
12125: ------------------------------------------------------------------------------------------
12126:
12127: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
12128: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
12129:
12130: --
12131: -- Update the line information that should be overwritten
12132: --
12129:
12130: --
12131: -- Update the line information that should be overwritten
12132: --
12133: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12134: p_header_num => 1);
12135: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12136:
12137: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12131: -- Update the line information that should be overwritten
12132: --
12133: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12134: p_header_num => 1);
12135: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12136:
12137: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12138:
12139: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12133: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12134: p_header_num => 1);
12135: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12136:
12137: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12138:
12139: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12140: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
12141: END IF;
12136:
12137: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12138:
12139: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12140: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
12141: END IF;
12142:
12143: --
12144: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
12143: --
12144: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
12145: --
12146: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
12147: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
12148: ELSE
12149: ---------------------------------------------------------------------------------------------------
12150: -- 4262811a Switch Sign
12151: ---------------------------------------------------------------------------------------------------
12148: ELSE
12149: ---------------------------------------------------------------------------------------------------
12150: -- 4262811a Switch Sign
12151: ---------------------------------------------------------------------------------------------------
12152: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12153: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12154: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12155: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12156: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12149: ---------------------------------------------------------------------------------------------------
12150: -- 4262811a Switch Sign
12151: ---------------------------------------------------------------------------------------------------
12152: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12153: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12154: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12155: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12156: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12157: -- 5132302
12150: -- 4262811a Switch Sign
12151: ---------------------------------------------------------------------------------------------------
12152: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12153: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12154: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12155: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12156: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12157: -- 5132302
12158: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12151: ---------------------------------------------------------------------------------------------------
12152: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12153: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12154: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12155: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12156: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12157: -- 5132302
12158: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12159: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12152: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12153: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12154: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12155: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12156: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12157: -- 5132302
12158: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12159: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12160:
12154: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12155: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12156: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12157: -- 5132302
12158: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12159: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12160:
12161: END IF;
12162:
12155: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12156: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12157: -- 5132302
12158: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12159: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12160:
12161: END IF;
12162:
12163: -- 4955764
12160:
12161: END IF;
12162:
12163: -- 4955764
12164: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12165: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12166:
12167:
12168: XLA_AE_LINES_PKG.ValidateCurrentLine;
12164: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12165: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12166:
12167:
12168: XLA_AE_LINES_PKG.ValidateCurrentLine;
12169: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
12170:
12171: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
12172: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
12165: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12166:
12167:
12168: XLA_AE_LINES_PKG.ValidateCurrentLine;
12169: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
12170:
12171: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
12172: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
12173: ,p_balance_type_code => l_balance_type_code);
12316: --
12317: -- bulk performance
12318: --
12319: l_balance_type_code VARCHAR2(1);
12320: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
12321: l_log_module VARCHAR2(240);
12322:
12323: --
12324: -- Upgrade strategy
12407: ') = 'B_PA')
12408: THEN
12409:
12410: --
12411: XLA_AE_LINES_PKG.SetNewLine;
12412:
12413: p_balance_type_code := l_balance_type_code;
12414: -- set the flag so later we will know whether the gain loss line needs to be created
12415:
12419:
12420: --
12421: -- bulk performance
12422: --
12423: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
12424: p_header_num => 0); -- 4262811
12425: --
12426: -- set accounting line options
12427: --
12424: p_header_num => 0); -- 4262811
12425: --
12426: -- set accounting line options
12427: --
12428: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
12429: p_natural_side_code => 'D'
12430: , p_gain_or_loss_flag => 'N'
12431: , p_gl_transfer_mode_code => 'S'
12432: , p_acct_entry_type_code => 'E'
12438: --
12439: --
12440: -- set accounting line type info
12441: --
12442: xla_ae_lines_pkg.SetAcctLineType
12443: (p_component_type => l_component_type
12444: ,p_event_type_code => l_event_type_code
12445: ,p_line_definition_owner_code => l_line_definition_owner_code
12446: ,p_line_definition_code => l_line_definition_code
12452: ,p_event_class_code => l_event_class_code);
12453: --
12454: -- set accounting class
12455: --
12456: xla_ae_lines_pkg.SetAcctClass(
12457: p_accounting_class_code => 'PURCHASE_ORDER'
12458: , p_ae_header_id => l_ae_header_id
12459: );
12460:
12460:
12461: --
12462: -- set rounding class
12463: --
12464: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
12465: 'PURCHASE_ORDER';
12466:
12467: --
12468: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
12464: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
12465: 'PURCHASE_ORDER';
12466:
12467: --
12468: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
12469: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
12470: --
12471: -- bulk performance
12472: --
12465: 'PURCHASE_ORDER';
12466:
12467: --
12468: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
12469: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
12470: --
12471: -- bulk performance
12472: --
12473: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
12469: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
12470: --
12471: -- bulk performance
12472: --
12473: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
12474:
12475: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
12476: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
12477:
12471: -- bulk performance
12472: --
12473: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
12474:
12475: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
12476: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
12477:
12478: -- 4955764
12479: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12475: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
12476: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
12477:
12478: -- 4955764
12479: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12480: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
12481:
12482: -- 4458381 Public Sector Enh
12483:
12559: l_rec_acct_attrs.array_num_value(30) := p_source_61;
12560: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
12561: l_rec_acct_attrs.array_num_value(31) := p_source_61;
12562:
12563: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
12564: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
12565:
12566: ---------------------------------------------------------------------------------------------------------------
12567: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12560: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
12561: l_rec_acct_attrs.array_num_value(31) := p_source_61;
12562:
12563: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
12564: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
12565:
12566: ---------------------------------------------------------------------------------------------------------------
12567: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12568: ---------------------------------------------------------------------------------------------------------------
12563: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
12564: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
12565:
12566: ---------------------------------------------------------------------------------------------------------------
12567: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12568: ---------------------------------------------------------------------------------------------------------------
12569: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12570:
12571: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12565:
12566: ---------------------------------------------------------------------------------------------------------------
12567: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12568: ---------------------------------------------------------------------------------------------------------------
12569: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12570:
12571: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12572: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12573:
12567: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12568: ---------------------------------------------------------------------------------------------------------------
12569: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12570:
12571: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12572: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12573:
12574: IF xla_accounting_cache_pkg.GetValueChar
12575: (p_source_code => 'LEDGER_CATEGORY_CODE'
12568: ---------------------------------------------------------------------------------------------------------------
12569: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12570:
12571: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12572: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12573:
12574: IF xla_accounting_cache_pkg.GetValueChar
12575: (p_source_code => 'LEDGER_CATEGORY_CODE'
12576: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
12579: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
12580: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
12581: )
12582: THEN
12583: xla_ae_lines_pkg.BflowUpgEntry
12584: (p_business_method_code => l_bflow_method_code
12585: ,p_business_class_code => l_bflow_class_code
12586: ,p_balance_type => l_balance_type_code);
12587: ELSE
12585: ,p_business_class_code => l_bflow_class_code
12586: ,p_balance_type => l_balance_type_code);
12587: ELSE
12588: NULL;
12589: XLA_AE_LINES_PKG.business_flow_validation(
12590: p_business_method_code => l_bflow_method_code
12591: ,p_business_class_code => l_bflow_class_code
12592: ,p_inherit_description_flag => l_inherit_desc_flag);
12593: END IF;
12632: xla_accounting_err_pkg.build_message
12633: (p_appli_s_name => 'XLA'
12634: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
12635: ,p_token_1 => 'LINE_NUMBER'
12636: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
12637: ,p_token_2 => 'LINE_TYPE_NAME'
12638: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
12639: l_component_type
12640: ,l_component_code
12668: --
12669: --
12670: ------------------------------------------------------------------------------------------------
12671: -- 4219869 Business Flow
12672: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
12673: -- Prior Entry. Currently, the following code is always generated.
12674: ------------------------------------------------------------------------------------------------
12675: -- No ValidateCurrentLine for business flow method of Prior Entry
12676:
12677: ------------------------------------------------------------------------------------
12678: -- 4219869 Business Flow
12679: -- Populated credit and debit amounts -- Need to generate this within IF
12680: ------------------------------------------------------------------------------------
12681: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
12682:
12683: ----------------------------------------------------------------------------------
12684: -- 4219869 Business Flow
12685: -- Update journal entry status -- Need to generate this within IF
12709: -- To allow MPA report to determine if it should generate report process
12710: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
12711: ------------------------------------------------------------------------------------------
12712:
12713: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
12714: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
12715:
12716: --
12717: -- Update the line information that should be overwritten
12710: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
12711: ------------------------------------------------------------------------------------------
12712:
12713: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
12714: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
12715:
12716: --
12717: -- Update the line information that should be overwritten
12718: --
12715:
12716: --
12717: -- Update the line information that should be overwritten
12718: --
12719: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12720: p_header_num => 1);
12721: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12722:
12723: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12717: -- Update the line information that should be overwritten
12718: --
12719: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12720: p_header_num => 1);
12721: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12722:
12723: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12724:
12725: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12719: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12720: p_header_num => 1);
12721: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12722:
12723: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12724:
12725: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12726: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
12727: END IF;
12722:
12723: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12724:
12725: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12726: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
12727: END IF;
12728:
12729: --
12730: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
12729: --
12730: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
12731: --
12732: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
12733: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
12734: ELSE
12735: ---------------------------------------------------------------------------------------------------
12736: -- 4262811a Switch Sign
12737: ---------------------------------------------------------------------------------------------------
12734: ELSE
12735: ---------------------------------------------------------------------------------------------------
12736: -- 4262811a Switch Sign
12737: ---------------------------------------------------------------------------------------------------
12738: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12739: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12740: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12741: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12742: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12735: ---------------------------------------------------------------------------------------------------
12736: -- 4262811a Switch Sign
12737: ---------------------------------------------------------------------------------------------------
12738: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12739: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12740: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12741: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12742: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12743: -- 5132302
12736: -- 4262811a Switch Sign
12737: ---------------------------------------------------------------------------------------------------
12738: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12739: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12740: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12741: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12742: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12743: -- 5132302
12744: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12737: ---------------------------------------------------------------------------------------------------
12738: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12739: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12740: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12741: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12742: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12743: -- 5132302
12744: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12745: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12738: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12739: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12740: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12741: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12742: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12743: -- 5132302
12744: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12745: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12746:
12740: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12741: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12742: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12743: -- 5132302
12744: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12745: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12746:
12747: END IF;
12748:
12741: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12742: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12743: -- 5132302
12744: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12745: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12746:
12747: END IF;
12748:
12749: -- 4955764
12746:
12747: END IF;
12748:
12749: -- 4955764
12750: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12751: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12752:
12753:
12754: XLA_AE_LINES_PKG.ValidateCurrentLine;
12750: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12751: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12752:
12753:
12754: XLA_AE_LINES_PKG.ValidateCurrentLine;
12755: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
12756:
12757: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
12758: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
12751: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12752:
12753:
12754: XLA_AE_LINES_PKG.ValidateCurrentLine;
12755: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
12756:
12757: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
12758: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
12759: ,p_balance_type_code => l_balance_type_code);
12931: --
12932: -- bulk performance
12933: --
12934: l_balance_type_code VARCHAR2(1);
12935: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
12936: l_log_module VARCHAR2(240);
12937:
12938: --
12939: -- Upgrade strategy
13021: ') = 'S'
13022: THEN
13023:
13024: --
13025: XLA_AE_LINES_PKG.SetNewLine;
13026:
13027: p_balance_type_code := l_balance_type_code;
13028: -- set the flag so later we will know whether the gain loss line needs to be created
13029:
13033:
13034: --
13035: -- bulk performance
13036: --
13037: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
13038: p_header_num => 0); -- 4262811
13039: --
13040: -- set accounting line options
13041: --
13038: p_header_num => 0); -- 4262811
13039: --
13040: -- set accounting line options
13041: --
13042: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
13043: p_natural_side_code => 'C'
13044: , p_gain_or_loss_flag => 'N'
13045: , p_gl_transfer_mode_code => 'S'
13046: , p_acct_entry_type_code => 'E'
13052: --
13053: --
13054: -- set accounting line type info
13055: --
13056: xla_ae_lines_pkg.SetAcctLineType
13057: (p_component_type => l_component_type
13058: ,p_event_type_code => l_event_type_code
13059: ,p_line_definition_owner_code => l_line_definition_owner_code
13060: ,p_line_definition_code => l_line_definition_code
13066: ,p_event_class_code => l_event_class_code);
13067: --
13068: -- set accounting class
13069: --
13070: xla_ae_lines_pkg.SetAcctClass(
13071: p_accounting_class_code => 'REQ_PA_BURDENED'
13072: , p_ae_header_id => l_ae_header_id
13073: );
13074:
13074:
13075: --
13076: -- set rounding class
13077: --
13078: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
13079: 'REQ_PA_BURDENED';
13080:
13081: --
13082: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
13078: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
13079: 'REQ_PA_BURDENED';
13080:
13081: --
13082: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
13083: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
13084: --
13085: -- bulk performance
13086: --
13079: 'REQ_PA_BURDENED';
13080:
13081: --
13082: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
13083: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
13084: --
13085: -- bulk performance
13086: --
13087: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
13083: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
13084: --
13085: -- bulk performance
13086: --
13087: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
13088:
13089: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
13090: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
13091:
13085: -- bulk performance
13086: --
13087: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
13088:
13089: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
13090: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
13091:
13092: -- 4955764
13093: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13089: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
13090: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
13091:
13092: -- 4955764
13093: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13094: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
13095:
13096: -- 4458381 Public Sector Enh
13097: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
13093: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13094: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
13095:
13096: -- 4458381 Public Sector Enh
13097: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
13098: --
13099: -- set accounting attributes for the line type
13100: --
13101: l_entered_amt_idx := 27;
13169: l_rec_acct_attrs.array_num_value(33) := p_source_39;
13170: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
13171: l_rec_acct_attrs.array_num_value(34) := p_source_40;
13172:
13173: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
13174: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
13175:
13176: ---------------------------------------------------------------------------------------------------------------
13177: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13170: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
13171: l_rec_acct_attrs.array_num_value(34) := p_source_40;
13172:
13173: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
13174: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
13175:
13176: ---------------------------------------------------------------------------------------------------------------
13177: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13178: ---------------------------------------------------------------------------------------------------------------
13173: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
13174: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
13175:
13176: ---------------------------------------------------------------------------------------------------------------
13177: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13178: ---------------------------------------------------------------------------------------------------------------
13179: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13180:
13181: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13175:
13176: ---------------------------------------------------------------------------------------------------------------
13177: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13178: ---------------------------------------------------------------------------------------------------------------
13179: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13180:
13181: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13182: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13183:
13177: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13178: ---------------------------------------------------------------------------------------------------------------
13179: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13180:
13181: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13182: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13183:
13184: IF xla_accounting_cache_pkg.GetValueChar
13185: (p_source_code => 'LEDGER_CATEGORY_CODE'
13178: ---------------------------------------------------------------------------------------------------------------
13179: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13180:
13181: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13182: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13183:
13184: IF xla_accounting_cache_pkg.GetValueChar
13185: (p_source_code => 'LEDGER_CATEGORY_CODE'
13186: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
13189: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
13190: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
13191: )
13192: THEN
13193: xla_ae_lines_pkg.BflowUpgEntry
13194: (p_business_method_code => l_bflow_method_code
13195: ,p_business_class_code => l_bflow_class_code
13196: ,p_balance_type => l_balance_type_code);
13197: ELSE
13206: --
13207: -- call description
13208: --
13209:
13210: xla_ae_lines_pkg.SetLineDescription(
13211: p_ae_header_id => l_ae_header_id
13212: ,p_description => Description_2 (
13213: p_application_id => p_application_id
13214: , p_ae_header_id => l_ae_header_id
13242: , x_value_type_code => l_adr_value_type_code
13243: , p_side => 'NA'
13244: );
13245:
13246: xla_ae_lines_pkg.set_ccid(
13247: p_code_combination_id => l_ccid
13248: , p_value_type_code => l_adr_value_type_code
13249: , p_transaction_coa_id => l_adr_transaction_coa_id
13250: , p_accounting_coa_id => l_adr_accounting_coa_id
13278: xla_accounting_err_pkg.build_message
13279: (p_appli_s_name => 'XLA'
13280: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
13281: ,p_token_1 => 'LINE_NUMBER'
13282: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
13283: ,p_token_2 => 'LINE_TYPE_NAME'
13284: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
13285: l_component_type
13286: ,l_component_code
13314: --
13315: --
13316: ------------------------------------------------------------------------------------------------
13317: -- 4219869 Business Flow
13318: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
13319: -- Prior Entry. Currently, the following code is always generated.
13320: ------------------------------------------------------------------------------------------------
13321: XLA_AE_LINES_PKG.ValidateCurrentLine;
13322:
13317: -- 4219869 Business Flow
13318: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
13319: -- Prior Entry. Currently, the following code is always generated.
13320: ------------------------------------------------------------------------------------------------
13321: XLA_AE_LINES_PKG.ValidateCurrentLine;
13322:
13323: ------------------------------------------------------------------------------------
13324: -- 4219869 Business Flow
13325: -- Populated credit and debit amounts -- Need to generate this within IF
13323: ------------------------------------------------------------------------------------
13324: -- 4219869 Business Flow
13325: -- Populated credit and debit amounts -- Need to generate this within IF
13326: ------------------------------------------------------------------------------------
13327: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
13328:
13329: ----------------------------------------------------------------------------------
13330: -- 4219869 Business Flow
13331: -- Update journal entry status -- Need to generate this within IF
13355: -- To allow MPA report to determine if it should generate report process
13356: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
13357: ------------------------------------------------------------------------------------------
13358:
13359: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
13360: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
13361:
13362: --
13363: -- Update the line information that should be overwritten
13356: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
13357: ------------------------------------------------------------------------------------------
13358:
13359: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
13360: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
13361:
13362: --
13363: -- Update the line information that should be overwritten
13364: --
13361:
13362: --
13363: -- Update the line information that should be overwritten
13364: --
13365: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
13366: p_header_num => 1);
13367: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
13368:
13369: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
13363: -- Update the line information that should be overwritten
13364: --
13365: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
13366: p_header_num => 1);
13367: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
13368:
13369: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
13370:
13371: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
13365: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
13366: p_header_num => 1);
13367: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
13368:
13369: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
13370:
13371: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
13372: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
13373: END IF;
13368:
13369: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
13370:
13371: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
13372: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
13373: END IF;
13374:
13375: --
13376: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
13375: --
13376: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
13377: --
13378: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
13379: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
13380: ELSE
13381: ---------------------------------------------------------------------------------------------------
13382: -- 4262811a Switch Sign
13383: ---------------------------------------------------------------------------------------------------
13380: ELSE
13381: ---------------------------------------------------------------------------------------------------
13382: -- 4262811a Switch Sign
13383: ---------------------------------------------------------------------------------------------------
13384: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13385: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13386: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13387: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13388: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13381: ---------------------------------------------------------------------------------------------------
13382: -- 4262811a Switch Sign
13383: ---------------------------------------------------------------------------------------------------
13384: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13385: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13386: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13387: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13388: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13389: -- 5132302
13382: -- 4262811a Switch Sign
13383: ---------------------------------------------------------------------------------------------------
13384: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13385: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13386: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13387: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13388: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13389: -- 5132302
13390: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13383: ---------------------------------------------------------------------------------------------------
13384: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13385: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13386: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13387: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13388: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13389: -- 5132302
13390: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13391: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13384: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13385: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13386: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13387: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13388: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13389: -- 5132302
13390: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13391: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13392:
13386: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13387: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13388: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13389: -- 5132302
13390: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13391: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13392:
13393: END IF;
13394:
13387: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13388: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13389: -- 5132302
13390: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13391: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13392:
13393: END IF;
13394:
13395: -- 4955764
13392:
13393: END IF;
13394:
13395: -- 4955764
13396: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13397: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
13398:
13399:
13400: XLA_AE_LINES_PKG.ValidateCurrentLine;
13396: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13397: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
13398:
13399:
13400: XLA_AE_LINES_PKG.ValidateCurrentLine;
13401: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
13402:
13403: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
13404: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
13397: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
13398:
13399:
13400: XLA_AE_LINES_PKG.ValidateCurrentLine;
13401: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
13402:
13403: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
13404: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
13405: ,p_balance_type_code => l_balance_type_code);
13577: --
13578: -- bulk performance
13579: --
13580: l_balance_type_code VARCHAR2(1);
13581: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
13582: l_log_module VARCHAR2(240);
13583:
13584: --
13585: -- Upgrade strategy
13676: ') <> 'Y'
13677: THEN
13678:
13679: --
13680: XLA_AE_LINES_PKG.SetNewLine;
13681:
13682: p_balance_type_code := l_balance_type_code;
13683: -- set the flag so later we will know whether the gain loss line needs to be created
13684:
13688:
13689: --
13690: -- bulk performance
13691: --
13692: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
13693: p_header_num => 0); -- 4262811
13694: --
13695: -- set accounting line options
13696: --
13693: p_header_num => 0); -- 4262811
13694: --
13695: -- set accounting line options
13696: --
13697: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
13698: p_natural_side_code => 'D'
13699: , p_gain_or_loss_flag => 'N'
13700: , p_gl_transfer_mode_code => 'S'
13701: , p_acct_entry_type_code => 'E'
13707: --
13708: --
13709: -- set accounting line type info
13710: --
13711: xla_ae_lines_pkg.SetAcctLineType
13712: (p_component_type => l_component_type
13713: ,p_event_type_code => l_event_type_code
13714: ,p_line_definition_owner_code => l_line_definition_owner_code
13715: ,p_line_definition_code => l_line_definition_code
13721: ,p_event_class_code => l_event_class_code);
13722: --
13723: -- set accounting class
13724: --
13725: xla_ae_lines_pkg.SetAcctClass(
13726: p_accounting_class_code => 'REQ_PA_BURDENED'
13727: , p_ae_header_id => l_ae_header_id
13728: );
13729:
13729:
13730: --
13731: -- set rounding class
13732: --
13733: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
13734: 'REQ_PA_BURDENED';
13735:
13736: --
13737: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
13733: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
13734: 'REQ_PA_BURDENED';
13735:
13736: --
13737: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
13738: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
13739: --
13740: -- bulk performance
13741: --
13734: 'REQ_PA_BURDENED';
13735:
13736: --
13737: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
13738: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
13739: --
13740: -- bulk performance
13741: --
13742: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
13738: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
13739: --
13740: -- bulk performance
13741: --
13742: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
13743:
13744: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
13745: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
13746:
13740: -- bulk performance
13741: --
13742: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
13743:
13744: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
13745: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
13746:
13747: -- 4955764
13748: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13744: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
13745: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
13746:
13747: -- 4955764
13748: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13749: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
13750:
13751: -- 4458381 Public Sector Enh
13752:
13824: l_rec_acct_attrs.array_num_value(33) := p_source_39;
13825: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
13826: l_rec_acct_attrs.array_num_value(34) := p_source_40;
13827:
13828: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
13829: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
13830:
13831: ---------------------------------------------------------------------------------------------------------------
13832: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13825: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
13826: l_rec_acct_attrs.array_num_value(34) := p_source_40;
13827:
13828: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
13829: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
13830:
13831: ---------------------------------------------------------------------------------------------------------------
13832: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13833: ---------------------------------------------------------------------------------------------------------------
13828: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
13829: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
13830:
13831: ---------------------------------------------------------------------------------------------------------------
13832: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13833: ---------------------------------------------------------------------------------------------------------------
13834: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13835:
13836: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13830:
13831: ---------------------------------------------------------------------------------------------------------------
13832: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13833: ---------------------------------------------------------------------------------------------------------------
13834: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13835:
13836: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13837: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13838:
13832: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13833: ---------------------------------------------------------------------------------------------------------------
13834: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13835:
13836: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13837: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13838:
13839: IF xla_accounting_cache_pkg.GetValueChar
13840: (p_source_code => 'LEDGER_CATEGORY_CODE'
13833: ---------------------------------------------------------------------------------------------------------------
13834: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13835:
13836: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13837: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13838:
13839: IF xla_accounting_cache_pkg.GetValueChar
13840: (p_source_code => 'LEDGER_CATEGORY_CODE'
13841: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
13844: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
13845: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
13846: )
13847: THEN
13848: xla_ae_lines_pkg.BflowUpgEntry
13849: (p_business_method_code => l_bflow_method_code
13850: ,p_business_class_code => l_bflow_class_code
13851: ,p_balance_type => l_balance_type_code);
13852: ELSE
13850: ,p_business_class_code => l_bflow_class_code
13851: ,p_balance_type => l_balance_type_code);
13852: ELSE
13853: NULL;
13854: XLA_AE_LINES_PKG.business_flow_validation(
13855: p_business_method_code => l_bflow_method_code
13856: ,p_business_class_code => l_bflow_class_code
13857: ,p_inherit_description_flag => l_inherit_desc_flag);
13858: END IF;
13864: --
13865: -- call description
13866: --
13867:
13868: xla_ae_lines_pkg.SetLineDescription(
13869: p_ae_header_id => l_ae_header_id
13870: ,p_description => Description_2 (
13871: p_application_id => p_application_id
13872: , p_ae_header_id => l_ae_header_id
13910: xla_accounting_err_pkg.build_message
13911: (p_appli_s_name => 'XLA'
13912: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
13913: ,p_token_1 => 'LINE_NUMBER'
13914: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
13915: ,p_token_2 => 'LINE_TYPE_NAME'
13916: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
13917: l_component_type
13918: ,l_component_code
13946: --
13947: --
13948: ------------------------------------------------------------------------------------------------
13949: -- 4219869 Business Flow
13950: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
13951: -- Prior Entry. Currently, the following code is always generated.
13952: ------------------------------------------------------------------------------------------------
13953: -- No ValidateCurrentLine for business flow method of Prior Entry
13954:
13955: ------------------------------------------------------------------------------------
13956: -- 4219869 Business Flow
13957: -- Populated credit and debit amounts -- Need to generate this within IF
13958: ------------------------------------------------------------------------------------
13959: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
13960:
13961: ----------------------------------------------------------------------------------
13962: -- 4219869 Business Flow
13963: -- Update journal entry status -- Need to generate this within IF
13987: -- To allow MPA report to determine if it should generate report process
13988: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
13989: ------------------------------------------------------------------------------------------
13990:
13991: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
13992: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
13993:
13994: --
13995: -- Update the line information that should be overwritten
13988: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
13989: ------------------------------------------------------------------------------------------
13990:
13991: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
13992: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
13993:
13994: --
13995: -- Update the line information that should be overwritten
13996: --
13993:
13994: --
13995: -- Update the line information that should be overwritten
13996: --
13997: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
13998: p_header_num => 1);
13999: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
14000:
14001: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
13995: -- Update the line information that should be overwritten
13996: --
13997: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
13998: p_header_num => 1);
13999: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
14000:
14001: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
14002:
14003: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
13997: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
13998: p_header_num => 1);
13999: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
14000:
14001: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
14002:
14003: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
14004: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
14005: END IF;
14000:
14001: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
14002:
14003: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
14004: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
14005: END IF;
14006:
14007: --
14008: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
14007: --
14008: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
14009: --
14010: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
14011: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
14012: ELSE
14013: ---------------------------------------------------------------------------------------------------
14014: -- 4262811a Switch Sign
14015: ---------------------------------------------------------------------------------------------------
14012: ELSE
14013: ---------------------------------------------------------------------------------------------------
14014: -- 4262811a Switch Sign
14015: ---------------------------------------------------------------------------------------------------
14016: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14017: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14018: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14019: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14020: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14013: ---------------------------------------------------------------------------------------------------
14014: -- 4262811a Switch Sign
14015: ---------------------------------------------------------------------------------------------------
14016: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14017: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14018: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14019: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14020: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14021: -- 5132302
14014: -- 4262811a Switch Sign
14015: ---------------------------------------------------------------------------------------------------
14016: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14017: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14018: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14019: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14020: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14021: -- 5132302
14022: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14015: ---------------------------------------------------------------------------------------------------
14016: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14017: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14018: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14019: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14020: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14021: -- 5132302
14022: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14023: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14016: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14017: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14018: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14019: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14020: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14021: -- 5132302
14022: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14023: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14024:
14018: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14019: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14020: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14021: -- 5132302
14022: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14023: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14024:
14025: END IF;
14026:
14019: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14020: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14021: -- 5132302
14022: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14023: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14024:
14025: END IF;
14026:
14027: -- 4955764
14024:
14025: END IF;
14026:
14027: -- 4955764
14028: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
14029: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
14030:
14031:
14032: XLA_AE_LINES_PKG.ValidateCurrentLine;
14028: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
14029: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
14030:
14031:
14032: XLA_AE_LINES_PKG.ValidateCurrentLine;
14033: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
14034:
14035: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
14036: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
14029: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
14030:
14031:
14032: XLA_AE_LINES_PKG.ValidateCurrentLine;
14033: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
14034:
14035: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
14036: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
14037: ,p_balance_type_code => l_balance_type_code);
14209: --
14210: -- bulk performance
14211: --
14212: l_balance_type_code VARCHAR2(1);
14213: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
14214: l_log_module VARCHAR2(240);
14215:
14216: --
14217: -- Upgrade strategy
14299: ') = 'S'
14300: THEN
14301:
14302: --
14303: XLA_AE_LINES_PKG.SetNewLine;
14304:
14305: p_balance_type_code := l_balance_type_code;
14306: -- set the flag so later we will know whether the gain loss line needs to be created
14307:
14311:
14312: --
14313: -- bulk performance
14314: --
14315: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
14316: p_header_num => 0); -- 4262811
14317: --
14318: -- set accounting line options
14319: --
14316: p_header_num => 0); -- 4262811
14317: --
14318: -- set accounting line options
14319: --
14320: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
14321: p_natural_side_code => 'C'
14322: , p_gain_or_loss_flag => 'N'
14323: , p_gl_transfer_mode_code => 'S'
14324: , p_acct_entry_type_code => 'E'
14330: --
14331: --
14332: -- set accounting line type info
14333: --
14334: xla_ae_lines_pkg.SetAcctLineType
14335: (p_component_type => l_component_type
14336: ,p_event_type_code => l_event_type_code
14337: ,p_line_definition_owner_code => l_line_definition_owner_code
14338: ,p_line_definition_code => l_line_definition_code
14344: ,p_event_class_code => l_event_class_code);
14345: --
14346: -- set accounting class
14347: --
14348: xla_ae_lines_pkg.SetAcctClass(
14349: p_accounting_class_code => 'REQ_PA_BURDENED'
14350: , p_ae_header_id => l_ae_header_id
14351: );
14352:
14352:
14353: --
14354: -- set rounding class
14355: --
14356: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
14357: 'REQ_PA_BURDENED';
14358:
14359: --
14360: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
14356: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
14357: 'REQ_PA_BURDENED';
14358:
14359: --
14360: 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_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
14362: --
14363: -- bulk performance
14364: --
14357: 'REQ_PA_BURDENED';
14358:
14359: --
14360: 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_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
14362: --
14363: -- bulk performance
14364: --
14365: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
14361: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
14362: --
14363: -- bulk performance
14364: --
14365: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
14366:
14367: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
14368: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
14369:
14363: -- bulk performance
14364: --
14365: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
14366:
14367: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
14368: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
14369:
14370: -- 4955764
14371: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
14367: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
14368: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
14369:
14370: -- 4955764
14371: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
14372: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
14373:
14374: -- 4458381 Public Sector Enh
14375:
14449: l_rec_acct_attrs.array_num_value(34) := p_source_39;
14450: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
14451: l_rec_acct_attrs.array_num_value(35) := p_source_40;
14452:
14453: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
14454: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
14455:
14456: ---------------------------------------------------------------------------------------------------------------
14457: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
14450: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
14451: l_rec_acct_attrs.array_num_value(35) := p_source_40;
14452:
14453: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
14454: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
14455:
14456: ---------------------------------------------------------------------------------------------------------------
14457: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
14458: ---------------------------------------------------------------------------------------------------------------
14453: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
14454: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
14455:
14456: ---------------------------------------------------------------------------------------------------------------
14457: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
14458: ---------------------------------------------------------------------------------------------------------------
14459: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
14460:
14461: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14455:
14456: ---------------------------------------------------------------------------------------------------------------
14457: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
14458: ---------------------------------------------------------------------------------------------------------------
14459: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
14460:
14461: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14462: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14463:
14457: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
14458: ---------------------------------------------------------------------------------------------------------------
14459: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
14460:
14461: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14462: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14463:
14464: IF xla_accounting_cache_pkg.GetValueChar
14465: (p_source_code => 'LEDGER_CATEGORY_CODE'
14458: ---------------------------------------------------------------------------------------------------------------
14459: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
14460:
14461: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14462: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14463:
14464: IF xla_accounting_cache_pkg.GetValueChar
14465: (p_source_code => 'LEDGER_CATEGORY_CODE'
14466: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
14469: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
14470: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
14471: )
14472: THEN
14473: xla_ae_lines_pkg.BflowUpgEntry
14474: (p_business_method_code => l_bflow_method_code
14475: ,p_business_class_code => l_bflow_class_code
14476: ,p_balance_type => l_balance_type_code);
14477: ELSE
14475: ,p_business_class_code => l_bflow_class_code
14476: ,p_balance_type => l_balance_type_code);
14477: ELSE
14478: NULL;
14479: XLA_AE_LINES_PKG.business_flow_validation(
14480: p_business_method_code => l_bflow_method_code
14481: ,p_business_class_code => l_bflow_class_code
14482: ,p_inherit_description_flag => l_inherit_desc_flag);
14483: END IF;
14489: --
14490: -- call description
14491: --
14492:
14493: xla_ae_lines_pkg.SetLineDescription(
14494: p_ae_header_id => l_ae_header_id
14495: ,p_description => Description_2 (
14496: p_application_id => p_application_id
14497: , p_ae_header_id => l_ae_header_id
14535: xla_accounting_err_pkg.build_message
14536: (p_appli_s_name => 'XLA'
14537: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
14538: ,p_token_1 => 'LINE_NUMBER'
14539: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
14540: ,p_token_2 => 'LINE_TYPE_NAME'
14541: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
14542: l_component_type
14543: ,l_component_code
14571: --
14572: --
14573: ------------------------------------------------------------------------------------------------
14574: -- 4219869 Business Flow
14575: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
14576: -- Prior Entry. Currently, the following code is always generated.
14577: ------------------------------------------------------------------------------------------------
14578: -- No ValidateCurrentLine for business flow method of Prior Entry
14579:
14580: ------------------------------------------------------------------------------------
14581: -- 4219869 Business Flow
14582: -- Populated credit and debit amounts -- Need to generate this within IF
14583: ------------------------------------------------------------------------------------
14584: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
14585:
14586: ----------------------------------------------------------------------------------
14587: -- 4219869 Business Flow
14588: -- Update journal entry status -- Need to generate this within IF
14612: -- To allow MPA report to determine if it should generate report process
14613: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
14614: ------------------------------------------------------------------------------------------
14615:
14616: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
14617: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
14618:
14619: --
14620: -- Update the line information that should be overwritten
14613: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
14614: ------------------------------------------------------------------------------------------
14615:
14616: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
14617: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
14618:
14619: --
14620: -- Update the line information that should be overwritten
14621: --
14618:
14619: --
14620: -- Update the line information that should be overwritten
14621: --
14622: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
14623: p_header_num => 1);
14624: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
14625:
14626: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
14620: -- Update the line information that should be overwritten
14621: --
14622: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
14623: p_header_num => 1);
14624: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
14625:
14626: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
14627:
14628: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
14622: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
14623: p_header_num => 1);
14624: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
14625:
14626: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
14627:
14628: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
14629: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
14630: END IF;
14625:
14626: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
14627:
14628: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
14629: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
14630: END IF;
14631:
14632: --
14633: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
14632: --
14633: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
14634: --
14635: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
14636: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
14637: ELSE
14638: ---------------------------------------------------------------------------------------------------
14639: -- 4262811a Switch Sign
14640: ---------------------------------------------------------------------------------------------------
14637: ELSE
14638: ---------------------------------------------------------------------------------------------------
14639: -- 4262811a Switch Sign
14640: ---------------------------------------------------------------------------------------------------
14641: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14642: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14643: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14644: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14645: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14638: ---------------------------------------------------------------------------------------------------
14639: -- 4262811a Switch Sign
14640: ---------------------------------------------------------------------------------------------------
14641: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14642: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14643: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14644: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14645: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14646: -- 5132302
14639: -- 4262811a Switch Sign
14640: ---------------------------------------------------------------------------------------------------
14641: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14642: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14643: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14644: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14645: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14646: -- 5132302
14647: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14640: ---------------------------------------------------------------------------------------------------
14641: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14642: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14643: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14644: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14645: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14646: -- 5132302
14647: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14648: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14641: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14642: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14643: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14644: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14645: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14646: -- 5132302
14647: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14648: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14649:
14643: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14644: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14645: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14646: -- 5132302
14647: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14648: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14649:
14650: END IF;
14651:
14644: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14645: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14646: -- 5132302
14647: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14648: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14649:
14650: END IF;
14651:
14652: -- 4955764
14649:
14650: END IF;
14651:
14652: -- 4955764
14653: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
14654: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
14655:
14656:
14657: XLA_AE_LINES_PKG.ValidateCurrentLine;
14653: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
14654: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
14655:
14656:
14657: XLA_AE_LINES_PKG.ValidateCurrentLine;
14658: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
14659:
14660: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
14661: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
14654: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
14655:
14656:
14657: XLA_AE_LINES_PKG.ValidateCurrentLine;
14658: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
14659:
14660: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
14661: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
14662: ,p_balance_type_code => l_balance_type_code);
14834: --
14835: -- bulk performance
14836: --
14837: l_balance_type_code VARCHAR2(1);
14838: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
14839: l_log_module VARCHAR2(240);
14840:
14841: --
14842: -- Upgrade strategy
14931: ') = 'S'
14932: THEN
14933:
14934: --
14935: XLA_AE_LINES_PKG.SetNewLine;
14936:
14937: p_balance_type_code := l_balance_type_code;
14938: -- set the flag so later we will know whether the gain loss line needs to be created
14939:
14943:
14944: --
14945: -- bulk performance
14946: --
14947: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
14948: p_header_num => 0); -- 4262811
14949: --
14950: -- set accounting line options
14951: --
14948: p_header_num => 0); -- 4262811
14949: --
14950: -- set accounting line options
14951: --
14952: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
14953: p_natural_side_code => 'D'
14954: , p_gain_or_loss_flag => 'N'
14955: , p_gl_transfer_mode_code => 'S'
14956: , p_acct_entry_type_code => 'E'
14962: --
14963: --
14964: -- set accounting line type info
14965: --
14966: xla_ae_lines_pkg.SetAcctLineType
14967: (p_component_type => l_component_type
14968: ,p_event_type_code => l_event_type_code
14969: ,p_line_definition_owner_code => l_line_definition_owner_code
14970: ,p_line_definition_code => l_line_definition_code
14976: ,p_event_class_code => l_event_class_code);
14977: --
14978: -- set accounting class
14979: --
14980: xla_ae_lines_pkg.SetAcctClass(
14981: p_accounting_class_code => 'REQ_PA_BURDENED'
14982: , p_ae_header_id => l_ae_header_id
14983: );
14984:
14984:
14985: --
14986: -- set rounding class
14987: --
14988: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
14989: 'REQ_PA_BURDENED';
14990:
14991: --
14992: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
14988: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
14989: 'REQ_PA_BURDENED';
14990:
14991: --
14992: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
14993: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
14994: --
14995: -- bulk performance
14996: --
14989: 'REQ_PA_BURDENED';
14990:
14991: --
14992: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
14993: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
14994: --
14995: -- bulk performance
14996: --
14997: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
14993: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
14994: --
14995: -- bulk performance
14996: --
14997: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
14998:
14999: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
15000: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
15001:
14995: -- bulk performance
14996: --
14997: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
14998:
14999: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
15000: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
15001:
15002: -- 4955764
15003: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
14999: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
15000: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
15001:
15002: -- 4955764
15003: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
15004: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
15005:
15006: -- 4458381 Public Sector Enh
15007:
15081: l_rec_acct_attrs.array_num_value(34) := p_source_39;
15082: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
15083: l_rec_acct_attrs.array_num_value(35) := p_source_40;
15084:
15085: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
15086: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
15087:
15088: ---------------------------------------------------------------------------------------------------------------
15089: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15082: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
15083: l_rec_acct_attrs.array_num_value(35) := p_source_40;
15084:
15085: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
15086: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
15087:
15088: ---------------------------------------------------------------------------------------------------------------
15089: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15090: ---------------------------------------------------------------------------------------------------------------
15085: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
15086: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
15087:
15088: ---------------------------------------------------------------------------------------------------------------
15089: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15090: ---------------------------------------------------------------------------------------------------------------
15091: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
15092:
15093: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15087:
15088: ---------------------------------------------------------------------------------------------------------------
15089: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15090: ---------------------------------------------------------------------------------------------------------------
15091: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
15092:
15093: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15094: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15095:
15089: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15090: ---------------------------------------------------------------------------------------------------------------
15091: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
15092:
15093: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15094: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15095:
15096: IF xla_accounting_cache_pkg.GetValueChar
15097: (p_source_code => 'LEDGER_CATEGORY_CODE'
15090: ---------------------------------------------------------------------------------------------------------------
15091: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
15092:
15093: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15094: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15095:
15096: IF xla_accounting_cache_pkg.GetValueChar
15097: (p_source_code => 'LEDGER_CATEGORY_CODE'
15098: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
15101: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
15102: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
15103: )
15104: THEN
15105: xla_ae_lines_pkg.BflowUpgEntry
15106: (p_business_method_code => l_bflow_method_code
15107: ,p_business_class_code => l_bflow_class_code
15108: ,p_balance_type => l_balance_type_code);
15109: ELSE
15107: ,p_business_class_code => l_bflow_class_code
15108: ,p_balance_type => l_balance_type_code);
15109: ELSE
15110: NULL;
15111: XLA_AE_LINES_PKG.business_flow_validation(
15112: p_business_method_code => l_bflow_method_code
15113: ,p_business_class_code => l_bflow_class_code
15114: ,p_inherit_description_flag => l_inherit_desc_flag);
15115: END IF;
15121: --
15122: -- call description
15123: --
15124:
15125: xla_ae_lines_pkg.SetLineDescription(
15126: p_ae_header_id => l_ae_header_id
15127: ,p_description => Description_2 (
15128: p_application_id => p_application_id
15129: , p_ae_header_id => l_ae_header_id
15167: xla_accounting_err_pkg.build_message
15168: (p_appli_s_name => 'XLA'
15169: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
15170: ,p_token_1 => 'LINE_NUMBER'
15171: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
15172: ,p_token_2 => 'LINE_TYPE_NAME'
15173: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
15174: l_component_type
15175: ,l_component_code
15203: --
15204: --
15205: ------------------------------------------------------------------------------------------------
15206: -- 4219869 Business Flow
15207: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
15208: -- Prior Entry. Currently, the following code is always generated.
15209: ------------------------------------------------------------------------------------------------
15210: -- No ValidateCurrentLine for business flow method of Prior Entry
15211:
15212: ------------------------------------------------------------------------------------
15213: -- 4219869 Business Flow
15214: -- Populated credit and debit amounts -- Need to generate this within IF
15215: ------------------------------------------------------------------------------------
15216: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
15217:
15218: ----------------------------------------------------------------------------------
15219: -- 4219869 Business Flow
15220: -- Update journal entry status -- Need to generate this within IF
15244: -- To allow MPA report to determine if it should generate report process
15245: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
15246: ------------------------------------------------------------------------------------------
15247:
15248: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
15249: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
15250:
15251: --
15252: -- Update the line information that should be overwritten
15245: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
15246: ------------------------------------------------------------------------------------------
15247:
15248: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
15249: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
15250:
15251: --
15252: -- Update the line information that should be overwritten
15253: --
15250:
15251: --
15252: -- Update the line information that should be overwritten
15253: --
15254: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
15255: p_header_num => 1);
15256: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
15257:
15258: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15252: -- Update the line information that should be overwritten
15253: --
15254: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
15255: p_header_num => 1);
15256: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
15257:
15258: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15259:
15260: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
15254: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
15255: p_header_num => 1);
15256: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
15257:
15258: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15259:
15260: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
15261: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
15262: END IF;
15257:
15258: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15259:
15260: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
15261: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
15262: END IF;
15263:
15264: --
15265: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
15264: --
15265: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
15266: --
15267: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
15268: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
15269: ELSE
15270: ---------------------------------------------------------------------------------------------------
15271: -- 4262811a Switch Sign
15272: ---------------------------------------------------------------------------------------------------
15269: ELSE
15270: ---------------------------------------------------------------------------------------------------
15271: -- 4262811a Switch Sign
15272: ---------------------------------------------------------------------------------------------------
15273: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15274: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15275: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15276: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15277: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15270: ---------------------------------------------------------------------------------------------------
15271: -- 4262811a Switch Sign
15272: ---------------------------------------------------------------------------------------------------
15273: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15274: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15275: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15276: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15277: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15278: -- 5132302
15271: -- 4262811a Switch Sign
15272: ---------------------------------------------------------------------------------------------------
15273: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15274: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15275: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15276: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15277: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15278: -- 5132302
15279: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15272: ---------------------------------------------------------------------------------------------------
15273: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15274: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15275: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15276: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15277: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15278: -- 5132302
15279: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15280: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15273: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15274: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15275: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15276: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15277: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15278: -- 5132302
15279: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15280: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15281:
15275: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15276: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15277: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15278: -- 5132302
15279: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15280: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15281:
15282: END IF;
15283:
15276: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15277: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15278: -- 5132302
15279: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15280: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15281:
15282: END IF;
15283:
15284: -- 4955764
15281:
15282: END IF;
15283:
15284: -- 4955764
15285: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
15286: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
15287:
15288:
15289: XLA_AE_LINES_PKG.ValidateCurrentLine;
15285: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
15286: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
15287:
15288:
15289: XLA_AE_LINES_PKG.ValidateCurrentLine;
15290: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
15291:
15292: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
15293: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
15286: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
15287:
15288:
15289: XLA_AE_LINES_PKG.ValidateCurrentLine;
15290: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
15291:
15292: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
15293: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
15294: ,p_balance_type_code => l_balance_type_code);
15466: --
15467: -- bulk performance
15468: --
15469: l_balance_type_code VARCHAR2(1);
15470: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
15471: l_log_module VARCHAR2(240);
15472:
15473: --
15474: -- Upgrade strategy
15554: ') = 'D'
15555: THEN
15556:
15557: --
15558: XLA_AE_LINES_PKG.SetNewLine;
15559:
15560: p_balance_type_code := l_balance_type_code;
15561: -- set the flag so later we will know whether the gain loss line needs to be created
15562:
15566:
15567: --
15568: -- bulk performance
15569: --
15570: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
15571: p_header_num => 0); -- 4262811
15572: --
15573: -- set accounting line options
15574: --
15571: p_header_num => 0); -- 4262811
15572: --
15573: -- set accounting line options
15574: --
15575: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
15576: p_natural_side_code => 'C'
15577: , p_gain_or_loss_flag => 'N'
15578: , p_gl_transfer_mode_code => 'S'
15579: , p_acct_entry_type_code => 'E'
15585: --
15586: --
15587: -- set accounting line type info
15588: --
15589: xla_ae_lines_pkg.SetAcctLineType
15590: (p_component_type => l_component_type
15591: ,p_event_type_code => l_event_type_code
15592: ,p_line_definition_owner_code => l_line_definition_owner_code
15593: ,p_line_definition_code => l_line_definition_code
15599: ,p_event_class_code => l_event_class_code);
15600: --
15601: -- set accounting class
15602: --
15603: xla_ae_lines_pkg.SetAcctClass(
15604: p_accounting_class_code => 'REQ_PA_BURDEN'
15605: , p_ae_header_id => l_ae_header_id
15606: );
15607:
15607:
15608: --
15609: -- set rounding class
15610: --
15611: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
15612: 'REQ_PA_BURDEN';
15613:
15614: --
15615: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
15611: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
15612: 'REQ_PA_BURDEN';
15613:
15614: --
15615: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
15616: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
15617: --
15618: -- bulk performance
15619: --
15612: 'REQ_PA_BURDEN';
15613:
15614: --
15615: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
15616: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
15617: --
15618: -- bulk performance
15619: --
15620: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
15616: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
15617: --
15618: -- bulk performance
15619: --
15620: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
15621:
15622: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
15623: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
15624:
15618: -- bulk performance
15619: --
15620: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
15621:
15622: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
15623: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
15624:
15625: -- 4955764
15626: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
15622: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
15623: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
15624:
15625: -- 4955764
15626: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
15627: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
15628:
15629: -- 4458381 Public Sector Enh
15630:
15704: l_rec_acct_attrs.array_num_value(34) := p_source_39;
15705: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
15706: l_rec_acct_attrs.array_num_value(35) := p_source_40;
15707:
15708: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
15709: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
15710:
15711: ---------------------------------------------------------------------------------------------------------------
15712: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15705: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
15706: l_rec_acct_attrs.array_num_value(35) := p_source_40;
15707:
15708: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
15709: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
15710:
15711: ---------------------------------------------------------------------------------------------------------------
15712: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15713: ---------------------------------------------------------------------------------------------------------------
15708: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
15709: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
15710:
15711: ---------------------------------------------------------------------------------------------------------------
15712: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15713: ---------------------------------------------------------------------------------------------------------------
15714: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
15715:
15716: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15710:
15711: ---------------------------------------------------------------------------------------------------------------
15712: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15713: ---------------------------------------------------------------------------------------------------------------
15714: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
15715:
15716: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15717: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15718:
15712: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15713: ---------------------------------------------------------------------------------------------------------------
15714: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
15715:
15716: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15717: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15718:
15719: IF xla_accounting_cache_pkg.GetValueChar
15720: (p_source_code => 'LEDGER_CATEGORY_CODE'
15713: ---------------------------------------------------------------------------------------------------------------
15714: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
15715:
15716: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15717: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15718:
15719: IF xla_accounting_cache_pkg.GetValueChar
15720: (p_source_code => 'LEDGER_CATEGORY_CODE'
15721: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
15724: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
15725: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
15726: )
15727: THEN
15728: xla_ae_lines_pkg.BflowUpgEntry
15729: (p_business_method_code => l_bflow_method_code
15730: ,p_business_class_code => l_bflow_class_code
15731: ,p_balance_type => l_balance_type_code);
15732: ELSE
15730: ,p_business_class_code => l_bflow_class_code
15731: ,p_balance_type => l_balance_type_code);
15732: ELSE
15733: NULL;
15734: XLA_AE_LINES_PKG.business_flow_validation(
15735: p_business_method_code => l_bflow_method_code
15736: ,p_business_class_code => l_bflow_class_code
15737: ,p_inherit_description_flag => l_inherit_desc_flag);
15738: END IF;
15744: --
15745: -- call description
15746: --
15747:
15748: xla_ae_lines_pkg.SetLineDescription(
15749: p_ae_header_id => l_ae_header_id
15750: ,p_description => Description_2 (
15751: p_application_id => p_application_id
15752: , p_ae_header_id => l_ae_header_id
15790: xla_accounting_err_pkg.build_message
15791: (p_appli_s_name => 'XLA'
15792: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
15793: ,p_token_1 => 'LINE_NUMBER'
15794: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
15795: ,p_token_2 => 'LINE_TYPE_NAME'
15796: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
15797: l_component_type
15798: ,l_component_code
15826: --
15827: --
15828: ------------------------------------------------------------------------------------------------
15829: -- 4219869 Business Flow
15830: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
15831: -- Prior Entry. Currently, the following code is always generated.
15832: ------------------------------------------------------------------------------------------------
15833: -- No ValidateCurrentLine for business flow method of Prior Entry
15834:
15835: ------------------------------------------------------------------------------------
15836: -- 4219869 Business Flow
15837: -- Populated credit and debit amounts -- Need to generate this within IF
15838: ------------------------------------------------------------------------------------
15839: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
15840:
15841: ----------------------------------------------------------------------------------
15842: -- 4219869 Business Flow
15843: -- Update journal entry status -- Need to generate this within IF
15867: -- To allow MPA report to determine if it should generate report process
15868: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
15869: ------------------------------------------------------------------------------------------
15870:
15871: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
15872: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
15873:
15874: --
15875: -- Update the line information that should be overwritten
15868: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
15869: ------------------------------------------------------------------------------------------
15870:
15871: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
15872: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
15873:
15874: --
15875: -- Update the line information that should be overwritten
15876: --
15873:
15874: --
15875: -- Update the line information that should be overwritten
15876: --
15877: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
15878: p_header_num => 1);
15879: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
15880:
15881: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15875: -- Update the line information that should be overwritten
15876: --
15877: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
15878: p_header_num => 1);
15879: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
15880:
15881: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15882:
15883: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
15877: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
15878: p_header_num => 1);
15879: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
15880:
15881: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15882:
15883: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
15884: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
15885: END IF;
15880:
15881: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15882:
15883: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
15884: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
15885: END IF;
15886:
15887: --
15888: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
15887: --
15888: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
15889: --
15890: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
15891: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
15892: ELSE
15893: ---------------------------------------------------------------------------------------------------
15894: -- 4262811a Switch Sign
15895: ---------------------------------------------------------------------------------------------------
15892: ELSE
15893: ---------------------------------------------------------------------------------------------------
15894: -- 4262811a Switch Sign
15895: ---------------------------------------------------------------------------------------------------
15896: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15897: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15898: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15899: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15900: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15893: ---------------------------------------------------------------------------------------------------
15894: -- 4262811a Switch Sign
15895: ---------------------------------------------------------------------------------------------------
15896: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15897: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15898: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15899: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15900: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15901: -- 5132302
15894: -- 4262811a Switch Sign
15895: ---------------------------------------------------------------------------------------------------
15896: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15897: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15898: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15899: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15900: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15901: -- 5132302
15902: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15895: ---------------------------------------------------------------------------------------------------
15896: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15897: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15898: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15899: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15900: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15901: -- 5132302
15902: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15903: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15896: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15897: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15898: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15899: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15900: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15901: -- 5132302
15902: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15903: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15904:
15898: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15899: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15900: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15901: -- 5132302
15902: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15903: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15904:
15905: END IF;
15906:
15899: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15900: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15901: -- 5132302
15902: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15903: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15904:
15905: END IF;
15906:
15907: -- 4955764
15904:
15905: END IF;
15906:
15907: -- 4955764
15908: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
15909: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
15910:
15911:
15912: XLA_AE_LINES_PKG.ValidateCurrentLine;
15908: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
15909: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
15910:
15911:
15912: XLA_AE_LINES_PKG.ValidateCurrentLine;
15913: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
15914:
15915: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
15916: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
15909: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
15910:
15911:
15912: XLA_AE_LINES_PKG.ValidateCurrentLine;
15913: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
15914:
15915: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
15916: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
15917: ,p_balance_type_code => l_balance_type_code);
16089: --
16090: -- bulk performance
16091: --
16092: l_balance_type_code VARCHAR2(1);
16093: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
16094: l_log_module VARCHAR2(240);
16095:
16096: --
16097: -- Upgrade strategy
16184: ') = 'D'
16185: THEN
16186:
16187: --
16188: XLA_AE_LINES_PKG.SetNewLine;
16189:
16190: p_balance_type_code := l_balance_type_code;
16191: -- set the flag so later we will know whether the gain loss line needs to be created
16192:
16196:
16197: --
16198: -- bulk performance
16199: --
16200: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
16201: p_header_num => 0); -- 4262811
16202: --
16203: -- set accounting line options
16204: --
16201: p_header_num => 0); -- 4262811
16202: --
16203: -- set accounting line options
16204: --
16205: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
16206: p_natural_side_code => 'D'
16207: , p_gain_or_loss_flag => 'N'
16208: , p_gl_transfer_mode_code => 'S'
16209: , p_acct_entry_type_code => 'E'
16215: --
16216: --
16217: -- set accounting line type info
16218: --
16219: xla_ae_lines_pkg.SetAcctLineType
16220: (p_component_type => l_component_type
16221: ,p_event_type_code => l_event_type_code
16222: ,p_line_definition_owner_code => l_line_definition_owner_code
16223: ,p_line_definition_code => l_line_definition_code
16229: ,p_event_class_code => l_event_class_code);
16230: --
16231: -- set accounting class
16232: --
16233: xla_ae_lines_pkg.SetAcctClass(
16234: p_accounting_class_code => 'REQ_PA_BURDEN'
16235: , p_ae_header_id => l_ae_header_id
16236: );
16237:
16237:
16238: --
16239: -- set rounding class
16240: --
16241: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
16242: 'REQ_PA_BURDEN';
16243:
16244: --
16245: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
16241: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
16242: 'REQ_PA_BURDEN';
16243:
16244: --
16245: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
16246: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
16247: --
16248: -- bulk performance
16249: --
16242: 'REQ_PA_BURDEN';
16243:
16244: --
16245: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
16246: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
16247: --
16248: -- bulk performance
16249: --
16250: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
16246: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
16247: --
16248: -- bulk performance
16249: --
16250: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
16251:
16252: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
16253: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
16254:
16248: -- bulk performance
16249: --
16250: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
16251:
16252: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
16253: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
16254:
16255: -- 4955764
16256: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
16252: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
16253: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
16254:
16255: -- 4955764
16256: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
16257: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
16258:
16259: -- 4458381 Public Sector Enh
16260:
16334: l_rec_acct_attrs.array_num_value(34) := p_source_39;
16335: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
16336: l_rec_acct_attrs.array_num_value(35) := p_source_40;
16337:
16338: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
16339: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
16340:
16341: ---------------------------------------------------------------------------------------------------------------
16342: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16335: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
16336: l_rec_acct_attrs.array_num_value(35) := p_source_40;
16337:
16338: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
16339: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
16340:
16341: ---------------------------------------------------------------------------------------------------------------
16342: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16343: ---------------------------------------------------------------------------------------------------------------
16338: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
16339: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
16340:
16341: ---------------------------------------------------------------------------------------------------------------
16342: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16343: ---------------------------------------------------------------------------------------------------------------
16344: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16345:
16346: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16340:
16341: ---------------------------------------------------------------------------------------------------------------
16342: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16343: ---------------------------------------------------------------------------------------------------------------
16344: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16345:
16346: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16347: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16348:
16342: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16343: ---------------------------------------------------------------------------------------------------------------
16344: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16345:
16346: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16347: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16348:
16349: IF xla_accounting_cache_pkg.GetValueChar
16350: (p_source_code => 'LEDGER_CATEGORY_CODE'
16343: ---------------------------------------------------------------------------------------------------------------
16344: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16345:
16346: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16347: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16348:
16349: IF xla_accounting_cache_pkg.GetValueChar
16350: (p_source_code => 'LEDGER_CATEGORY_CODE'
16351: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
16354: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
16355: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
16356: )
16357: THEN
16358: xla_ae_lines_pkg.BflowUpgEntry
16359: (p_business_method_code => l_bflow_method_code
16360: ,p_business_class_code => l_bflow_class_code
16361: ,p_balance_type => l_balance_type_code);
16362: ELSE
16360: ,p_business_class_code => l_bflow_class_code
16361: ,p_balance_type => l_balance_type_code);
16362: ELSE
16363: NULL;
16364: XLA_AE_LINES_PKG.business_flow_validation(
16365: p_business_method_code => l_bflow_method_code
16366: ,p_business_class_code => l_bflow_class_code
16367: ,p_inherit_description_flag => l_inherit_desc_flag);
16368: END IF;
16374: --
16375: -- call description
16376: --
16377:
16378: xla_ae_lines_pkg.SetLineDescription(
16379: p_ae_header_id => l_ae_header_id
16380: ,p_description => Description_2 (
16381: p_application_id => p_application_id
16382: , p_ae_header_id => l_ae_header_id
16420: xla_accounting_err_pkg.build_message
16421: (p_appli_s_name => 'XLA'
16422: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
16423: ,p_token_1 => 'LINE_NUMBER'
16424: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
16425: ,p_token_2 => 'LINE_TYPE_NAME'
16426: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
16427: l_component_type
16428: ,l_component_code
16456: --
16457: --
16458: ------------------------------------------------------------------------------------------------
16459: -- 4219869 Business Flow
16460: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
16461: -- Prior Entry. Currently, the following code is always generated.
16462: ------------------------------------------------------------------------------------------------
16463: -- No ValidateCurrentLine for business flow method of Prior Entry
16464:
16465: ------------------------------------------------------------------------------------
16466: -- 4219869 Business Flow
16467: -- Populated credit and debit amounts -- Need to generate this within IF
16468: ------------------------------------------------------------------------------------
16469: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
16470:
16471: ----------------------------------------------------------------------------------
16472: -- 4219869 Business Flow
16473: -- Update journal entry status -- Need to generate this within IF
16497: -- To allow MPA report to determine if it should generate report process
16498: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
16499: ------------------------------------------------------------------------------------------
16500:
16501: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
16502: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
16503:
16504: --
16505: -- Update the line information that should be overwritten
16498: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
16499: ------------------------------------------------------------------------------------------
16500:
16501: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
16502: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
16503:
16504: --
16505: -- Update the line information that should be overwritten
16506: --
16503:
16504: --
16505: -- Update the line information that should be overwritten
16506: --
16507: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
16508: p_header_num => 1);
16509: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
16510:
16511: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
16505: -- Update the line information that should be overwritten
16506: --
16507: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
16508: p_header_num => 1);
16509: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
16510:
16511: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
16512:
16513: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
16507: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
16508: p_header_num => 1);
16509: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
16510:
16511: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
16512:
16513: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
16514: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
16515: END IF;
16510:
16511: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
16512:
16513: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
16514: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
16515: END IF;
16516:
16517: --
16518: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
16517: --
16518: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
16519: --
16520: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
16521: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
16522: ELSE
16523: ---------------------------------------------------------------------------------------------------
16524: -- 4262811a Switch Sign
16525: ---------------------------------------------------------------------------------------------------
16522: ELSE
16523: ---------------------------------------------------------------------------------------------------
16524: -- 4262811a Switch Sign
16525: ---------------------------------------------------------------------------------------------------
16526: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
16527: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16528: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16529: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16530: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16523: ---------------------------------------------------------------------------------------------------
16524: -- 4262811a Switch Sign
16525: ---------------------------------------------------------------------------------------------------
16526: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
16527: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16528: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16529: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16530: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16531: -- 5132302
16524: -- 4262811a Switch Sign
16525: ---------------------------------------------------------------------------------------------------
16526: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
16527: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16528: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16529: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16530: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16531: -- 5132302
16532: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
16525: ---------------------------------------------------------------------------------------------------
16526: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
16527: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16528: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16529: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16530: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16531: -- 5132302
16532: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
16533: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16526: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
16527: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16528: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16529: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16530: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16531: -- 5132302
16532: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
16533: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16534:
16528: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16529: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16530: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16531: -- 5132302
16532: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
16533: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16534:
16535: END IF;
16536:
16529: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16530: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16531: -- 5132302
16532: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
16533: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16534:
16535: END IF;
16536:
16537: -- 4955764
16534:
16535: END IF;
16536:
16537: -- 4955764
16538: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
16539: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
16540:
16541:
16542: XLA_AE_LINES_PKG.ValidateCurrentLine;
16538: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
16539: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
16540:
16541:
16542: XLA_AE_LINES_PKG.ValidateCurrentLine;
16543: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
16544:
16545: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
16546: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
16539: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
16540:
16541:
16542: XLA_AE_LINES_PKG.ValidateCurrentLine;
16543: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
16544:
16545: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
16546: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
16547: ,p_balance_type_code => l_balance_type_code);
16719: --
16720: -- bulk performance
16721: --
16722: l_balance_type_code VARCHAR2(1);
16723: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
16724: l_log_module VARCHAR2(240);
16725:
16726: --
16727: -- Upgrade strategy
16807: ') = 'D'
16808: THEN
16809:
16810: --
16811: XLA_AE_LINES_PKG.SetNewLine;
16812:
16813: p_balance_type_code := l_balance_type_code;
16814: -- set the flag so later we will know whether the gain loss line needs to be created
16815:
16819:
16820: --
16821: -- bulk performance
16822: --
16823: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
16824: p_header_num => 0); -- 4262811
16825: --
16826: -- set accounting line options
16827: --
16824: p_header_num => 0); -- 4262811
16825: --
16826: -- set accounting line options
16827: --
16828: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
16829: p_natural_side_code => 'C'
16830: , p_gain_or_loss_flag => 'N'
16831: , p_gl_transfer_mode_code => 'S'
16832: , p_acct_entry_type_code => 'E'
16838: --
16839: --
16840: -- set accounting line type info
16841: --
16842: xla_ae_lines_pkg.SetAcctLineType
16843: (p_component_type => l_component_type
16844: ,p_event_type_code => l_event_type_code
16845: ,p_line_definition_owner_code => l_line_definition_owner_code
16846: ,p_line_definition_code => l_line_definition_code
16852: ,p_event_class_code => l_event_class_code);
16853: --
16854: -- set accounting class
16855: --
16856: xla_ae_lines_pkg.SetAcctClass(
16857: p_accounting_class_code => 'REQ_PA_BURDEN'
16858: , p_ae_header_id => l_ae_header_id
16859: );
16860:
16860:
16861: --
16862: -- set rounding class
16863: --
16864: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
16865: 'REQ_PA_BURDEN';
16866:
16867: --
16868: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
16864: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
16865: 'REQ_PA_BURDEN';
16866:
16867: --
16868: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
16869: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
16870: --
16871: -- bulk performance
16872: --
16865: 'REQ_PA_BURDEN';
16866:
16867: --
16868: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
16869: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
16870: --
16871: -- bulk performance
16872: --
16873: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
16869: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
16870: --
16871: -- bulk performance
16872: --
16873: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
16874:
16875: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
16876: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
16877:
16871: -- bulk performance
16872: --
16873: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
16874:
16875: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
16876: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
16877:
16878: -- 4955764
16879: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
16875: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
16876: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
16877:
16878: -- 4955764
16879: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
16880: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
16881:
16882: -- 4458381 Public Sector Enh
16883: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
16879: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
16880: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
16881:
16882: -- 4458381 Public Sector Enh
16883: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
16884: --
16885: -- set accounting attributes for the line type
16886: --
16887: l_entered_amt_idx := 27;
16955: l_rec_acct_attrs.array_num_value(33) := p_source_39;
16956: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
16957: l_rec_acct_attrs.array_num_value(34) := p_source_40;
16958:
16959: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
16960: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
16961:
16962: ---------------------------------------------------------------------------------------------------------------
16963: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16956: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
16957: l_rec_acct_attrs.array_num_value(34) := p_source_40;
16958:
16959: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
16960: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
16961:
16962: ---------------------------------------------------------------------------------------------------------------
16963: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16964: ---------------------------------------------------------------------------------------------------------------
16959: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
16960: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
16961:
16962: ---------------------------------------------------------------------------------------------------------------
16963: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16964: ---------------------------------------------------------------------------------------------------------------
16965: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16966:
16967: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16961:
16962: ---------------------------------------------------------------------------------------------------------------
16963: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16964: ---------------------------------------------------------------------------------------------------------------
16965: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16966:
16967: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16968: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16969:
16963: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16964: ---------------------------------------------------------------------------------------------------------------
16965: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16966:
16967: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16968: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16969:
16970: IF xla_accounting_cache_pkg.GetValueChar
16971: (p_source_code => 'LEDGER_CATEGORY_CODE'
16964: ---------------------------------------------------------------------------------------------------------------
16965: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16966:
16967: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16968: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16969:
16970: IF xla_accounting_cache_pkg.GetValueChar
16971: (p_source_code => 'LEDGER_CATEGORY_CODE'
16972: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
16975: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
16976: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
16977: )
16978: THEN
16979: xla_ae_lines_pkg.BflowUpgEntry
16980: (p_business_method_code => l_bflow_method_code
16981: ,p_business_class_code => l_bflow_class_code
16982: ,p_balance_type => l_balance_type_code);
16983: ELSE
16992: --
16993: -- call description
16994: --
16995:
16996: xla_ae_lines_pkg.SetLineDescription(
16997: p_ae_header_id => l_ae_header_id
16998: ,p_description => Description_2 (
16999: p_application_id => p_application_id
17000: , p_ae_header_id => l_ae_header_id
17028: , x_value_type_code => l_adr_value_type_code
17029: , p_side => 'NA'
17030: );
17031:
17032: xla_ae_lines_pkg.set_ccid(
17033: p_code_combination_id => l_ccid
17034: , p_value_type_code => l_adr_value_type_code
17035: , p_transaction_coa_id => l_adr_transaction_coa_id
17036: , p_accounting_coa_id => l_adr_accounting_coa_id
17064: xla_accounting_err_pkg.build_message
17065: (p_appli_s_name => 'XLA'
17066: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
17067: ,p_token_1 => 'LINE_NUMBER'
17068: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
17069: ,p_token_2 => 'LINE_TYPE_NAME'
17070: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
17071: l_component_type
17072: ,l_component_code
17100: --
17101: --
17102: ------------------------------------------------------------------------------------------------
17103: -- 4219869 Business Flow
17104: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
17105: -- Prior Entry. Currently, the following code is always generated.
17106: ------------------------------------------------------------------------------------------------
17107: XLA_AE_LINES_PKG.ValidateCurrentLine;
17108:
17103: -- 4219869 Business Flow
17104: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
17105: -- Prior Entry. Currently, the following code is always generated.
17106: ------------------------------------------------------------------------------------------------
17107: XLA_AE_LINES_PKG.ValidateCurrentLine;
17108:
17109: ------------------------------------------------------------------------------------
17110: -- 4219869 Business Flow
17111: -- Populated credit and debit amounts -- Need to generate this within IF
17109: ------------------------------------------------------------------------------------
17110: -- 4219869 Business Flow
17111: -- Populated credit and debit amounts -- Need to generate this within IF
17112: ------------------------------------------------------------------------------------
17113: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
17114:
17115: ----------------------------------------------------------------------------------
17116: -- 4219869 Business Flow
17117: -- Update journal entry status -- Need to generate this within IF
17141: -- To allow MPA report to determine if it should generate report process
17142: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
17143: ------------------------------------------------------------------------------------------
17144:
17145: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
17146: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
17147:
17148: --
17149: -- Update the line information that should be overwritten
17142: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
17143: ------------------------------------------------------------------------------------------
17144:
17145: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
17146: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
17147:
17148: --
17149: -- Update the line information that should be overwritten
17150: --
17147:
17148: --
17149: -- Update the line information that should be overwritten
17150: --
17151: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
17152: p_header_num => 1);
17153: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
17154:
17155: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17149: -- Update the line information that should be overwritten
17150: --
17151: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
17152: p_header_num => 1);
17153: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
17154:
17155: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17156:
17157: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
17151: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
17152: p_header_num => 1);
17153: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
17154:
17155: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17156:
17157: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
17158: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
17159: END IF;
17154:
17155: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17156:
17157: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
17158: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
17159: END IF;
17160:
17161: --
17162: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
17161: --
17162: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
17163: --
17164: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
17165: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
17166: ELSE
17167: ---------------------------------------------------------------------------------------------------
17168: -- 4262811a Switch Sign
17169: ---------------------------------------------------------------------------------------------------
17166: ELSE
17167: ---------------------------------------------------------------------------------------------------
17168: -- 4262811a Switch Sign
17169: ---------------------------------------------------------------------------------------------------
17170: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17171: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17172: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17173: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17174: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17167: ---------------------------------------------------------------------------------------------------
17168: -- 4262811a Switch Sign
17169: ---------------------------------------------------------------------------------------------------
17170: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17171: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17172: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17173: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17174: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17175: -- 5132302
17168: -- 4262811a Switch Sign
17169: ---------------------------------------------------------------------------------------------------
17170: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17171: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17172: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17173: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17174: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17175: -- 5132302
17176: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17169: ---------------------------------------------------------------------------------------------------
17170: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17171: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17172: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17173: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17174: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17175: -- 5132302
17176: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17177: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17170: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17171: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17172: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17173: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17174: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17175: -- 5132302
17176: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17177: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17178:
17172: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17173: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17174: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17175: -- 5132302
17176: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17177: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17178:
17179: END IF;
17180:
17173: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17174: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17175: -- 5132302
17176: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17177: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17178:
17179: END IF;
17180:
17181: -- 4955764
17178:
17179: END IF;
17180:
17181: -- 4955764
17182: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
17183: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
17184:
17185:
17186: XLA_AE_LINES_PKG.ValidateCurrentLine;
17182: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
17183: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
17184:
17185:
17186: XLA_AE_LINES_PKG.ValidateCurrentLine;
17187: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
17188:
17189: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
17190: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
17183: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
17184:
17185:
17186: XLA_AE_LINES_PKG.ValidateCurrentLine;
17187: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
17188:
17189: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
17190: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
17191: ,p_balance_type_code => l_balance_type_code);
17363: --
17364: -- bulk performance
17365: --
17366: l_balance_type_code VARCHAR2(1);
17367: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
17368: l_log_module VARCHAR2(240);
17369:
17370: --
17371: -- Upgrade strategy
17460: ') <> 'Y'
17461: THEN
17462:
17463: --
17464: XLA_AE_LINES_PKG.SetNewLine;
17465:
17466: p_balance_type_code := l_balance_type_code;
17467: -- set the flag so later we will know whether the gain loss line needs to be created
17468:
17472:
17473: --
17474: -- bulk performance
17475: --
17476: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
17477: p_header_num => 0); -- 4262811
17478: --
17479: -- set accounting line options
17480: --
17477: p_header_num => 0); -- 4262811
17478: --
17479: -- set accounting line options
17480: --
17481: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
17482: p_natural_side_code => 'D'
17483: , p_gain_or_loss_flag => 'N'
17484: , p_gl_transfer_mode_code => 'S'
17485: , p_acct_entry_type_code => 'E'
17491: --
17492: --
17493: -- set accounting line type info
17494: --
17495: xla_ae_lines_pkg.SetAcctLineType
17496: (p_component_type => l_component_type
17497: ,p_event_type_code => l_event_type_code
17498: ,p_line_definition_owner_code => l_line_definition_owner_code
17499: ,p_line_definition_code => l_line_definition_code
17505: ,p_event_class_code => l_event_class_code);
17506: --
17507: -- set accounting class
17508: --
17509: xla_ae_lines_pkg.SetAcctClass(
17510: p_accounting_class_code => 'REQ_PA_BURDEN'
17511: , p_ae_header_id => l_ae_header_id
17512: );
17513:
17513:
17514: --
17515: -- set rounding class
17516: --
17517: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
17518: 'REQ_PA_BURDEN';
17519:
17520: --
17521: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
17517: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
17518: 'REQ_PA_BURDEN';
17519:
17520: --
17521: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
17522: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
17523: --
17524: -- bulk performance
17525: --
17518: 'REQ_PA_BURDEN';
17519:
17520: --
17521: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
17522: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
17523: --
17524: -- bulk performance
17525: --
17526: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
17522: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
17523: --
17524: -- bulk performance
17525: --
17526: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
17527:
17528: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
17529: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
17530:
17524: -- bulk performance
17525: --
17526: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
17527:
17528: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
17529: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
17530:
17531: -- 4955764
17532: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
17528: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
17529: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
17530:
17531: -- 4955764
17532: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
17533: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
17534:
17535: -- 4458381 Public Sector Enh
17536:
17608: l_rec_acct_attrs.array_num_value(33) := p_source_39;
17609: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
17610: l_rec_acct_attrs.array_num_value(34) := p_source_40;
17611:
17612: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
17613: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
17614:
17615: ---------------------------------------------------------------------------------------------------------------
17616: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17609: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
17610: l_rec_acct_attrs.array_num_value(34) := p_source_40;
17611:
17612: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
17613: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
17614:
17615: ---------------------------------------------------------------------------------------------------------------
17616: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17617: ---------------------------------------------------------------------------------------------------------------
17612: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
17613: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
17614:
17615: ---------------------------------------------------------------------------------------------------------------
17616: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17617: ---------------------------------------------------------------------------------------------------------------
17618: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
17619:
17620: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17614:
17615: ---------------------------------------------------------------------------------------------------------------
17616: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17617: ---------------------------------------------------------------------------------------------------------------
17618: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
17619:
17620: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17621: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17622:
17616: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17617: ---------------------------------------------------------------------------------------------------------------
17618: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
17619:
17620: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17621: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17622:
17623: IF xla_accounting_cache_pkg.GetValueChar
17624: (p_source_code => 'LEDGER_CATEGORY_CODE'
17617: ---------------------------------------------------------------------------------------------------------------
17618: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
17619:
17620: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17621: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17622:
17623: IF xla_accounting_cache_pkg.GetValueChar
17624: (p_source_code => 'LEDGER_CATEGORY_CODE'
17625: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
17628: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
17629: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
17630: )
17631: THEN
17632: xla_ae_lines_pkg.BflowUpgEntry
17633: (p_business_method_code => l_bflow_method_code
17634: ,p_business_class_code => l_bflow_class_code
17635: ,p_balance_type => l_balance_type_code);
17636: ELSE
17634: ,p_business_class_code => l_bflow_class_code
17635: ,p_balance_type => l_balance_type_code);
17636: ELSE
17637: NULL;
17638: XLA_AE_LINES_PKG.business_flow_validation(
17639: p_business_method_code => l_bflow_method_code
17640: ,p_business_class_code => l_bflow_class_code
17641: ,p_inherit_description_flag => l_inherit_desc_flag);
17642: END IF;
17648: --
17649: -- call description
17650: --
17651:
17652: xla_ae_lines_pkg.SetLineDescription(
17653: p_ae_header_id => l_ae_header_id
17654: ,p_description => Description_2 (
17655: p_application_id => p_application_id
17656: , p_ae_header_id => l_ae_header_id
17694: xla_accounting_err_pkg.build_message
17695: (p_appli_s_name => 'XLA'
17696: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
17697: ,p_token_1 => 'LINE_NUMBER'
17698: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
17699: ,p_token_2 => 'LINE_TYPE_NAME'
17700: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
17701: l_component_type
17702: ,l_component_code
17730: --
17731: --
17732: ------------------------------------------------------------------------------------------------
17733: -- 4219869 Business Flow
17734: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
17735: -- Prior Entry. Currently, the following code is always generated.
17736: ------------------------------------------------------------------------------------------------
17737: -- No ValidateCurrentLine for business flow method of Prior Entry
17738:
17739: ------------------------------------------------------------------------------------
17740: -- 4219869 Business Flow
17741: -- Populated credit and debit amounts -- Need to generate this within IF
17742: ------------------------------------------------------------------------------------
17743: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
17744:
17745: ----------------------------------------------------------------------------------
17746: -- 4219869 Business Flow
17747: -- Update journal entry status -- Need to generate this within IF
17771: -- To allow MPA report to determine if it should generate report process
17772: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
17773: ------------------------------------------------------------------------------------------
17774:
17775: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
17776: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
17777:
17778: --
17779: -- Update the line information that should be overwritten
17772: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
17773: ------------------------------------------------------------------------------------------
17774:
17775: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
17776: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
17777:
17778: --
17779: -- Update the line information that should be overwritten
17780: --
17777:
17778: --
17779: -- Update the line information that should be overwritten
17780: --
17781: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
17782: p_header_num => 1);
17783: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
17784:
17785: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17779: -- Update the line information that should be overwritten
17780: --
17781: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
17782: p_header_num => 1);
17783: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
17784:
17785: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17786:
17787: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
17781: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
17782: p_header_num => 1);
17783: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
17784:
17785: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17786:
17787: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
17788: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
17789: END IF;
17784:
17785: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17786:
17787: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
17788: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
17789: END IF;
17790:
17791: --
17792: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
17791: --
17792: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
17793: --
17794: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
17795: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
17796: ELSE
17797: ---------------------------------------------------------------------------------------------------
17798: -- 4262811a Switch Sign
17799: ---------------------------------------------------------------------------------------------------
17796: ELSE
17797: ---------------------------------------------------------------------------------------------------
17798: -- 4262811a Switch Sign
17799: ---------------------------------------------------------------------------------------------------
17800: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17801: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17802: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17803: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17804: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17797: ---------------------------------------------------------------------------------------------------
17798: -- 4262811a Switch Sign
17799: ---------------------------------------------------------------------------------------------------
17800: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17801: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17802: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17803: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17804: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17805: -- 5132302
17798: -- 4262811a Switch Sign
17799: ---------------------------------------------------------------------------------------------------
17800: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17801: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17802: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17803: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17804: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17805: -- 5132302
17806: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17799: ---------------------------------------------------------------------------------------------------
17800: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17801: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17802: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17803: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17804: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17805: -- 5132302
17806: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17807: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17800: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17801: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17802: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17803: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17804: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17805: -- 5132302
17806: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17807: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17808:
17802: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17803: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17804: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17805: -- 5132302
17806: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17807: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17808:
17809: END IF;
17810:
17803: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17804: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17805: -- 5132302
17806: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17807: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17808:
17809: END IF;
17810:
17811: -- 4955764
17808:
17809: END IF;
17810:
17811: -- 4955764
17812: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
17813: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
17814:
17815:
17816: XLA_AE_LINES_PKG.ValidateCurrentLine;
17812: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
17813: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
17814:
17815:
17816: XLA_AE_LINES_PKG.ValidateCurrentLine;
17817: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
17818:
17819: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
17820: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
17813: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
17814:
17815:
17816: XLA_AE_LINES_PKG.ValidateCurrentLine;
17817: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
17818:
17819: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
17820: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
17821: ,p_balance_type_code => l_balance_type_code);
17995: --
17996: -- bulk performance
17997: --
17998: l_balance_type_code VARCHAR2(1);
17999: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
18000: l_log_module VARCHAR2(240);
18001:
18002: --
18003: -- Upgrade strategy
18094: ') = 'Y'
18095: THEN
18096:
18097: --
18098: XLA_AE_LINES_PKG.SetNewLine;
18099:
18100: p_balance_type_code := l_balance_type_code;
18101: -- set the flag so later we will know whether the gain loss line needs to be created
18102:
18106:
18107: --
18108: -- bulk performance
18109: --
18110: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
18111: p_header_num => 0); -- 4262811
18112: --
18113: -- set accounting line options
18114: --
18111: p_header_num => 0); -- 4262811
18112: --
18113: -- set accounting line options
18114: --
18115: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
18116: p_natural_side_code => 'D'
18117: , p_gain_or_loss_flag => 'N'
18118: , p_gl_transfer_mode_code => 'S'
18119: , p_acct_entry_type_code => 'E'
18125: --
18126: --
18127: -- set accounting line type info
18128: --
18129: xla_ae_lines_pkg.SetAcctLineType
18130: (p_component_type => l_component_type
18131: ,p_event_type_code => l_event_type_code
18132: ,p_line_definition_owner_code => l_line_definition_owner_code
18133: ,p_line_definition_code => l_line_definition_code
18139: ,p_event_class_code => l_event_class_code);
18140: --
18141: -- set accounting class
18142: --
18143: xla_ae_lines_pkg.SetAcctClass(
18144: p_accounting_class_code => 'REQ_PA_BURDENED'
18145: , p_ae_header_id => l_ae_header_id
18146: );
18147:
18147:
18148: --
18149: -- set rounding class
18150: --
18151: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
18152: 'REQ_PA_BURDENED';
18153:
18154: --
18155: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
18151: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
18152: 'REQ_PA_BURDENED';
18153:
18154: --
18155: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
18156: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
18157: --
18158: -- bulk performance
18159: --
18152: 'REQ_PA_BURDENED';
18153:
18154: --
18155: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
18156: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
18157: --
18158: -- bulk performance
18159: --
18160: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
18156: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
18157: --
18158: -- bulk performance
18159: --
18160: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
18161:
18162: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
18163: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
18164:
18158: -- bulk performance
18159: --
18160: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
18161:
18162: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
18163: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
18164:
18165: -- 4955764
18166: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
18162: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
18163: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
18164:
18165: -- 4955764
18166: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
18167: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
18168:
18169: -- 4458381 Public Sector Enh
18170: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
18166: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
18167: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
18168:
18169: -- 4458381 Public Sector Enh
18170: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
18171: --
18172: -- set accounting attributes for the line type
18173: --
18174: l_entered_amt_idx := 27;
18242: l_rec_acct_attrs.array_num_value(33) := p_source_39;
18243: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
18244: l_rec_acct_attrs.array_num_value(34) := p_source_40;
18245:
18246: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
18247: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
18248:
18249: ---------------------------------------------------------------------------------------------------------------
18250: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18243: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
18244: l_rec_acct_attrs.array_num_value(34) := p_source_40;
18245:
18246: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
18247: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
18248:
18249: ---------------------------------------------------------------------------------------------------------------
18250: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18251: ---------------------------------------------------------------------------------------------------------------
18246: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
18247: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
18248:
18249: ---------------------------------------------------------------------------------------------------------------
18250: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18251: ---------------------------------------------------------------------------------------------------------------
18252: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
18253:
18254: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18248:
18249: ---------------------------------------------------------------------------------------------------------------
18250: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18251: ---------------------------------------------------------------------------------------------------------------
18252: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
18253:
18254: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18255: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18256:
18250: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18251: ---------------------------------------------------------------------------------------------------------------
18252: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
18253:
18254: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18255: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18256:
18257: IF xla_accounting_cache_pkg.GetValueChar
18258: (p_source_code => 'LEDGER_CATEGORY_CODE'
18251: ---------------------------------------------------------------------------------------------------------------
18252: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
18253:
18254: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18255: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18256:
18257: IF xla_accounting_cache_pkg.GetValueChar
18258: (p_source_code => 'LEDGER_CATEGORY_CODE'
18259: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
18262: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
18263: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
18264: )
18265: THEN
18266: xla_ae_lines_pkg.BflowUpgEntry
18267: (p_business_method_code => l_bflow_method_code
18268: ,p_business_class_code => l_bflow_class_code
18269: ,p_balance_type => l_balance_type_code);
18270: ELSE
18279: --
18280: -- call description
18281: --
18282:
18283: xla_ae_lines_pkg.SetLineDescription(
18284: p_ae_header_id => l_ae_header_id
18285: ,p_description => Description_2 (
18286: p_application_id => p_application_id
18287: , p_ae_header_id => l_ae_header_id
18315: , x_value_type_code => l_adr_value_type_code
18316: , p_side => 'NA'
18317: );
18318:
18319: xla_ae_lines_pkg.set_ccid(
18320: p_code_combination_id => l_ccid
18321: , p_value_type_code => l_adr_value_type_code
18322: , p_transaction_coa_id => l_adr_transaction_coa_id
18323: , p_accounting_coa_id => l_adr_accounting_coa_id
18351: xla_accounting_err_pkg.build_message
18352: (p_appli_s_name => 'XLA'
18353: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
18354: ,p_token_1 => 'LINE_NUMBER'
18355: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
18356: ,p_token_2 => 'LINE_TYPE_NAME'
18357: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
18358: l_component_type
18359: ,l_component_code
18387: --
18388: --
18389: ------------------------------------------------------------------------------------------------
18390: -- 4219869 Business Flow
18391: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
18392: -- Prior Entry. Currently, the following code is always generated.
18393: ------------------------------------------------------------------------------------------------
18394: XLA_AE_LINES_PKG.ValidateCurrentLine;
18395:
18390: -- 4219869 Business Flow
18391: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
18392: -- Prior Entry. Currently, the following code is always generated.
18393: ------------------------------------------------------------------------------------------------
18394: XLA_AE_LINES_PKG.ValidateCurrentLine;
18395:
18396: ------------------------------------------------------------------------------------
18397: -- 4219869 Business Flow
18398: -- Populated credit and debit amounts -- Need to generate this within IF
18396: ------------------------------------------------------------------------------------
18397: -- 4219869 Business Flow
18398: -- Populated credit and debit amounts -- Need to generate this within IF
18399: ------------------------------------------------------------------------------------
18400: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
18401:
18402: ----------------------------------------------------------------------------------
18403: -- 4219869 Business Flow
18404: -- Update journal entry status -- Need to generate this within IF
18428: -- To allow MPA report to determine if it should generate report process
18429: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
18430: ------------------------------------------------------------------------------------------
18431:
18432: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
18433: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
18434:
18435: --
18436: -- Update the line information that should be overwritten
18429: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
18430: ------------------------------------------------------------------------------------------
18431:
18432: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
18433: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
18434:
18435: --
18436: -- Update the line information that should be overwritten
18437: --
18434:
18435: --
18436: -- Update the line information that should be overwritten
18437: --
18438: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
18439: p_header_num => 1);
18440: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
18441:
18442: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
18436: -- Update the line information that should be overwritten
18437: --
18438: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
18439: p_header_num => 1);
18440: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
18441:
18442: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
18443:
18444: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
18438: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
18439: p_header_num => 1);
18440: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
18441:
18442: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
18443:
18444: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
18445: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
18446: END IF;
18441:
18442: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
18443:
18444: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
18445: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
18446: END IF;
18447:
18448: --
18449: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
18448: --
18449: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
18450: --
18451: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
18452: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
18453: ELSE
18454: ---------------------------------------------------------------------------------------------------
18455: -- 4262811a Switch Sign
18456: ---------------------------------------------------------------------------------------------------
18453: ELSE
18454: ---------------------------------------------------------------------------------------------------
18455: -- 4262811a Switch Sign
18456: ---------------------------------------------------------------------------------------------------
18457: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18458: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18459: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18460: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18461: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18454: ---------------------------------------------------------------------------------------------------
18455: -- 4262811a Switch Sign
18456: ---------------------------------------------------------------------------------------------------
18457: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18458: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18459: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18460: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18461: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18462: -- 5132302
18455: -- 4262811a Switch Sign
18456: ---------------------------------------------------------------------------------------------------
18457: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18458: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18459: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18460: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18461: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18462: -- 5132302
18463: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18456: ---------------------------------------------------------------------------------------------------
18457: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18458: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18459: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18460: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18461: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18462: -- 5132302
18463: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18464: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18457: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18458: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18459: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18460: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18461: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18462: -- 5132302
18463: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18464: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18465:
18459: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18460: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18461: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18462: -- 5132302
18463: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18464: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18465:
18466: END IF;
18467:
18460: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18461: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18462: -- 5132302
18463: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18464: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18465:
18466: END IF;
18467:
18468: -- 4955764
18465:
18466: END IF;
18467:
18468: -- 4955764
18469: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
18470: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
18471:
18472:
18473: XLA_AE_LINES_PKG.ValidateCurrentLine;
18469: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
18470: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
18471:
18472:
18473: XLA_AE_LINES_PKG.ValidateCurrentLine;
18474: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
18475:
18476: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
18477: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
18470: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
18471:
18472:
18473: XLA_AE_LINES_PKG.ValidateCurrentLine;
18474: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
18475:
18476: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
18477: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
18478: ,p_balance_type_code => l_balance_type_code);
18652: --
18653: -- bulk performance
18654: --
18655: l_balance_type_code VARCHAR2(1);
18656: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
18657: l_log_module VARCHAR2(240);
18658:
18659: --
18660: -- Upgrade strategy
18749: ') = 'Y'
18750: THEN
18751:
18752: --
18753: XLA_AE_LINES_PKG.SetNewLine;
18754:
18755: p_balance_type_code := l_balance_type_code;
18756: -- set the flag so later we will know whether the gain loss line needs to be created
18757:
18761:
18762: --
18763: -- bulk performance
18764: --
18765: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
18766: p_header_num => 0); -- 4262811
18767: --
18768: -- set accounting line options
18769: --
18766: p_header_num => 0); -- 4262811
18767: --
18768: -- set accounting line options
18769: --
18770: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
18771: p_natural_side_code => 'D'
18772: , p_gain_or_loss_flag => 'N'
18773: , p_gl_transfer_mode_code => 'S'
18774: , p_acct_entry_type_code => 'E'
18780: --
18781: --
18782: -- set accounting line type info
18783: --
18784: xla_ae_lines_pkg.SetAcctLineType
18785: (p_component_type => l_component_type
18786: ,p_event_type_code => l_event_type_code
18787: ,p_line_definition_owner_code => l_line_definition_owner_code
18788: ,p_line_definition_code => l_line_definition_code
18794: ,p_event_class_code => l_event_class_code);
18795: --
18796: -- set accounting class
18797: --
18798: xla_ae_lines_pkg.SetAcctClass(
18799: p_accounting_class_code => 'REQ_PA_BURDEN'
18800: , p_ae_header_id => l_ae_header_id
18801: );
18802:
18802:
18803: --
18804: -- set rounding class
18805: --
18806: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
18807: 'REQ_PA_BURDEN';
18808:
18809: --
18810: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
18806: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
18807: 'REQ_PA_BURDEN';
18808:
18809: --
18810: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
18811: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
18812: --
18813: -- bulk performance
18814: --
18807: 'REQ_PA_BURDEN';
18808:
18809: --
18810: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
18811: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
18812: --
18813: -- bulk performance
18814: --
18815: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
18811: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
18812: --
18813: -- bulk performance
18814: --
18815: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
18816:
18817: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
18818: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
18819:
18813: -- bulk performance
18814: --
18815: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
18816:
18817: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
18818: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
18819:
18820: -- 4955764
18821: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
18817: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
18818: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
18819:
18820: -- 4955764
18821: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
18822: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
18823:
18824: -- 4458381 Public Sector Enh
18825: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
18821: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
18822: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
18823:
18824: -- 4458381 Public Sector Enh
18825: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
18826: --
18827: -- set accounting attributes for the line type
18828: --
18829: l_entered_amt_idx := 27;
18897: l_rec_acct_attrs.array_num_value(33) := p_source_39;
18898: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
18899: l_rec_acct_attrs.array_num_value(34) := p_source_40;
18900:
18901: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
18902: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
18903:
18904: ---------------------------------------------------------------------------------------------------------------
18905: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18898: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
18899: l_rec_acct_attrs.array_num_value(34) := p_source_40;
18900:
18901: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
18902: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
18903:
18904: ---------------------------------------------------------------------------------------------------------------
18905: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18906: ---------------------------------------------------------------------------------------------------------------
18901: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
18902: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
18903:
18904: ---------------------------------------------------------------------------------------------------------------
18905: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18906: ---------------------------------------------------------------------------------------------------------------
18907: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
18908:
18909: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18903:
18904: ---------------------------------------------------------------------------------------------------------------
18905: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18906: ---------------------------------------------------------------------------------------------------------------
18907: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
18908:
18909: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18910: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18911:
18905: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18906: ---------------------------------------------------------------------------------------------------------------
18907: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
18908:
18909: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18910: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18911:
18912: IF xla_accounting_cache_pkg.GetValueChar
18913: (p_source_code => 'LEDGER_CATEGORY_CODE'
18906: ---------------------------------------------------------------------------------------------------------------
18907: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
18908:
18909: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18910: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18911:
18912: IF xla_accounting_cache_pkg.GetValueChar
18913: (p_source_code => 'LEDGER_CATEGORY_CODE'
18914: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
18917: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
18918: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
18919: )
18920: THEN
18921: xla_ae_lines_pkg.BflowUpgEntry
18922: (p_business_method_code => l_bflow_method_code
18923: ,p_business_class_code => l_bflow_class_code
18924: ,p_balance_type => l_balance_type_code);
18925: ELSE
18934: --
18935: -- call description
18936: --
18937:
18938: xla_ae_lines_pkg.SetLineDescription(
18939: p_ae_header_id => l_ae_header_id
18940: ,p_description => Description_2 (
18941: p_application_id => p_application_id
18942: , p_ae_header_id => l_ae_header_id
18970: , x_value_type_code => l_adr_value_type_code
18971: , p_side => 'NA'
18972: );
18973:
18974: xla_ae_lines_pkg.set_ccid(
18975: p_code_combination_id => l_ccid
18976: , p_value_type_code => l_adr_value_type_code
18977: , p_transaction_coa_id => l_adr_transaction_coa_id
18978: , p_accounting_coa_id => l_adr_accounting_coa_id
19006: xla_accounting_err_pkg.build_message
19007: (p_appli_s_name => 'XLA'
19008: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
19009: ,p_token_1 => 'LINE_NUMBER'
19010: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
19011: ,p_token_2 => 'LINE_TYPE_NAME'
19012: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
19013: l_component_type
19014: ,l_component_code
19042: --
19043: --
19044: ------------------------------------------------------------------------------------------------
19045: -- 4219869 Business Flow
19046: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
19047: -- Prior Entry. Currently, the following code is always generated.
19048: ------------------------------------------------------------------------------------------------
19049: XLA_AE_LINES_PKG.ValidateCurrentLine;
19050:
19045: -- 4219869 Business Flow
19046: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
19047: -- Prior Entry. Currently, the following code is always generated.
19048: ------------------------------------------------------------------------------------------------
19049: XLA_AE_LINES_PKG.ValidateCurrentLine;
19050:
19051: ------------------------------------------------------------------------------------
19052: -- 4219869 Business Flow
19053: -- Populated credit and debit amounts -- Need to generate this within IF
19051: ------------------------------------------------------------------------------------
19052: -- 4219869 Business Flow
19053: -- Populated credit and debit amounts -- Need to generate this within IF
19054: ------------------------------------------------------------------------------------
19055: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
19056:
19057: ----------------------------------------------------------------------------------
19058: -- 4219869 Business Flow
19059: -- Update journal entry status -- Need to generate this within IF
19083: -- To allow MPA report to determine if it should generate report process
19084: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
19085: ------------------------------------------------------------------------------------------
19086:
19087: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
19088: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
19089:
19090: --
19091: -- Update the line information that should be overwritten
19084: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
19085: ------------------------------------------------------------------------------------------
19086:
19087: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
19088: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
19089:
19090: --
19091: -- Update the line information that should be overwritten
19092: --
19089:
19090: --
19091: -- Update the line information that should be overwritten
19092: --
19093: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
19094: p_header_num => 1);
19095: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
19096:
19097: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
19091: -- Update the line information that should be overwritten
19092: --
19093: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
19094: p_header_num => 1);
19095: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
19096:
19097: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
19098:
19099: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
19093: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
19094: p_header_num => 1);
19095: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
19096:
19097: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
19098:
19099: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
19100: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
19101: END IF;
19096:
19097: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
19098:
19099: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
19100: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
19101: END IF;
19102:
19103: --
19104: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
19103: --
19104: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
19105: --
19106: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
19107: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
19108: ELSE
19109: ---------------------------------------------------------------------------------------------------
19110: -- 4262811a Switch Sign
19111: ---------------------------------------------------------------------------------------------------
19108: ELSE
19109: ---------------------------------------------------------------------------------------------------
19110: -- 4262811a Switch Sign
19111: ---------------------------------------------------------------------------------------------------
19112: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19113: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19114: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19115: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19116: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19109: ---------------------------------------------------------------------------------------------------
19110: -- 4262811a Switch Sign
19111: ---------------------------------------------------------------------------------------------------
19112: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19113: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19114: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19115: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19116: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19117: -- 5132302
19110: -- 4262811a Switch Sign
19111: ---------------------------------------------------------------------------------------------------
19112: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19113: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19114: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19115: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19116: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19117: -- 5132302
19118: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19111: ---------------------------------------------------------------------------------------------------
19112: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19113: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19114: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19115: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19116: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19117: -- 5132302
19118: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19119: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19112: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19113: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19114: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19115: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19116: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19117: -- 5132302
19118: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19119: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19120:
19114: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19115: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19116: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19117: -- 5132302
19118: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19119: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19120:
19121: END IF;
19122:
19115: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19116: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19117: -- 5132302
19118: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19119: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19120:
19121: END IF;
19122:
19123: -- 4955764
19120:
19121: END IF;
19122:
19123: -- 4955764
19124: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
19125: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
19126:
19127:
19128: XLA_AE_LINES_PKG.ValidateCurrentLine;
19124: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
19125: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
19126:
19127:
19128: XLA_AE_LINES_PKG.ValidateCurrentLine;
19129: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
19130:
19131: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
19132: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
19125: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
19126:
19127:
19128: XLA_AE_LINES_PKG.ValidateCurrentLine;
19129: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
19130:
19131: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
19132: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
19133: ,p_balance_type_code => l_balance_type_code);
19276: --
19277: -- bulk performance
19278: --
19279: l_balance_type_code VARCHAR2(1);
19280: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
19281: l_log_module VARCHAR2(240);
19282:
19283: --
19284: -- Upgrade strategy
19351: ') = 'B_PA'
19352: THEN
19353:
19354: --
19355: XLA_AE_LINES_PKG.SetNewLine;
19356:
19357: p_balance_type_code := l_balance_type_code;
19358: -- set the flag so later we will know whether the gain loss line needs to be created
19359:
19363:
19364: --
19365: -- bulk performance
19366: --
19367: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
19368: p_header_num => 0); -- 4262811
19369: --
19370: -- set accounting line options
19371: --
19368: p_header_num => 0); -- 4262811
19369: --
19370: -- set accounting line options
19371: --
19372: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
19373: p_natural_side_code => 'C'
19374: , p_gain_or_loss_flag => 'N'
19375: , p_gl_transfer_mode_code => 'S'
19376: , p_acct_entry_type_code => 'E'
19382: --
19383: --
19384: -- set accounting line type info
19385: --
19386: xla_ae_lines_pkg.SetAcctLineType
19387: (p_component_type => l_component_type
19388: ,p_event_type_code => l_event_type_code
19389: ,p_line_definition_owner_code => l_line_definition_owner_code
19390: ,p_line_definition_code => l_line_definition_code
19396: ,p_event_class_code => l_event_class_code);
19397: --
19398: -- set accounting class
19399: --
19400: xla_ae_lines_pkg.SetAcctClass(
19401: p_accounting_class_code => 'PURCHASE_ORDER'
19402: , p_ae_header_id => l_ae_header_id
19403: );
19404:
19404:
19405: --
19406: -- set rounding class
19407: --
19408: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
19409: 'PURCHASE_ORDER';
19410:
19411: --
19412: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
19408: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
19409: 'PURCHASE_ORDER';
19410:
19411: --
19412: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
19413: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
19414: --
19415: -- bulk performance
19416: --
19409: 'PURCHASE_ORDER';
19410:
19411: --
19412: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
19413: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
19414: --
19415: -- bulk performance
19416: --
19417: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
19413: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
19414: --
19415: -- bulk performance
19416: --
19417: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
19418:
19419: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
19420: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
19421:
19415: -- bulk performance
19416: --
19417: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
19418:
19419: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
19420: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
19421:
19422: -- 4955764
19423: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
19419: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
19420: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
19421:
19422: -- 4955764
19423: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
19424: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
19425:
19426: -- 4458381 Public Sector Enh
19427:
19503: l_rec_acct_attrs.array_num_value(30) := p_source_61;
19504: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
19505: l_rec_acct_attrs.array_num_value(31) := p_source_61;
19506:
19507: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
19508: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
19509:
19510: ---------------------------------------------------------------------------------------------------------------
19511: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
19504: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
19505: l_rec_acct_attrs.array_num_value(31) := p_source_61;
19506:
19507: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
19508: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
19509:
19510: ---------------------------------------------------------------------------------------------------------------
19511: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
19512: ---------------------------------------------------------------------------------------------------------------
19507: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
19508: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
19509:
19510: ---------------------------------------------------------------------------------------------------------------
19511: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
19512: ---------------------------------------------------------------------------------------------------------------
19513: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
19514:
19515: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19509:
19510: ---------------------------------------------------------------------------------------------------------------
19511: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
19512: ---------------------------------------------------------------------------------------------------------------
19513: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
19514:
19515: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19516: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19517:
19511: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
19512: ---------------------------------------------------------------------------------------------------------------
19513: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
19514:
19515: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19516: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19517:
19518: IF xla_accounting_cache_pkg.GetValueChar
19519: (p_source_code => 'LEDGER_CATEGORY_CODE'
19512: ---------------------------------------------------------------------------------------------------------------
19513: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
19514:
19515: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19516: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19517:
19518: IF xla_accounting_cache_pkg.GetValueChar
19519: (p_source_code => 'LEDGER_CATEGORY_CODE'
19520: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
19523: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
19524: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
19525: )
19526: THEN
19527: xla_ae_lines_pkg.BflowUpgEntry
19528: (p_business_method_code => l_bflow_method_code
19529: ,p_business_class_code => l_bflow_class_code
19530: ,p_balance_type => l_balance_type_code);
19531: ELSE
19529: ,p_business_class_code => l_bflow_class_code
19530: ,p_balance_type => l_balance_type_code);
19531: ELSE
19532: NULL;
19533: XLA_AE_LINES_PKG.business_flow_validation(
19534: p_business_method_code => l_bflow_method_code
19535: ,p_business_class_code => l_bflow_class_code
19536: ,p_inherit_description_flag => l_inherit_desc_flag);
19537: END IF;
19576: xla_accounting_err_pkg.build_message
19577: (p_appli_s_name => 'XLA'
19578: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
19579: ,p_token_1 => 'LINE_NUMBER'
19580: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
19581: ,p_token_2 => 'LINE_TYPE_NAME'
19582: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
19583: l_component_type
19584: ,l_component_code
19612: --
19613: --
19614: ------------------------------------------------------------------------------------------------
19615: -- 4219869 Business Flow
19616: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
19617: -- Prior Entry. Currently, the following code is always generated.
19618: ------------------------------------------------------------------------------------------------
19619: -- No ValidateCurrentLine for business flow method of Prior Entry
19620:
19621: ------------------------------------------------------------------------------------
19622: -- 4219869 Business Flow
19623: -- Populated credit and debit amounts -- Need to generate this within IF
19624: ------------------------------------------------------------------------------------
19625: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
19626:
19627: ----------------------------------------------------------------------------------
19628: -- 4219869 Business Flow
19629: -- Update journal entry status -- Need to generate this within IF
19653: -- To allow MPA report to determine if it should generate report process
19654: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
19655: ------------------------------------------------------------------------------------------
19656:
19657: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
19658: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
19659:
19660: --
19661: -- Update the line information that should be overwritten
19654: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
19655: ------------------------------------------------------------------------------------------
19656:
19657: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
19658: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
19659:
19660: --
19661: -- Update the line information that should be overwritten
19662: --
19659:
19660: --
19661: -- Update the line information that should be overwritten
19662: --
19663: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
19664: p_header_num => 1);
19665: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
19666:
19667: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
19661: -- Update the line information that should be overwritten
19662: --
19663: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
19664: p_header_num => 1);
19665: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
19666:
19667: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
19668:
19669: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
19663: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
19664: p_header_num => 1);
19665: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
19666:
19667: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
19668:
19669: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
19670: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
19671: END IF;
19666:
19667: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
19668:
19669: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
19670: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
19671: END IF;
19672:
19673: --
19674: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
19673: --
19674: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
19675: --
19676: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
19677: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
19678: ELSE
19679: ---------------------------------------------------------------------------------------------------
19680: -- 4262811a Switch Sign
19681: ---------------------------------------------------------------------------------------------------
19678: ELSE
19679: ---------------------------------------------------------------------------------------------------
19680: -- 4262811a Switch Sign
19681: ---------------------------------------------------------------------------------------------------
19682: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19683: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19684: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19685: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19686: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19679: ---------------------------------------------------------------------------------------------------
19680: -- 4262811a Switch Sign
19681: ---------------------------------------------------------------------------------------------------
19682: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19683: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19684: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19685: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19686: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19687: -- 5132302
19680: -- 4262811a Switch Sign
19681: ---------------------------------------------------------------------------------------------------
19682: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19683: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19684: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19685: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19686: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19687: -- 5132302
19688: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19681: ---------------------------------------------------------------------------------------------------
19682: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19683: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19684: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19685: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19686: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19687: -- 5132302
19688: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19689: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19682: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19683: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19684: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19685: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19686: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19687: -- 5132302
19688: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19689: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19690:
19684: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19685: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19686: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19687: -- 5132302
19688: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19689: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19690:
19691: END IF;
19692:
19685: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19686: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19687: -- 5132302
19688: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19689: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19690:
19691: END IF;
19692:
19693: -- 4955764
19690:
19691: END IF;
19692:
19693: -- 4955764
19694: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
19695: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
19696:
19697:
19698: XLA_AE_LINES_PKG.ValidateCurrentLine;
19694: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
19695: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
19696:
19697:
19698: XLA_AE_LINES_PKG.ValidateCurrentLine;
19699: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
19700:
19701: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
19702: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
19695: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
19696:
19697:
19698: XLA_AE_LINES_PKG.ValidateCurrentLine;
19699: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
19700:
19701: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
19702: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
19703: ,p_balance_type_code => l_balance_type_code);
19875: --
19876: -- bulk performance
19877: --
19878: l_balance_type_code VARCHAR2(1);
19879: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
19880: l_log_module VARCHAR2(240);
19881:
19882: --
19883: -- Upgrade strategy
19960: ') = 'S'
19961: THEN
19962:
19963: --
19964: XLA_AE_LINES_PKG.SetNewLine;
19965:
19966: p_balance_type_code := l_balance_type_code;
19967: -- set the flag so later we will know whether the gain loss line needs to be created
19968:
19972:
19973: --
19974: -- bulk performance
19975: --
19976: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
19977: p_header_num => 0); -- 4262811
19978: --
19979: -- set accounting line options
19980: --
19977: p_header_num => 0); -- 4262811
19978: --
19979: -- set accounting line options
19980: --
19981: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
19982: p_natural_side_code => 'C'
19983: , p_gain_or_loss_flag => 'N'
19984: , p_gl_transfer_mode_code => 'S'
19985: , p_acct_entry_type_code => 'E'
19991: --
19992: --
19993: -- set accounting line type info
19994: --
19995: xla_ae_lines_pkg.SetAcctLineType
19996: (p_component_type => l_component_type
19997: ,p_event_type_code => l_event_type_code
19998: ,p_line_definition_owner_code => l_line_definition_owner_code
19999: ,p_line_definition_code => l_line_definition_code
20005: ,p_event_class_code => l_event_class_code);
20006: --
20007: -- set accounting class
20008: --
20009: xla_ae_lines_pkg.SetAcctClass(
20010: p_accounting_class_code => 'PO_PA_BURDENED'
20011: , p_ae_header_id => l_ae_header_id
20012: );
20013:
20013:
20014: --
20015: -- set rounding class
20016: --
20017: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
20018: 'PO_PA_BURDENED';
20019:
20020: --
20021: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
20017: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
20018: 'PO_PA_BURDENED';
20019:
20020: --
20021: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
20022: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
20023: --
20024: -- bulk performance
20025: --
20018: 'PO_PA_BURDENED';
20019:
20020: --
20021: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
20022: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
20023: --
20024: -- bulk performance
20025: --
20026: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
20022: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
20023: --
20024: -- bulk performance
20025: --
20026: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
20027:
20028: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
20029: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
20030:
20024: -- bulk performance
20025: --
20026: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
20027:
20028: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
20029: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
20030:
20031: -- 4955764
20032: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
20028: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
20029: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
20030:
20031: -- 4955764
20032: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
20033: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
20034:
20035: -- 4458381 Public Sector Enh
20036:
20110: l_rec_acct_attrs.array_num_value(34) := p_source_39;
20111: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
20112: l_rec_acct_attrs.array_num_value(35) := p_source_40;
20113:
20114: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
20115: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
20116:
20117: ---------------------------------------------------------------------------------------------------------------
20118: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20111: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
20112: l_rec_acct_attrs.array_num_value(35) := p_source_40;
20113:
20114: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
20115: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
20116:
20117: ---------------------------------------------------------------------------------------------------------------
20118: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20119: ---------------------------------------------------------------------------------------------------------------
20114: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
20115: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
20116:
20117: ---------------------------------------------------------------------------------------------------------------
20118: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20119: ---------------------------------------------------------------------------------------------------------------
20120: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
20121:
20122: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20116:
20117: ---------------------------------------------------------------------------------------------------------------
20118: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20119: ---------------------------------------------------------------------------------------------------------------
20120: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
20121:
20122: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20123: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20124:
20118: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20119: ---------------------------------------------------------------------------------------------------------------
20120: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
20121:
20122: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20123: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20124:
20125: IF xla_accounting_cache_pkg.GetValueChar
20126: (p_source_code => 'LEDGER_CATEGORY_CODE'
20119: ---------------------------------------------------------------------------------------------------------------
20120: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
20121:
20122: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20123: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20124:
20125: IF xla_accounting_cache_pkg.GetValueChar
20126: (p_source_code => 'LEDGER_CATEGORY_CODE'
20127: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
20130: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
20131: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
20132: )
20133: THEN
20134: xla_ae_lines_pkg.BflowUpgEntry
20135: (p_business_method_code => l_bflow_method_code
20136: ,p_business_class_code => l_bflow_class_code
20137: ,p_balance_type => l_balance_type_code);
20138: ELSE
20136: ,p_business_class_code => l_bflow_class_code
20137: ,p_balance_type => l_balance_type_code);
20138: ELSE
20139: NULL;
20140: XLA_AE_LINES_PKG.business_flow_validation(
20141: p_business_method_code => l_bflow_method_code
20142: ,p_business_class_code => l_bflow_class_code
20143: ,p_inherit_description_flag => l_inherit_desc_flag);
20144: END IF;
20150: --
20151: -- call description
20152: --
20153:
20154: xla_ae_lines_pkg.SetLineDescription(
20155: p_ae_header_id => l_ae_header_id
20156: ,p_description => Description_2 (
20157: p_application_id => p_application_id
20158: , p_ae_header_id => l_ae_header_id
20196: xla_accounting_err_pkg.build_message
20197: (p_appli_s_name => 'XLA'
20198: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
20199: ,p_token_1 => 'LINE_NUMBER'
20200: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
20201: ,p_token_2 => 'LINE_TYPE_NAME'
20202: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
20203: l_component_type
20204: ,l_component_code
20232: --
20233: --
20234: ------------------------------------------------------------------------------------------------
20235: -- 4219869 Business Flow
20236: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
20237: -- Prior Entry. Currently, the following code is always generated.
20238: ------------------------------------------------------------------------------------------------
20239: -- No ValidateCurrentLine for business flow method of Prior Entry
20240:
20241: ------------------------------------------------------------------------------------
20242: -- 4219869 Business Flow
20243: -- Populated credit and debit amounts -- Need to generate this within IF
20244: ------------------------------------------------------------------------------------
20245: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
20246:
20247: ----------------------------------------------------------------------------------
20248: -- 4219869 Business Flow
20249: -- Update journal entry status -- Need to generate this within IF
20273: -- To allow MPA report to determine if it should generate report process
20274: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
20275: ------------------------------------------------------------------------------------------
20276:
20277: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
20278: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
20279:
20280: --
20281: -- Update the line information that should be overwritten
20274: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
20275: ------------------------------------------------------------------------------------------
20276:
20277: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
20278: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
20279:
20280: --
20281: -- Update the line information that should be overwritten
20282: --
20279:
20280: --
20281: -- Update the line information that should be overwritten
20282: --
20283: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
20284: p_header_num => 1);
20285: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
20286:
20287: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
20281: -- Update the line information that should be overwritten
20282: --
20283: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
20284: p_header_num => 1);
20285: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
20286:
20287: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
20288:
20289: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
20283: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
20284: p_header_num => 1);
20285: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
20286:
20287: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
20288:
20289: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
20290: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
20291: END IF;
20286:
20287: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
20288:
20289: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
20290: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
20291: END IF;
20292:
20293: --
20294: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
20293: --
20294: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
20295: --
20296: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
20297: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
20298: ELSE
20299: ---------------------------------------------------------------------------------------------------
20300: -- 4262811a Switch Sign
20301: ---------------------------------------------------------------------------------------------------
20298: ELSE
20299: ---------------------------------------------------------------------------------------------------
20300: -- 4262811a Switch Sign
20301: ---------------------------------------------------------------------------------------------------
20302: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20303: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20304: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20305: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20306: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20299: ---------------------------------------------------------------------------------------------------
20300: -- 4262811a Switch Sign
20301: ---------------------------------------------------------------------------------------------------
20302: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20303: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20304: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20305: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20306: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20307: -- 5132302
20300: -- 4262811a Switch Sign
20301: ---------------------------------------------------------------------------------------------------
20302: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20303: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20304: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20305: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20306: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20307: -- 5132302
20308: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20301: ---------------------------------------------------------------------------------------------------
20302: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20303: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20304: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20305: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20306: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20307: -- 5132302
20308: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20309: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20302: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20303: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20304: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20305: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20306: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20307: -- 5132302
20308: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20309: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20310:
20304: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20305: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20306: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20307: -- 5132302
20308: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20309: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20310:
20311: END IF;
20312:
20305: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20306: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20307: -- 5132302
20308: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20309: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20310:
20311: END IF;
20312:
20313: -- 4955764
20310:
20311: END IF;
20312:
20313: -- 4955764
20314: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
20315: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
20316:
20317:
20318: XLA_AE_LINES_PKG.ValidateCurrentLine;
20314: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
20315: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
20316:
20317:
20318: XLA_AE_LINES_PKG.ValidateCurrentLine;
20319: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
20320:
20321: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
20322: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
20315: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
20316:
20317:
20318: XLA_AE_LINES_PKG.ValidateCurrentLine;
20319: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
20320:
20321: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
20322: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
20323: ,p_balance_type_code => l_balance_type_code);
20495: --
20496: -- bulk performance
20497: --
20498: l_balance_type_code VARCHAR2(1);
20499: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
20500: l_log_module VARCHAR2(240);
20501:
20502: --
20503: -- Upgrade strategy
20580: ') <> 'Y'
20581: THEN
20582:
20583: --
20584: XLA_AE_LINES_PKG.SetNewLine;
20585:
20586: p_balance_type_code := l_balance_type_code;
20587: -- set the flag so later we will know whether the gain loss line needs to be created
20588:
20592:
20593: --
20594: -- bulk performance
20595: --
20596: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
20597: p_header_num => 0); -- 4262811
20598: --
20599: -- set accounting line options
20600: --
20597: p_header_num => 0); -- 4262811
20598: --
20599: -- set accounting line options
20600: --
20601: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
20602: p_natural_side_code => 'C'
20603: , p_gain_or_loss_flag => 'N'
20604: , p_gl_transfer_mode_code => 'S'
20605: , p_acct_entry_type_code => 'E'
20611: --
20612: --
20613: -- set accounting line type info
20614: --
20615: xla_ae_lines_pkg.SetAcctLineType
20616: (p_component_type => l_component_type
20617: ,p_event_type_code => l_event_type_code
20618: ,p_line_definition_owner_code => l_line_definition_owner_code
20619: ,p_line_definition_code => l_line_definition_code
20625: ,p_event_class_code => l_event_class_code);
20626: --
20627: -- set accounting class
20628: --
20629: xla_ae_lines_pkg.SetAcctClass(
20630: p_accounting_class_code => 'REQ_PA_BURDENED'
20631: , p_ae_header_id => l_ae_header_id
20632: );
20633:
20633:
20634: --
20635: -- set rounding class
20636: --
20637: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
20638: 'REQ_PA_BURDENED';
20639:
20640: --
20641: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
20637: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
20638: 'REQ_PA_BURDENED';
20639:
20640: --
20641: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
20642: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
20643: --
20644: -- bulk performance
20645: --
20638: 'REQ_PA_BURDENED';
20639:
20640: --
20641: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
20642: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
20643: --
20644: -- bulk performance
20645: --
20646: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
20642: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
20643: --
20644: -- bulk performance
20645: --
20646: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
20647:
20648: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
20649: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
20650:
20644: -- bulk performance
20645: --
20646: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
20647:
20648: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
20649: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
20650:
20651: -- 4955764
20652: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
20648: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
20649: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
20650:
20651: -- 4955764
20652: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
20653: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
20654:
20655: -- 4458381 Public Sector Enh
20656:
20728: l_rec_acct_attrs.array_num_value(33) := p_source_39;
20729: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
20730: l_rec_acct_attrs.array_num_value(34) := p_source_40;
20731:
20732: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
20733: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
20734:
20735: ---------------------------------------------------------------------------------------------------------------
20736: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20729: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
20730: l_rec_acct_attrs.array_num_value(34) := p_source_40;
20731:
20732: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
20733: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
20734:
20735: ---------------------------------------------------------------------------------------------------------------
20736: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20737: ---------------------------------------------------------------------------------------------------------------
20732: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
20733: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
20734:
20735: ---------------------------------------------------------------------------------------------------------------
20736: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20737: ---------------------------------------------------------------------------------------------------------------
20738: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
20739:
20740: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20734:
20735: ---------------------------------------------------------------------------------------------------------------
20736: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20737: ---------------------------------------------------------------------------------------------------------------
20738: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
20739:
20740: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20741: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20742:
20736: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20737: ---------------------------------------------------------------------------------------------------------------
20738: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
20739:
20740: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20741: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20742:
20743: IF xla_accounting_cache_pkg.GetValueChar
20744: (p_source_code => 'LEDGER_CATEGORY_CODE'
20737: ---------------------------------------------------------------------------------------------------------------
20738: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
20739:
20740: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20741: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20742:
20743: IF xla_accounting_cache_pkg.GetValueChar
20744: (p_source_code => 'LEDGER_CATEGORY_CODE'
20745: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
20748: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
20749: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
20750: )
20751: THEN
20752: xla_ae_lines_pkg.BflowUpgEntry
20753: (p_business_method_code => l_bflow_method_code
20754: ,p_business_class_code => l_bflow_class_code
20755: ,p_balance_type => l_balance_type_code);
20756: ELSE
20754: ,p_business_class_code => l_bflow_class_code
20755: ,p_balance_type => l_balance_type_code);
20756: ELSE
20757: NULL;
20758: XLA_AE_LINES_PKG.business_flow_validation(
20759: p_business_method_code => l_bflow_method_code
20760: ,p_business_class_code => l_bflow_class_code
20761: ,p_inherit_description_flag => l_inherit_desc_flag);
20762: END IF;
20768: --
20769: -- call description
20770: --
20771:
20772: xla_ae_lines_pkg.SetLineDescription(
20773: p_ae_header_id => l_ae_header_id
20774: ,p_description => Description_2 (
20775: p_application_id => p_application_id
20776: , p_ae_header_id => l_ae_header_id
20814: xla_accounting_err_pkg.build_message
20815: (p_appli_s_name => 'XLA'
20816: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
20817: ,p_token_1 => 'LINE_NUMBER'
20818: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
20819: ,p_token_2 => 'LINE_TYPE_NAME'
20820: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
20821: l_component_type
20822: ,l_component_code
20850: --
20851: --
20852: ------------------------------------------------------------------------------------------------
20853: -- 4219869 Business Flow
20854: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
20855: -- Prior Entry. Currently, the following code is always generated.
20856: ------------------------------------------------------------------------------------------------
20857: -- No ValidateCurrentLine for business flow method of Prior Entry
20858:
20859: ------------------------------------------------------------------------------------
20860: -- 4219869 Business Flow
20861: -- Populated credit and debit amounts -- Need to generate this within IF
20862: ------------------------------------------------------------------------------------
20863: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
20864:
20865: ----------------------------------------------------------------------------------
20866: -- 4219869 Business Flow
20867: -- Update journal entry status -- Need to generate this within IF
20891: -- To allow MPA report to determine if it should generate report process
20892: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
20893: ------------------------------------------------------------------------------------------
20894:
20895: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
20896: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
20897:
20898: --
20899: -- Update the line information that should be overwritten
20892: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
20893: ------------------------------------------------------------------------------------------
20894:
20895: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
20896: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
20897:
20898: --
20899: -- Update the line information that should be overwritten
20900: --
20897:
20898: --
20899: -- Update the line information that should be overwritten
20900: --
20901: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
20902: p_header_num => 1);
20903: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
20904:
20905: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
20899: -- Update the line information that should be overwritten
20900: --
20901: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
20902: p_header_num => 1);
20903: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
20904:
20905: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
20906:
20907: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
20901: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
20902: p_header_num => 1);
20903: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
20904:
20905: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
20906:
20907: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
20908: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
20909: END IF;
20904:
20905: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
20906:
20907: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
20908: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
20909: END IF;
20910:
20911: --
20912: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
20911: --
20912: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
20913: --
20914: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
20915: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
20916: ELSE
20917: ---------------------------------------------------------------------------------------------------
20918: -- 4262811a Switch Sign
20919: ---------------------------------------------------------------------------------------------------
20916: ELSE
20917: ---------------------------------------------------------------------------------------------------
20918: -- 4262811a Switch Sign
20919: ---------------------------------------------------------------------------------------------------
20920: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20921: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20922: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20923: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20924: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20917: ---------------------------------------------------------------------------------------------------
20918: -- 4262811a Switch Sign
20919: ---------------------------------------------------------------------------------------------------
20920: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20921: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20922: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20923: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20924: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20925: -- 5132302
20918: -- 4262811a Switch Sign
20919: ---------------------------------------------------------------------------------------------------
20920: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20921: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20922: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20923: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20924: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20925: -- 5132302
20926: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20919: ---------------------------------------------------------------------------------------------------
20920: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20921: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20922: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20923: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20924: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20925: -- 5132302
20926: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20927: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20920: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20921: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20922: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20923: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20924: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20925: -- 5132302
20926: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20927: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20928:
20922: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20923: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20924: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20925: -- 5132302
20926: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20927: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20928:
20929: END IF;
20930:
20923: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20924: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20925: -- 5132302
20926: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20927: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20928:
20929: END IF;
20930:
20931: -- 4955764
20928:
20929: END IF;
20930:
20931: -- 4955764
20932: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
20933: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
20934:
20935:
20936: XLA_AE_LINES_PKG.ValidateCurrentLine;
20932: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
20933: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
20934:
20935:
20936: XLA_AE_LINES_PKG.ValidateCurrentLine;
20937: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
20938:
20939: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
20940: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
20933: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
20934:
20935:
20936: XLA_AE_LINES_PKG.ValidateCurrentLine;
20937: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
20938:
20939: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
20940: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
20941: ,p_balance_type_code => l_balance_type_code);
21113: --
21114: -- bulk performance
21115: --
21116: l_balance_type_code VARCHAR2(1);
21117: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
21118: l_log_module VARCHAR2(240);
21119:
21120: --
21121: -- Upgrade strategy
21196: ') = 'S'
21197: THEN
21198:
21199: --
21200: XLA_AE_LINES_PKG.SetNewLine;
21201:
21202: p_balance_type_code := l_balance_type_code;
21203: -- set the flag so later we will know whether the gain loss line needs to be created
21204:
21208:
21209: --
21210: -- bulk performance
21211: --
21212: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
21213: p_header_num => 0); -- 4262811
21214: --
21215: -- set accounting line options
21216: --
21213: p_header_num => 0); -- 4262811
21214: --
21215: -- set accounting line options
21216: --
21217: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
21218: p_natural_side_code => 'C'
21219: , p_gain_or_loss_flag => 'N'
21220: , p_gl_transfer_mode_code => 'S'
21221: , p_acct_entry_type_code => 'E'
21227: --
21228: --
21229: -- set accounting line type info
21230: --
21231: xla_ae_lines_pkg.SetAcctLineType
21232: (p_component_type => l_component_type
21233: ,p_event_type_code => l_event_type_code
21234: ,p_line_definition_owner_code => l_line_definition_owner_code
21235: ,p_line_definition_code => l_line_definition_code
21241: ,p_event_class_code => l_event_class_code);
21242: --
21243: -- set accounting class
21244: --
21245: xla_ae_lines_pkg.SetAcctClass(
21246: p_accounting_class_code => 'REQ_PA_BURDENED'
21247: , p_ae_header_id => l_ae_header_id
21248: );
21249:
21249:
21250: --
21251: -- set rounding class
21252: --
21253: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
21254: 'REQ_PA_BURDENED';
21255:
21256: --
21257: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
21253: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
21254: 'REQ_PA_BURDENED';
21255:
21256: --
21257: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
21258: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
21259: --
21260: -- bulk performance
21261: --
21254: 'REQ_PA_BURDENED';
21255:
21256: --
21257: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
21258: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
21259: --
21260: -- bulk performance
21261: --
21262: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
21258: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
21259: --
21260: -- bulk performance
21261: --
21262: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
21263:
21264: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
21265: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
21266:
21260: -- bulk performance
21261: --
21262: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
21263:
21264: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
21265: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
21266:
21267: -- 4955764
21268: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
21264: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
21265: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
21266:
21267: -- 4955764
21268: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
21269: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
21270:
21271: -- 4458381 Public Sector Enh
21272:
21346: l_rec_acct_attrs.array_num_value(34) := p_source_39;
21347: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
21348: l_rec_acct_attrs.array_num_value(35) := p_source_40;
21349:
21350: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
21351: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
21352:
21353: ---------------------------------------------------------------------------------------------------------------
21354: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
21347: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
21348: l_rec_acct_attrs.array_num_value(35) := p_source_40;
21349:
21350: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
21351: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
21352:
21353: ---------------------------------------------------------------------------------------------------------------
21354: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
21355: ---------------------------------------------------------------------------------------------------------------
21350: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
21351: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
21352:
21353: ---------------------------------------------------------------------------------------------------------------
21354: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
21355: ---------------------------------------------------------------------------------------------------------------
21356: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
21357:
21358: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
21352:
21353: ---------------------------------------------------------------------------------------------------------------
21354: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
21355: ---------------------------------------------------------------------------------------------------------------
21356: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
21357:
21358: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
21359: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
21360:
21354: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
21355: ---------------------------------------------------------------------------------------------------------------
21356: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
21357:
21358: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
21359: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
21360:
21361: IF xla_accounting_cache_pkg.GetValueChar
21362: (p_source_code => 'LEDGER_CATEGORY_CODE'
21355: ---------------------------------------------------------------------------------------------------------------
21356: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
21357:
21358: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
21359: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
21360:
21361: IF xla_accounting_cache_pkg.GetValueChar
21362: (p_source_code => 'LEDGER_CATEGORY_CODE'
21363: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
21366: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
21367: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
21368: )
21369: THEN
21370: xla_ae_lines_pkg.BflowUpgEntry
21371: (p_business_method_code => l_bflow_method_code
21372: ,p_business_class_code => l_bflow_class_code
21373: ,p_balance_type => l_balance_type_code);
21374: ELSE
21372: ,p_business_class_code => l_bflow_class_code
21373: ,p_balance_type => l_balance_type_code);
21374: ELSE
21375: NULL;
21376: XLA_AE_LINES_PKG.business_flow_validation(
21377: p_business_method_code => l_bflow_method_code
21378: ,p_business_class_code => l_bflow_class_code
21379: ,p_inherit_description_flag => l_inherit_desc_flag);
21380: END IF;
21386: --
21387: -- call description
21388: --
21389:
21390: xla_ae_lines_pkg.SetLineDescription(
21391: p_ae_header_id => l_ae_header_id
21392: ,p_description => Description_2 (
21393: p_application_id => p_application_id
21394: , p_ae_header_id => l_ae_header_id
21432: xla_accounting_err_pkg.build_message
21433: (p_appli_s_name => 'XLA'
21434: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
21435: ,p_token_1 => 'LINE_NUMBER'
21436: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
21437: ,p_token_2 => 'LINE_TYPE_NAME'
21438: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
21439: l_component_type
21440: ,l_component_code
21468: --
21469: --
21470: ------------------------------------------------------------------------------------------------
21471: -- 4219869 Business Flow
21472: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
21473: -- Prior Entry. Currently, the following code is always generated.
21474: ------------------------------------------------------------------------------------------------
21475: -- No ValidateCurrentLine for business flow method of Prior Entry
21476:
21477: ------------------------------------------------------------------------------------
21478: -- 4219869 Business Flow
21479: -- Populated credit and debit amounts -- Need to generate this within IF
21480: ------------------------------------------------------------------------------------
21481: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
21482:
21483: ----------------------------------------------------------------------------------
21484: -- 4219869 Business Flow
21485: -- Update journal entry status -- Need to generate this within IF
21509: -- To allow MPA report to determine if it should generate report process
21510: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
21511: ------------------------------------------------------------------------------------------
21512:
21513: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
21514: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
21515:
21516: --
21517: -- Update the line information that should be overwritten
21510: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
21511: ------------------------------------------------------------------------------------------
21512:
21513: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
21514: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
21515:
21516: --
21517: -- Update the line information that should be overwritten
21518: --
21515:
21516: --
21517: -- Update the line information that should be overwritten
21518: --
21519: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
21520: p_header_num => 1);
21521: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
21522:
21523: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
21517: -- Update the line information that should be overwritten
21518: --
21519: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
21520: p_header_num => 1);
21521: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
21522:
21523: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
21524:
21525: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
21519: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
21520: p_header_num => 1);
21521: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
21522:
21523: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
21524:
21525: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
21526: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
21527: END IF;
21522:
21523: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
21524:
21525: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
21526: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
21527: END IF;
21528:
21529: --
21530: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
21529: --
21530: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
21531: --
21532: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
21533: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
21534: ELSE
21535: ---------------------------------------------------------------------------------------------------
21536: -- 4262811a Switch Sign
21537: ---------------------------------------------------------------------------------------------------
21534: ELSE
21535: ---------------------------------------------------------------------------------------------------
21536: -- 4262811a Switch Sign
21537: ---------------------------------------------------------------------------------------------------
21538: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
21539: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21540: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21541: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21542: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21535: ---------------------------------------------------------------------------------------------------
21536: -- 4262811a Switch Sign
21537: ---------------------------------------------------------------------------------------------------
21538: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
21539: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21540: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21541: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21542: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21543: -- 5132302
21536: -- 4262811a Switch Sign
21537: ---------------------------------------------------------------------------------------------------
21538: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
21539: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21540: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21541: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21542: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21543: -- 5132302
21544: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
21537: ---------------------------------------------------------------------------------------------------
21538: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
21539: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21540: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21541: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21542: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21543: -- 5132302
21544: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
21545: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21538: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
21539: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21540: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21541: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21542: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21543: -- 5132302
21544: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
21545: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21546:
21540: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21541: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21542: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21543: -- 5132302
21544: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
21545: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21546:
21547: END IF;
21548:
21541: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21542: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21543: -- 5132302
21544: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
21545: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21546:
21547: END IF;
21548:
21549: -- 4955764
21546:
21547: END IF;
21548:
21549: -- 4955764
21550: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
21551: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
21552:
21553:
21554: XLA_AE_LINES_PKG.ValidateCurrentLine;
21550: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
21551: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
21552:
21553:
21554: XLA_AE_LINES_PKG.ValidateCurrentLine;
21555: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
21556:
21557: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
21558: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
21551: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
21552:
21553:
21554: XLA_AE_LINES_PKG.ValidateCurrentLine;
21555: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
21556:
21557: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
21558: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
21559: ,p_balance_type_code => l_balance_type_code);
21731: --
21732: -- bulk performance
21733: --
21734: l_balance_type_code VARCHAR2(1);
21735: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
21736: l_log_module VARCHAR2(240);
21737:
21738: --
21739: -- Upgrade strategy
21814: ') = 'D'
21815: THEN
21816:
21817: --
21818: XLA_AE_LINES_PKG.SetNewLine;
21819:
21820: p_balance_type_code := l_balance_type_code;
21821: -- set the flag so later we will know whether the gain loss line needs to be created
21822:
21826:
21827: --
21828: -- bulk performance
21829: --
21830: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
21831: p_header_num => 0); -- 4262811
21832: --
21833: -- set accounting line options
21834: --
21831: p_header_num => 0); -- 4262811
21832: --
21833: -- set accounting line options
21834: --
21835: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
21836: p_natural_side_code => 'C'
21837: , p_gain_or_loss_flag => 'N'
21838: , p_gl_transfer_mode_code => 'S'
21839: , p_acct_entry_type_code => 'E'
21845: --
21846: --
21847: -- set accounting line type info
21848: --
21849: xla_ae_lines_pkg.SetAcctLineType
21850: (p_component_type => l_component_type
21851: ,p_event_type_code => l_event_type_code
21852: ,p_line_definition_owner_code => l_line_definition_owner_code
21853: ,p_line_definition_code => l_line_definition_code
21859: ,p_event_class_code => l_event_class_code);
21860: --
21861: -- set accounting class
21862: --
21863: xla_ae_lines_pkg.SetAcctClass(
21864: p_accounting_class_code => 'PO_PA_BURDEN'
21865: , p_ae_header_id => l_ae_header_id
21866: );
21867:
21867:
21868: --
21869: -- set rounding class
21870: --
21871: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
21872: 'PO_PA_BURDEN';
21873:
21874: --
21875: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
21871: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
21872: 'PO_PA_BURDEN';
21873:
21874: --
21875: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
21876: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
21877: --
21878: -- bulk performance
21879: --
21872: 'PO_PA_BURDEN';
21873:
21874: --
21875: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
21876: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
21877: --
21878: -- bulk performance
21879: --
21880: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
21876: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
21877: --
21878: -- bulk performance
21879: --
21880: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
21881:
21882: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
21883: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
21884:
21878: -- bulk performance
21879: --
21880: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
21881:
21882: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
21883: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
21884:
21885: -- 4955764
21886: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
21882: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
21883: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
21884:
21885: -- 4955764
21886: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
21887: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
21888:
21889: -- 4458381 Public Sector Enh
21890:
21964: l_rec_acct_attrs.array_num_value(34) := p_source_39;
21965: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
21966: l_rec_acct_attrs.array_num_value(35) := p_source_40;
21967:
21968: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
21969: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
21970:
21971: ---------------------------------------------------------------------------------------------------------------
21972: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
21965: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
21966: l_rec_acct_attrs.array_num_value(35) := p_source_40;
21967:
21968: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
21969: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
21970:
21971: ---------------------------------------------------------------------------------------------------------------
21972: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
21973: ---------------------------------------------------------------------------------------------------------------
21968: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
21969: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
21970:
21971: ---------------------------------------------------------------------------------------------------------------
21972: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
21973: ---------------------------------------------------------------------------------------------------------------
21974: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
21975:
21976: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
21970:
21971: ---------------------------------------------------------------------------------------------------------------
21972: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
21973: ---------------------------------------------------------------------------------------------------------------
21974: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
21975:
21976: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
21977: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
21978:
21972: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
21973: ---------------------------------------------------------------------------------------------------------------
21974: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
21975:
21976: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
21977: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
21978:
21979: IF xla_accounting_cache_pkg.GetValueChar
21980: (p_source_code => 'LEDGER_CATEGORY_CODE'
21973: ---------------------------------------------------------------------------------------------------------------
21974: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
21975:
21976: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
21977: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
21978:
21979: IF xla_accounting_cache_pkg.GetValueChar
21980: (p_source_code => 'LEDGER_CATEGORY_CODE'
21981: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
21984: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
21985: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
21986: )
21987: THEN
21988: xla_ae_lines_pkg.BflowUpgEntry
21989: (p_business_method_code => l_bflow_method_code
21990: ,p_business_class_code => l_bflow_class_code
21991: ,p_balance_type => l_balance_type_code);
21992: ELSE
21990: ,p_business_class_code => l_bflow_class_code
21991: ,p_balance_type => l_balance_type_code);
21992: ELSE
21993: NULL;
21994: XLA_AE_LINES_PKG.business_flow_validation(
21995: p_business_method_code => l_bflow_method_code
21996: ,p_business_class_code => l_bflow_class_code
21997: ,p_inherit_description_flag => l_inherit_desc_flag);
21998: END IF;
22004: --
22005: -- call description
22006: --
22007:
22008: xla_ae_lines_pkg.SetLineDescription(
22009: p_ae_header_id => l_ae_header_id
22010: ,p_description => Description_2 (
22011: p_application_id => p_application_id
22012: , p_ae_header_id => l_ae_header_id
22050: xla_accounting_err_pkg.build_message
22051: (p_appli_s_name => 'XLA'
22052: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
22053: ,p_token_1 => 'LINE_NUMBER'
22054: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
22055: ,p_token_2 => 'LINE_TYPE_NAME'
22056: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
22057: l_component_type
22058: ,l_component_code
22086: --
22087: --
22088: ------------------------------------------------------------------------------------------------
22089: -- 4219869 Business Flow
22090: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
22091: -- Prior Entry. Currently, the following code is always generated.
22092: ------------------------------------------------------------------------------------------------
22093: -- No ValidateCurrentLine for business flow method of Prior Entry
22094:
22095: ------------------------------------------------------------------------------------
22096: -- 4219869 Business Flow
22097: -- Populated credit and debit amounts -- Need to generate this within IF
22098: ------------------------------------------------------------------------------------
22099: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
22100:
22101: ----------------------------------------------------------------------------------
22102: -- 4219869 Business Flow
22103: -- Update journal entry status -- Need to generate this within IF
22127: -- To allow MPA report to determine if it should generate report process
22128: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
22129: ------------------------------------------------------------------------------------------
22130:
22131: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
22132: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
22133:
22134: --
22135: -- Update the line information that should be overwritten
22128: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
22129: ------------------------------------------------------------------------------------------
22130:
22131: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
22132: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
22133:
22134: --
22135: -- Update the line information that should be overwritten
22136: --
22133:
22134: --
22135: -- Update the line information that should be overwritten
22136: --
22137: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
22138: p_header_num => 1);
22139: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
22140:
22141: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
22135: -- Update the line information that should be overwritten
22136: --
22137: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
22138: p_header_num => 1);
22139: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
22140:
22141: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
22142:
22143: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
22137: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
22138: p_header_num => 1);
22139: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
22140:
22141: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
22142:
22143: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
22144: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
22145: END IF;
22140:
22141: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
22142:
22143: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
22144: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
22145: END IF;
22146:
22147: --
22148: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
22147: --
22148: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
22149: --
22150: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
22151: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
22152: ELSE
22153: ---------------------------------------------------------------------------------------------------
22154: -- 4262811a Switch Sign
22155: ---------------------------------------------------------------------------------------------------
22152: ELSE
22153: ---------------------------------------------------------------------------------------------------
22154: -- 4262811a Switch Sign
22155: ---------------------------------------------------------------------------------------------------
22156: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
22157: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22158: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22159: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22160: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22153: ---------------------------------------------------------------------------------------------------
22154: -- 4262811a Switch Sign
22155: ---------------------------------------------------------------------------------------------------
22156: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
22157: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22158: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22159: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22160: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22161: -- 5132302
22154: -- 4262811a Switch Sign
22155: ---------------------------------------------------------------------------------------------------
22156: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
22157: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22158: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22159: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22160: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22161: -- 5132302
22162: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
22155: ---------------------------------------------------------------------------------------------------
22156: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
22157: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22158: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22159: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22160: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22161: -- 5132302
22162: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
22163: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22156: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
22157: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22158: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22159: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22160: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22161: -- 5132302
22162: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
22163: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22164:
22158: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22159: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22160: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22161: -- 5132302
22162: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
22163: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22164:
22165: END IF;
22166:
22159: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22160: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22161: -- 5132302
22162: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
22163: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22164:
22165: END IF;
22166:
22167: -- 4955764
22164:
22165: END IF;
22166:
22167: -- 4955764
22168: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
22169: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
22170:
22171:
22172: XLA_AE_LINES_PKG.ValidateCurrentLine;
22168: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
22169: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
22170:
22171:
22172: XLA_AE_LINES_PKG.ValidateCurrentLine;
22173: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
22174:
22175: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
22176: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
22169: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
22170:
22171:
22172: XLA_AE_LINES_PKG.ValidateCurrentLine;
22173: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
22174:
22175: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
22176: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
22177: ,p_balance_type_code => l_balance_type_code);
22349: --
22350: -- bulk performance
22351: --
22352: l_balance_type_code VARCHAR2(1);
22353: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
22354: l_log_module VARCHAR2(240);
22355:
22356: --
22357: -- Upgrade strategy
22432: ') <> 'Y'
22433: THEN
22434:
22435: --
22436: XLA_AE_LINES_PKG.SetNewLine;
22437:
22438: p_balance_type_code := l_balance_type_code;
22439: -- set the flag so later we will know whether the gain loss line needs to be created
22440:
22444:
22445: --
22446: -- bulk performance
22447: --
22448: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
22449: p_header_num => 0); -- 4262811
22450: --
22451: -- set accounting line options
22452: --
22449: p_header_num => 0); -- 4262811
22450: --
22451: -- set accounting line options
22452: --
22453: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
22454: p_natural_side_code => 'C'
22455: , p_gain_or_loss_flag => 'N'
22456: , p_gl_transfer_mode_code => 'S'
22457: , p_acct_entry_type_code => 'E'
22463: --
22464: --
22465: -- set accounting line type info
22466: --
22467: xla_ae_lines_pkg.SetAcctLineType
22468: (p_component_type => l_component_type
22469: ,p_event_type_code => l_event_type_code
22470: ,p_line_definition_owner_code => l_line_definition_owner_code
22471: ,p_line_definition_code => l_line_definition_code
22477: ,p_event_class_code => l_event_class_code);
22478: --
22479: -- set accounting class
22480: --
22481: xla_ae_lines_pkg.SetAcctClass(
22482: p_accounting_class_code => 'REQ_PA_BURDEN'
22483: , p_ae_header_id => l_ae_header_id
22484: );
22485:
22485:
22486: --
22487: -- set rounding class
22488: --
22489: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
22490: 'REQ_PA_BURDEN';
22491:
22492: --
22493: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
22489: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
22490: 'REQ_PA_BURDEN';
22491:
22492: --
22493: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
22494: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
22495: --
22496: -- bulk performance
22497: --
22490: 'REQ_PA_BURDEN';
22491:
22492: --
22493: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
22494: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
22495: --
22496: -- bulk performance
22497: --
22498: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
22494: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
22495: --
22496: -- bulk performance
22497: --
22498: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
22499:
22500: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
22501: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
22502:
22496: -- bulk performance
22497: --
22498: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
22499:
22500: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
22501: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
22502:
22503: -- 4955764
22504: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
22500: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
22501: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
22502:
22503: -- 4955764
22504: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
22505: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
22506:
22507: -- 4458381 Public Sector Enh
22508:
22580: l_rec_acct_attrs.array_num_value(33) := p_source_39;
22581: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
22582: l_rec_acct_attrs.array_num_value(34) := p_source_40;
22583:
22584: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
22585: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
22586:
22587: ---------------------------------------------------------------------------------------------------------------
22588: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
22581: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
22582: l_rec_acct_attrs.array_num_value(34) := p_source_40;
22583:
22584: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
22585: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
22586:
22587: ---------------------------------------------------------------------------------------------------------------
22588: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
22589: ---------------------------------------------------------------------------------------------------------------
22584: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
22585: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
22586:
22587: ---------------------------------------------------------------------------------------------------------------
22588: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
22589: ---------------------------------------------------------------------------------------------------------------
22590: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
22591:
22592: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
22586:
22587: ---------------------------------------------------------------------------------------------------------------
22588: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
22589: ---------------------------------------------------------------------------------------------------------------
22590: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
22591:
22592: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
22593: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
22594:
22588: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
22589: ---------------------------------------------------------------------------------------------------------------
22590: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
22591:
22592: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
22593: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
22594:
22595: IF xla_accounting_cache_pkg.GetValueChar
22596: (p_source_code => 'LEDGER_CATEGORY_CODE'
22589: ---------------------------------------------------------------------------------------------------------------
22590: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
22591:
22592: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
22593: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
22594:
22595: IF xla_accounting_cache_pkg.GetValueChar
22596: (p_source_code => 'LEDGER_CATEGORY_CODE'
22597: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
22600: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
22601: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
22602: )
22603: THEN
22604: xla_ae_lines_pkg.BflowUpgEntry
22605: (p_business_method_code => l_bflow_method_code
22606: ,p_business_class_code => l_bflow_class_code
22607: ,p_balance_type => l_balance_type_code);
22608: ELSE
22606: ,p_business_class_code => l_bflow_class_code
22607: ,p_balance_type => l_balance_type_code);
22608: ELSE
22609: NULL;
22610: XLA_AE_LINES_PKG.business_flow_validation(
22611: p_business_method_code => l_bflow_method_code
22612: ,p_business_class_code => l_bflow_class_code
22613: ,p_inherit_description_flag => l_inherit_desc_flag);
22614: END IF;
22620: --
22621: -- call description
22622: --
22623:
22624: xla_ae_lines_pkg.SetLineDescription(
22625: p_ae_header_id => l_ae_header_id
22626: ,p_description => Description_2 (
22627: p_application_id => p_application_id
22628: , p_ae_header_id => l_ae_header_id
22666: xla_accounting_err_pkg.build_message
22667: (p_appli_s_name => 'XLA'
22668: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
22669: ,p_token_1 => 'LINE_NUMBER'
22670: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
22671: ,p_token_2 => 'LINE_TYPE_NAME'
22672: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
22673: l_component_type
22674: ,l_component_code
22702: --
22703: --
22704: ------------------------------------------------------------------------------------------------
22705: -- 4219869 Business Flow
22706: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
22707: -- Prior Entry. Currently, the following code is always generated.
22708: ------------------------------------------------------------------------------------------------
22709: -- No ValidateCurrentLine for business flow method of Prior Entry
22710:
22711: ------------------------------------------------------------------------------------
22712: -- 4219869 Business Flow
22713: -- Populated credit and debit amounts -- Need to generate this within IF
22714: ------------------------------------------------------------------------------------
22715: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
22716:
22717: ----------------------------------------------------------------------------------
22718: -- 4219869 Business Flow
22719: -- Update journal entry status -- Need to generate this within IF
22743: -- To allow MPA report to determine if it should generate report process
22744: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
22745: ------------------------------------------------------------------------------------------
22746:
22747: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
22748: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
22749:
22750: --
22751: -- Update the line information that should be overwritten
22744: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
22745: ------------------------------------------------------------------------------------------
22746:
22747: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
22748: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
22749:
22750: --
22751: -- Update the line information that should be overwritten
22752: --
22749:
22750: --
22751: -- Update the line information that should be overwritten
22752: --
22753: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
22754: p_header_num => 1);
22755: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
22756:
22757: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
22751: -- Update the line information that should be overwritten
22752: --
22753: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
22754: p_header_num => 1);
22755: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
22756:
22757: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
22758:
22759: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
22753: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
22754: p_header_num => 1);
22755: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
22756:
22757: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
22758:
22759: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
22760: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
22761: END IF;
22756:
22757: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
22758:
22759: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
22760: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
22761: END IF;
22762:
22763: --
22764: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
22763: --
22764: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
22765: --
22766: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
22767: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
22768: ELSE
22769: ---------------------------------------------------------------------------------------------------
22770: -- 4262811a Switch Sign
22771: ---------------------------------------------------------------------------------------------------
22768: ELSE
22769: ---------------------------------------------------------------------------------------------------
22770: -- 4262811a Switch Sign
22771: ---------------------------------------------------------------------------------------------------
22772: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
22773: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22774: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22775: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22776: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22769: ---------------------------------------------------------------------------------------------------
22770: -- 4262811a Switch Sign
22771: ---------------------------------------------------------------------------------------------------
22772: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
22773: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22774: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22775: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22776: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22777: -- 5132302
22770: -- 4262811a Switch Sign
22771: ---------------------------------------------------------------------------------------------------
22772: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
22773: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22774: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22775: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22776: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22777: -- 5132302
22778: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
22771: ---------------------------------------------------------------------------------------------------
22772: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
22773: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22774: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22775: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22776: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22777: -- 5132302
22778: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
22779: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22772: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
22773: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22774: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22775: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22776: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22777: -- 5132302
22778: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
22779: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22780:
22774: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22775: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22776: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22777: -- 5132302
22778: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
22779: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22780:
22781: END IF;
22782:
22775: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22776: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22777: -- 5132302
22778: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
22779: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22780:
22781: END IF;
22782:
22783: -- 4955764
22780:
22781: END IF;
22782:
22783: -- 4955764
22784: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
22785: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
22786:
22787:
22788: XLA_AE_LINES_PKG.ValidateCurrentLine;
22784: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
22785: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
22786:
22787:
22788: XLA_AE_LINES_PKG.ValidateCurrentLine;
22789: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
22790:
22791: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
22792: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
22785: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
22786:
22787:
22788: XLA_AE_LINES_PKG.ValidateCurrentLine;
22789: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
22790:
22791: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
22792: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
22793: ,p_balance_type_code => l_balance_type_code);
22965: --
22966: -- bulk performance
22967: --
22968: l_balance_type_code VARCHAR2(1);
22969: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
22970: l_log_module VARCHAR2(240);
22971:
22972: --
22973: -- Upgrade strategy
23046: ') = 'D'
23047: THEN
23048:
23049: --
23050: XLA_AE_LINES_PKG.SetNewLine;
23051:
23052: p_balance_type_code := l_balance_type_code;
23053: -- set the flag so later we will know whether the gain loss line needs to be created
23054:
23058:
23059: --
23060: -- bulk performance
23061: --
23062: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
23063: p_header_num => 0); -- 4262811
23064: --
23065: -- set accounting line options
23066: --
23063: p_header_num => 0); -- 4262811
23064: --
23065: -- set accounting line options
23066: --
23067: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
23068: p_natural_side_code => 'C'
23069: , p_gain_or_loss_flag => 'N'
23070: , p_gl_transfer_mode_code => 'S'
23071: , p_acct_entry_type_code => 'E'
23077: --
23078: --
23079: -- set accounting line type info
23080: --
23081: xla_ae_lines_pkg.SetAcctLineType
23082: (p_component_type => l_component_type
23083: ,p_event_type_code => l_event_type_code
23084: ,p_line_definition_owner_code => l_line_definition_owner_code
23085: ,p_line_definition_code => l_line_definition_code
23091: ,p_event_class_code => l_event_class_code);
23092: --
23093: -- set accounting class
23094: --
23095: xla_ae_lines_pkg.SetAcctClass(
23096: p_accounting_class_code => 'REQ_PA_BURDEN'
23097: , p_ae_header_id => l_ae_header_id
23098: );
23099:
23099:
23100: --
23101: -- set rounding class
23102: --
23103: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
23104: 'REQ_PA_BURDEN';
23105:
23106: --
23107: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
23103: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
23104: 'REQ_PA_BURDEN';
23105:
23106: --
23107: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
23108: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
23109: --
23110: -- bulk performance
23111: --
23104: 'REQ_PA_BURDEN';
23105:
23106: --
23107: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
23108: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
23109: --
23110: -- bulk performance
23111: --
23112: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
23108: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
23109: --
23110: -- bulk performance
23111: --
23112: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
23113:
23114: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
23115: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
23116:
23110: -- bulk performance
23111: --
23112: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
23113:
23114: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
23115: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
23116:
23117: -- 4955764
23118: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
23114: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
23115: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
23116:
23117: -- 4955764
23118: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
23119: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
23120:
23121: -- 4458381 Public Sector Enh
23122:
23196: l_rec_acct_attrs.array_num_value(34) := p_source_39;
23197: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
23198: l_rec_acct_attrs.array_num_value(35) := p_source_40;
23199:
23200: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
23201: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
23202:
23203: ---------------------------------------------------------------------------------------------------------------
23204: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
23197: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
23198: l_rec_acct_attrs.array_num_value(35) := p_source_40;
23199:
23200: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
23201: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
23202:
23203: ---------------------------------------------------------------------------------------------------------------
23204: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
23205: ---------------------------------------------------------------------------------------------------------------
23200: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
23201: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
23202:
23203: ---------------------------------------------------------------------------------------------------------------
23204: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
23205: ---------------------------------------------------------------------------------------------------------------
23206: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
23207:
23208: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23202:
23203: ---------------------------------------------------------------------------------------------------------------
23204: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
23205: ---------------------------------------------------------------------------------------------------------------
23206: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
23207:
23208: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23209: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23210:
23204: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
23205: ---------------------------------------------------------------------------------------------------------------
23206: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
23207:
23208: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23209: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23210:
23211: IF xla_accounting_cache_pkg.GetValueChar
23212: (p_source_code => 'LEDGER_CATEGORY_CODE'
23205: ---------------------------------------------------------------------------------------------------------------
23206: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
23207:
23208: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23209: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23210:
23211: IF xla_accounting_cache_pkg.GetValueChar
23212: (p_source_code => 'LEDGER_CATEGORY_CODE'
23213: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
23216: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
23217: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
23218: )
23219: THEN
23220: xla_ae_lines_pkg.BflowUpgEntry
23221: (p_business_method_code => l_bflow_method_code
23222: ,p_business_class_code => l_bflow_class_code
23223: ,p_balance_type => l_balance_type_code);
23224: ELSE
23222: ,p_business_class_code => l_bflow_class_code
23223: ,p_balance_type => l_balance_type_code);
23224: ELSE
23225: NULL;
23226: XLA_AE_LINES_PKG.business_flow_validation(
23227: p_business_method_code => l_bflow_method_code
23228: ,p_business_class_code => l_bflow_class_code
23229: ,p_inherit_description_flag => l_inherit_desc_flag);
23230: END IF;
23236: --
23237: -- call description
23238: --
23239:
23240: xla_ae_lines_pkg.SetLineDescription(
23241: p_ae_header_id => l_ae_header_id
23242: ,p_description => Description_2 (
23243: p_application_id => p_application_id
23244: , p_ae_header_id => l_ae_header_id
23282: xla_accounting_err_pkg.build_message
23283: (p_appli_s_name => 'XLA'
23284: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
23285: ,p_token_1 => 'LINE_NUMBER'
23286: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
23287: ,p_token_2 => 'LINE_TYPE_NAME'
23288: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
23289: l_component_type
23290: ,l_component_code
23318: --
23319: --
23320: ------------------------------------------------------------------------------------------------
23321: -- 4219869 Business Flow
23322: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
23323: -- Prior Entry. Currently, the following code is always generated.
23324: ------------------------------------------------------------------------------------------------
23325: -- No ValidateCurrentLine for business flow method of Prior Entry
23326:
23327: ------------------------------------------------------------------------------------
23328: -- 4219869 Business Flow
23329: -- Populated credit and debit amounts -- Need to generate this within IF
23330: ------------------------------------------------------------------------------------
23331: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
23332:
23333: ----------------------------------------------------------------------------------
23334: -- 4219869 Business Flow
23335: -- Update journal entry status -- Need to generate this within IF
23359: -- To allow MPA report to determine if it should generate report process
23360: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
23361: ------------------------------------------------------------------------------------------
23362:
23363: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
23364: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
23365:
23366: --
23367: -- Update the line information that should be overwritten
23360: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
23361: ------------------------------------------------------------------------------------------
23362:
23363: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
23364: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
23365:
23366: --
23367: -- Update the line information that should be overwritten
23368: --
23365:
23366: --
23367: -- Update the line information that should be overwritten
23368: --
23369: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
23370: p_header_num => 1);
23371: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
23372:
23373: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
23367: -- Update the line information that should be overwritten
23368: --
23369: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
23370: p_header_num => 1);
23371: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
23372:
23373: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
23374:
23375: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
23369: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
23370: p_header_num => 1);
23371: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
23372:
23373: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
23374:
23375: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
23376: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
23377: END IF;
23372:
23373: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
23374:
23375: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
23376: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
23377: END IF;
23378:
23379: --
23380: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
23379: --
23380: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
23381: --
23382: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
23383: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
23384: ELSE
23385: ---------------------------------------------------------------------------------------------------
23386: -- 4262811a Switch Sign
23387: ---------------------------------------------------------------------------------------------------
23384: ELSE
23385: ---------------------------------------------------------------------------------------------------
23386: -- 4262811a Switch Sign
23387: ---------------------------------------------------------------------------------------------------
23388: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
23389: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23390: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23391: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23392: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23385: ---------------------------------------------------------------------------------------------------
23386: -- 4262811a Switch Sign
23387: ---------------------------------------------------------------------------------------------------
23388: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
23389: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23390: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23391: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23392: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23393: -- 5132302
23386: -- 4262811a Switch Sign
23387: ---------------------------------------------------------------------------------------------------
23388: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
23389: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23390: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23391: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23392: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23393: -- 5132302
23394: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
23387: ---------------------------------------------------------------------------------------------------
23388: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
23389: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23390: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23391: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23392: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23393: -- 5132302
23394: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
23395: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23388: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
23389: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23390: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23391: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23392: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23393: -- 5132302
23394: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
23395: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23396:
23390: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23391: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23392: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23393: -- 5132302
23394: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
23395: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23396:
23397: END IF;
23398:
23391: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23392: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23393: -- 5132302
23394: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
23395: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23396:
23397: END IF;
23398:
23399: -- 4955764
23396:
23397: END IF;
23398:
23399: -- 4955764
23400: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
23401: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
23402:
23403:
23404: XLA_AE_LINES_PKG.ValidateCurrentLine;
23400: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
23401: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
23402:
23403:
23404: XLA_AE_LINES_PKG.ValidateCurrentLine;
23405: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
23406:
23407: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
23408: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
23401: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
23402:
23403:
23404: XLA_AE_LINES_PKG.ValidateCurrentLine;
23405: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
23406:
23407: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
23408: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
23409: ,p_balance_type_code => l_balance_type_code);
23552: --
23553: -- bulk performance
23554: --
23555: l_balance_type_code VARCHAR2(1);
23556: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
23557: l_log_module VARCHAR2(240);
23558:
23559: --
23560: -- Upgrade strategy
23629: ') = 'B_PA')
23630: THEN
23631:
23632: --
23633: XLA_AE_LINES_PKG.SetNewLine;
23634:
23635: p_balance_type_code := l_balance_type_code;
23636: -- set the flag so later we will know whether the gain loss line needs to be created
23637:
23641:
23642: --
23643: -- bulk performance
23644: --
23645: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
23646: p_header_num => 0); -- 4262811
23647: --
23648: -- set accounting line options
23649: --
23646: p_header_num => 0); -- 4262811
23647: --
23648: -- set accounting line options
23649: --
23650: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
23651: p_natural_side_code => 'C'
23652: , p_gain_or_loss_flag => 'N'
23653: , p_gl_transfer_mode_code => 'S'
23654: , p_acct_entry_type_code => 'E'
23660: --
23661: --
23662: -- set accounting line type info
23663: --
23664: xla_ae_lines_pkg.SetAcctLineType
23665: (p_component_type => l_component_type
23666: ,p_event_type_code => l_event_type_code
23667: ,p_line_definition_owner_code => l_line_definition_owner_code
23668: ,p_line_definition_code => l_line_definition_code
23674: ,p_event_class_code => l_event_class_code);
23675: --
23676: -- set accounting class
23677: --
23678: xla_ae_lines_pkg.SetAcctClass(
23679: p_accounting_class_code => 'PURCHASE_ORDER'
23680: , p_ae_header_id => l_ae_header_id
23681: );
23682:
23682:
23683: --
23684: -- set rounding class
23685: --
23686: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
23687: 'PURCHASE_ORDER';
23688:
23689: --
23690: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
23686: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
23687: 'PURCHASE_ORDER';
23688:
23689: --
23690: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
23691: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
23692: --
23693: -- bulk performance
23694: --
23687: 'PURCHASE_ORDER';
23688:
23689: --
23690: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
23691: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
23692: --
23693: -- bulk performance
23694: --
23695: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
23691: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
23692: --
23693: -- bulk performance
23694: --
23695: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
23696:
23697: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
23698: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
23699:
23693: -- bulk performance
23694: --
23695: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
23696:
23697: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
23698: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
23699:
23700: -- 4955764
23701: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
23697: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
23698: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
23699:
23700: -- 4955764
23701: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
23702: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
23703:
23704: -- 4458381 Public Sector Enh
23705:
23781: l_rec_acct_attrs.array_num_value(30) := p_source_61;
23782: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
23783: l_rec_acct_attrs.array_num_value(31) := p_source_61;
23784:
23785: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
23786: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
23787:
23788: ---------------------------------------------------------------------------------------------------------------
23789: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
23782: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
23783: l_rec_acct_attrs.array_num_value(31) := p_source_61;
23784:
23785: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
23786: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
23787:
23788: ---------------------------------------------------------------------------------------------------------------
23789: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
23790: ---------------------------------------------------------------------------------------------------------------
23785: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
23786: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
23787:
23788: ---------------------------------------------------------------------------------------------------------------
23789: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
23790: ---------------------------------------------------------------------------------------------------------------
23791: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
23792:
23793: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23787:
23788: ---------------------------------------------------------------------------------------------------------------
23789: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
23790: ---------------------------------------------------------------------------------------------------------------
23791: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
23792:
23793: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23794: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23795:
23789: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
23790: ---------------------------------------------------------------------------------------------------------------
23791: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
23792:
23793: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23794: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23795:
23796: IF xla_accounting_cache_pkg.GetValueChar
23797: (p_source_code => 'LEDGER_CATEGORY_CODE'
23790: ---------------------------------------------------------------------------------------------------------------
23791: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
23792:
23793: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23794: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23795:
23796: IF xla_accounting_cache_pkg.GetValueChar
23797: (p_source_code => 'LEDGER_CATEGORY_CODE'
23798: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
23801: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
23802: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
23803: )
23804: THEN
23805: xla_ae_lines_pkg.BflowUpgEntry
23806: (p_business_method_code => l_bflow_method_code
23807: ,p_business_class_code => l_bflow_class_code
23808: ,p_balance_type => l_balance_type_code);
23809: ELSE
23807: ,p_business_class_code => l_bflow_class_code
23808: ,p_balance_type => l_balance_type_code);
23809: ELSE
23810: NULL;
23811: XLA_AE_LINES_PKG.business_flow_validation(
23812: p_business_method_code => l_bflow_method_code
23813: ,p_business_class_code => l_bflow_class_code
23814: ,p_inherit_description_flag => l_inherit_desc_flag);
23815: END IF;
23854: xla_accounting_err_pkg.build_message
23855: (p_appli_s_name => 'XLA'
23856: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
23857: ,p_token_1 => 'LINE_NUMBER'
23858: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
23859: ,p_token_2 => 'LINE_TYPE_NAME'
23860: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
23861: l_component_type
23862: ,l_component_code
23890: --
23891: --
23892: ------------------------------------------------------------------------------------------------
23893: -- 4219869 Business Flow
23894: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
23895: -- Prior Entry. Currently, the following code is always generated.
23896: ------------------------------------------------------------------------------------------------
23897: -- No ValidateCurrentLine for business flow method of Prior Entry
23898:
23899: ------------------------------------------------------------------------------------
23900: -- 4219869 Business Flow
23901: -- Populated credit and debit amounts -- Need to generate this within IF
23902: ------------------------------------------------------------------------------------
23903: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
23904:
23905: ----------------------------------------------------------------------------------
23906: -- 4219869 Business Flow
23907: -- Update journal entry status -- Need to generate this within IF
23931: -- To allow MPA report to determine if it should generate report process
23932: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
23933: ------------------------------------------------------------------------------------------
23934:
23935: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
23936: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
23937:
23938: --
23939: -- Update the line information that should be overwritten
23932: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
23933: ------------------------------------------------------------------------------------------
23934:
23935: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
23936: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
23937:
23938: --
23939: -- Update the line information that should be overwritten
23940: --
23937:
23938: --
23939: -- Update the line information that should be overwritten
23940: --
23941: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
23942: p_header_num => 1);
23943: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
23944:
23945: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
23939: -- Update the line information that should be overwritten
23940: --
23941: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
23942: p_header_num => 1);
23943: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
23944:
23945: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
23946:
23947: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
23941: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
23942: p_header_num => 1);
23943: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
23944:
23945: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
23946:
23947: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
23948: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
23949: END IF;
23944:
23945: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
23946:
23947: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
23948: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
23949: END IF;
23950:
23951: --
23952: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
23951: --
23952: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
23953: --
23954: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
23955: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
23956: ELSE
23957: ---------------------------------------------------------------------------------------------------
23958: -- 4262811a Switch Sign
23959: ---------------------------------------------------------------------------------------------------
23956: ELSE
23957: ---------------------------------------------------------------------------------------------------
23958: -- 4262811a Switch Sign
23959: ---------------------------------------------------------------------------------------------------
23960: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
23961: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23962: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23963: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23964: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23957: ---------------------------------------------------------------------------------------------------
23958: -- 4262811a Switch Sign
23959: ---------------------------------------------------------------------------------------------------
23960: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
23961: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23962: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23963: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23964: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23965: -- 5132302
23958: -- 4262811a Switch Sign
23959: ---------------------------------------------------------------------------------------------------
23960: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
23961: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23962: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23963: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23964: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23965: -- 5132302
23966: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
23959: ---------------------------------------------------------------------------------------------------
23960: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
23961: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23962: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23963: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23964: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23965: -- 5132302
23966: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
23967: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23960: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
23961: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23962: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23963: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23964: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23965: -- 5132302
23966: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
23967: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23968:
23962: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23963: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23964: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23965: -- 5132302
23966: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
23967: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23968:
23969: END IF;
23970:
23963: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23964: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23965: -- 5132302
23966: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
23967: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23968:
23969: END IF;
23970:
23971: -- 4955764
23968:
23969: END IF;
23970:
23971: -- 4955764
23972: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
23973: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
23974:
23975:
23976: XLA_AE_LINES_PKG.ValidateCurrentLine;
23972: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
23973: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
23974:
23975:
23976: XLA_AE_LINES_PKG.ValidateCurrentLine;
23977: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
23978:
23979: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
23980: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
23973: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
23974:
23975:
23976: XLA_AE_LINES_PKG.ValidateCurrentLine;
23977: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
23978:
23979: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
23980: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
23981: ,p_balance_type_code => l_balance_type_code);
24146: --
24147: -- bulk performance
24148: --
24149: l_balance_type_code VARCHAR2(1);
24150: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
24151: l_log_module VARCHAR2(240);
24152:
24153: --
24154: -- Upgrade strategy
24269: ') = 'B_REQ')
24270: ) THEN
24271:
24272: --
24273: XLA_AE_LINES_PKG.SetNewLine;
24274:
24275: p_balance_type_code := l_balance_type_code;
24276: -- set the flag so later we will know whether the gain loss line needs to be created
24277:
24281:
24282: --
24283: -- bulk performance
24284: --
24285: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
24286: p_header_num => 0); -- 4262811
24287: --
24288: -- set accounting line options
24289: --
24286: p_header_num => 0); -- 4262811
24287: --
24288: -- set accounting line options
24289: --
24290: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
24291: p_natural_side_code => 'C'
24292: , p_gain_or_loss_flag => 'N'
24293: , p_gl_transfer_mode_code => 'S'
24294: , p_acct_entry_type_code => 'E'
24300: --
24301: --
24302: -- set accounting line type info
24303: --
24304: xla_ae_lines_pkg.SetAcctLineType
24305: (p_component_type => l_component_type
24306: ,p_event_type_code => l_event_type_code
24307: ,p_line_definition_owner_code => l_line_definition_owner_code
24308: ,p_line_definition_code => l_line_definition_code
24314: ,p_event_class_code => l_event_class_code);
24315: --
24316: -- set accounting class
24317: --
24318: xla_ae_lines_pkg.SetAcctClass(
24319: p_accounting_class_code => 'PA_BUDGET_ENC'
24320: , p_ae_header_id => l_ae_header_id
24321: );
24322:
24322:
24323: --
24324: -- set rounding class
24325: --
24326: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
24327: 'PA_BUDGET_ENC';
24328:
24329: --
24330: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
24326: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
24327: 'PA_BUDGET_ENC';
24328:
24329: --
24330: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
24331: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
24332: --
24333: -- bulk performance
24334: --
24327: 'PA_BUDGET_ENC';
24328:
24329: --
24330: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
24331: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
24332: --
24333: -- bulk performance
24334: --
24335: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
24331: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
24332: --
24333: -- bulk performance
24334: --
24335: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
24336:
24337: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
24338: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
24339:
24333: -- bulk performance
24334: --
24335: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
24336:
24337: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
24338: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
24339:
24340: -- 4955764
24341: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
24337: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
24338: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
24339:
24340: -- 4955764
24341: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
24342: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
24343:
24344: -- 4458381 Public Sector Enh
24345:
24419: l_rec_acct_attrs.array_num_value(34) := p_source_39;
24420: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
24421: l_rec_acct_attrs.array_num_value(35) := p_source_40;
24422:
24423: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
24424: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
24425:
24426: ---------------------------------------------------------------------------------------------------------------
24427: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
24420: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
24421: l_rec_acct_attrs.array_num_value(35) := p_source_40;
24422:
24423: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
24424: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
24425:
24426: ---------------------------------------------------------------------------------------------------------------
24427: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
24428: ---------------------------------------------------------------------------------------------------------------
24423: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
24424: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
24425:
24426: ---------------------------------------------------------------------------------------------------------------
24427: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
24428: ---------------------------------------------------------------------------------------------------------------
24429: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
24430:
24431: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
24425:
24426: ---------------------------------------------------------------------------------------------------------------
24427: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
24428: ---------------------------------------------------------------------------------------------------------------
24429: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
24430:
24431: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
24432: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
24433:
24427: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
24428: ---------------------------------------------------------------------------------------------------------------
24429: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
24430:
24431: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
24432: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
24433:
24434: IF xla_accounting_cache_pkg.GetValueChar
24435: (p_source_code => 'LEDGER_CATEGORY_CODE'
24428: ---------------------------------------------------------------------------------------------------------------
24429: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
24430:
24431: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
24432: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
24433:
24434: IF xla_accounting_cache_pkg.GetValueChar
24435: (p_source_code => 'LEDGER_CATEGORY_CODE'
24436: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
24439: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
24440: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
24441: )
24442: THEN
24443: xla_ae_lines_pkg.BflowUpgEntry
24444: (p_business_method_code => l_bflow_method_code
24445: ,p_business_class_code => l_bflow_class_code
24446: ,p_balance_type => l_balance_type_code);
24447: ELSE
24445: ,p_business_class_code => l_bflow_class_code
24446: ,p_balance_type => l_balance_type_code);
24447: ELSE
24448: NULL;
24449: XLA_AE_LINES_PKG.business_flow_validation(
24450: p_business_method_code => l_bflow_method_code
24451: ,p_business_class_code => l_bflow_class_code
24452: ,p_inherit_description_flag => l_inherit_desc_flag);
24453: END IF;
24459: --
24460: -- call description
24461: --
24462:
24463: xla_ae_lines_pkg.SetLineDescription(
24464: p_ae_header_id => l_ae_header_id
24465: ,p_description => Description_2 (
24466: p_application_id => p_application_id
24467: , p_ae_header_id => l_ae_header_id
24505: xla_accounting_err_pkg.build_message
24506: (p_appli_s_name => 'XLA'
24507: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
24508: ,p_token_1 => 'LINE_NUMBER'
24509: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
24510: ,p_token_2 => 'LINE_TYPE_NAME'
24511: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
24512: l_component_type
24513: ,l_component_code
24541: --
24542: --
24543: ------------------------------------------------------------------------------------------------
24544: -- 4219869 Business Flow
24545: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
24546: -- Prior Entry. Currently, the following code is always generated.
24547: ------------------------------------------------------------------------------------------------
24548: -- No ValidateCurrentLine for business flow method of Prior Entry
24549:
24550: ------------------------------------------------------------------------------------
24551: -- 4219869 Business Flow
24552: -- Populated credit and debit amounts -- Need to generate this within IF
24553: ------------------------------------------------------------------------------------
24554: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
24555:
24556: ----------------------------------------------------------------------------------
24557: -- 4219869 Business Flow
24558: -- Update journal entry status -- Need to generate this within IF
24582: -- To allow MPA report to determine if it should generate report process
24583: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
24584: ------------------------------------------------------------------------------------------
24585:
24586: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
24587: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
24588:
24589: --
24590: -- Update the line information that should be overwritten
24583: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
24584: ------------------------------------------------------------------------------------------
24585:
24586: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
24587: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
24588:
24589: --
24590: -- Update the line information that should be overwritten
24591: --
24588:
24589: --
24590: -- Update the line information that should be overwritten
24591: --
24592: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
24593: p_header_num => 1);
24594: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
24595:
24596: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
24590: -- Update the line information that should be overwritten
24591: --
24592: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
24593: p_header_num => 1);
24594: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
24595:
24596: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
24597:
24598: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
24592: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
24593: p_header_num => 1);
24594: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
24595:
24596: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
24597:
24598: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
24599: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
24600: END IF;
24595:
24596: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
24597:
24598: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
24599: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
24600: END IF;
24601:
24602: --
24603: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
24602: --
24603: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
24604: --
24605: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
24606: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
24607: ELSE
24608: ---------------------------------------------------------------------------------------------------
24609: -- 4262811a Switch Sign
24610: ---------------------------------------------------------------------------------------------------
24607: ELSE
24608: ---------------------------------------------------------------------------------------------------
24609: -- 4262811a Switch Sign
24610: ---------------------------------------------------------------------------------------------------
24611: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
24612: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24613: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24614: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24615: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24608: ---------------------------------------------------------------------------------------------------
24609: -- 4262811a Switch Sign
24610: ---------------------------------------------------------------------------------------------------
24611: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
24612: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24613: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24614: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24615: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24616: -- 5132302
24609: -- 4262811a Switch Sign
24610: ---------------------------------------------------------------------------------------------------
24611: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
24612: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24613: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24614: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24615: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24616: -- 5132302
24617: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
24610: ---------------------------------------------------------------------------------------------------
24611: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
24612: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24613: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24614: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24615: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24616: -- 5132302
24617: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
24618: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24611: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
24612: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24613: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24614: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24615: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24616: -- 5132302
24617: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
24618: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24619:
24613: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24614: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24615: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24616: -- 5132302
24617: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
24618: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24619:
24620: END IF;
24621:
24614: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24615: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24616: -- 5132302
24617: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
24618: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24619:
24620: END IF;
24621:
24622: -- 4955764
24619:
24620: END IF;
24621:
24622: -- 4955764
24623: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
24624: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
24625:
24626:
24627: XLA_AE_LINES_PKG.ValidateCurrentLine;
24623: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
24624: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
24625:
24626:
24627: XLA_AE_LINES_PKG.ValidateCurrentLine;
24628: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
24629:
24630: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
24631: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
24624: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
24625:
24626:
24627: XLA_AE_LINES_PKG.ValidateCurrentLine;
24628: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
24629:
24630: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
24631: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
24632: ,p_balance_type_code => l_balance_type_code);
24799: --
24800: -- bulk performance
24801: --
24802: l_balance_type_code VARCHAR2(1);
24803: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
24804: l_log_module VARCHAR2(240);
24805:
24806: --
24807: -- Upgrade strategy
24890: ') = 'M'
24891: THEN
24892:
24893: --
24894: XLA_AE_LINES_PKG.SetNewLine;
24895:
24896: p_balance_type_code := l_balance_type_code;
24897: -- set the flag so later we will know whether the gain loss line needs to be created
24898:
24902:
24903: --
24904: -- bulk performance
24905: --
24906: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
24907: p_header_num => 0); -- 4262811
24908: --
24909: -- set accounting line options
24910: --
24907: p_header_num => 0); -- 4262811
24908: --
24909: -- set accounting line options
24910: --
24911: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
24912: p_natural_side_code => 'C'
24913: , p_gain_or_loss_flag => 'N'
24914: , p_gl_transfer_mode_code => 'S'
24915: , p_acct_entry_type_code => 'E'
24921: --
24922: --
24923: -- set accounting line type info
24924: --
24925: xla_ae_lines_pkg.SetAcctLineType
24926: (p_component_type => l_component_type
24927: ,p_event_type_code => l_event_type_code
24928: ,p_line_definition_owner_code => l_line_definition_owner_code
24929: ,p_line_definition_code => l_line_definition_code
24935: ,p_event_class_code => l_event_class_code);
24936: --
24937: -- set accounting class
24938: --
24939: xla_ae_lines_pkg.SetAcctClass(
24940: p_accounting_class_code => 'PA_BUDGET_ENC'
24941: , p_ae_header_id => l_ae_header_id
24942: );
24943:
24943:
24944: --
24945: -- set rounding class
24946: --
24947: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
24948: 'PA_BUDGET_ENC';
24949:
24950: --
24951: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
24947: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
24948: 'PA_BUDGET_ENC';
24949:
24950: --
24951: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
24952: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
24953: --
24954: -- bulk performance
24955: --
24948: 'PA_BUDGET_ENC';
24949:
24950: --
24951: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
24952: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
24953: --
24954: -- bulk performance
24955: --
24956: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
24952: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
24953: --
24954: -- bulk performance
24955: --
24956: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
24957:
24958: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
24959: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
24960:
24954: -- bulk performance
24955: --
24956: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
24957:
24958: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
24959: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
24960:
24961: -- 4955764
24962: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
24958: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
24959: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
24960:
24961: -- 4955764
24962: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
24963: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
24964:
24965: -- 4458381 Public Sector Enh
24966:
25040: l_rec_acct_attrs.array_num_value(34) := p_source_39;
25041: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
25042: l_rec_acct_attrs.array_num_value(35) := p_source_40;
25043:
25044: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
25045: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
25046:
25047: ---------------------------------------------------------------------------------------------------------------
25048: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
25041: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
25042: l_rec_acct_attrs.array_num_value(35) := p_source_40;
25043:
25044: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
25045: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
25046:
25047: ---------------------------------------------------------------------------------------------------------------
25048: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
25049: ---------------------------------------------------------------------------------------------------------------
25044: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
25045: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
25046:
25047: ---------------------------------------------------------------------------------------------------------------
25048: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
25049: ---------------------------------------------------------------------------------------------------------------
25050: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
25051:
25052: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25046:
25047: ---------------------------------------------------------------------------------------------------------------
25048: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
25049: ---------------------------------------------------------------------------------------------------------------
25050: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
25051:
25052: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25053: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25054:
25048: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
25049: ---------------------------------------------------------------------------------------------------------------
25050: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
25051:
25052: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25053: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25054:
25055: IF xla_accounting_cache_pkg.GetValueChar
25056: (p_source_code => 'LEDGER_CATEGORY_CODE'
25049: ---------------------------------------------------------------------------------------------------------------
25050: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
25051:
25052: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25053: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25054:
25055: IF xla_accounting_cache_pkg.GetValueChar
25056: (p_source_code => 'LEDGER_CATEGORY_CODE'
25057: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
25060: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
25061: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
25062: )
25063: THEN
25064: xla_ae_lines_pkg.BflowUpgEntry
25065: (p_business_method_code => l_bflow_method_code
25066: ,p_business_class_code => l_bflow_class_code
25067: ,p_balance_type => l_balance_type_code);
25068: ELSE
25066: ,p_business_class_code => l_bflow_class_code
25067: ,p_balance_type => l_balance_type_code);
25068: ELSE
25069: NULL;
25070: XLA_AE_LINES_PKG.business_flow_validation(
25071: p_business_method_code => l_bflow_method_code
25072: ,p_business_class_code => l_bflow_class_code
25073: ,p_inherit_description_flag => l_inherit_desc_flag);
25074: END IF;
25080: --
25081: -- call description
25082: --
25083:
25084: xla_ae_lines_pkg.SetLineDescription(
25085: p_ae_header_id => l_ae_header_id
25086: ,p_description => Description_2 (
25087: p_application_id => p_application_id
25088: , p_ae_header_id => l_ae_header_id
25126: xla_accounting_err_pkg.build_message
25127: (p_appli_s_name => 'XLA'
25128: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
25129: ,p_token_1 => 'LINE_NUMBER'
25130: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
25131: ,p_token_2 => 'LINE_TYPE_NAME'
25132: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
25133: l_component_type
25134: ,l_component_code
25162: --
25163: --
25164: ------------------------------------------------------------------------------------------------
25165: -- 4219869 Business Flow
25166: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
25167: -- Prior Entry. Currently, the following code is always generated.
25168: ------------------------------------------------------------------------------------------------
25169: -- No ValidateCurrentLine for business flow method of Prior Entry
25170:
25171: ------------------------------------------------------------------------------------
25172: -- 4219869 Business Flow
25173: -- Populated credit and debit amounts -- Need to generate this within IF
25174: ------------------------------------------------------------------------------------
25175: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
25176:
25177: ----------------------------------------------------------------------------------
25178: -- 4219869 Business Flow
25179: -- Update journal entry status -- Need to generate this within IF
25203: -- To allow MPA report to determine if it should generate report process
25204: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
25205: ------------------------------------------------------------------------------------------
25206:
25207: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
25208: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
25209:
25210: --
25211: -- Update the line information that should be overwritten
25204: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
25205: ------------------------------------------------------------------------------------------
25206:
25207: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
25208: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
25209:
25210: --
25211: -- Update the line information that should be overwritten
25212: --
25209:
25210: --
25211: -- Update the line information that should be overwritten
25212: --
25213: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
25214: p_header_num => 1);
25215: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
25216:
25217: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
25211: -- Update the line information that should be overwritten
25212: --
25213: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
25214: p_header_num => 1);
25215: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
25216:
25217: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
25218:
25219: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
25213: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
25214: p_header_num => 1);
25215: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
25216:
25217: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
25218:
25219: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
25220: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
25221: END IF;
25216:
25217: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
25218:
25219: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
25220: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
25221: END IF;
25222:
25223: --
25224: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
25223: --
25224: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
25225: --
25226: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
25227: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
25228: ELSE
25229: ---------------------------------------------------------------------------------------------------
25230: -- 4262811a Switch Sign
25231: ---------------------------------------------------------------------------------------------------
25228: ELSE
25229: ---------------------------------------------------------------------------------------------------
25230: -- 4262811a Switch Sign
25231: ---------------------------------------------------------------------------------------------------
25232: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
25233: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25234: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25235: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25236: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25229: ---------------------------------------------------------------------------------------------------
25230: -- 4262811a Switch Sign
25231: ---------------------------------------------------------------------------------------------------
25232: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
25233: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25234: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25235: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25236: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25237: -- 5132302
25230: -- 4262811a Switch Sign
25231: ---------------------------------------------------------------------------------------------------
25232: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
25233: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25234: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25235: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25236: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25237: -- 5132302
25238: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
25231: ---------------------------------------------------------------------------------------------------
25232: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
25233: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25234: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25235: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25236: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25237: -- 5132302
25238: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
25239: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25232: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
25233: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25234: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25235: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25236: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25237: -- 5132302
25238: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
25239: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25240:
25234: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25235: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25236: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25237: -- 5132302
25238: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
25239: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25240:
25241: END IF;
25242:
25235: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25236: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25237: -- 5132302
25238: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
25239: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25240:
25241: END IF;
25242:
25243: -- 4955764
25240:
25241: END IF;
25242:
25243: -- 4955764
25244: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
25245: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
25246:
25247:
25248: XLA_AE_LINES_PKG.ValidateCurrentLine;
25244: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
25245: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
25246:
25247:
25248: XLA_AE_LINES_PKG.ValidateCurrentLine;
25249: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
25250:
25251: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
25252: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
25245: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
25246:
25247:
25248: XLA_AE_LINES_PKG.ValidateCurrentLine;
25249: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
25250:
25251: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
25252: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
25253: ,p_balance_type_code => l_balance_type_code);
25416: --
25417: -- bulk performance
25418: --
25419: l_balance_type_code VARCHAR2(1);
25420: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
25421: l_log_module VARCHAR2(240);
25422:
25423: --
25424: -- Upgrade strategy
25535: ') = 'B_REQ')
25536: ) THEN
25537:
25538: --
25539: XLA_AE_LINES_PKG.SetNewLine;
25540:
25541: p_balance_type_code := l_balance_type_code;
25542: -- set the flag so later we will know whether the gain loss line needs to be created
25543:
25547:
25548: --
25549: -- bulk performance
25550: --
25551: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
25552: p_header_num => 0); -- 4262811
25553: --
25554: -- set accounting line options
25555: --
25552: p_header_num => 0); -- 4262811
25553: --
25554: -- set accounting line options
25555: --
25556: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
25557: p_natural_side_code => 'C'
25558: , p_gain_or_loss_flag => 'N'
25559: , p_gl_transfer_mode_code => 'S'
25560: , p_acct_entry_type_code => 'E'
25566: --
25567: --
25568: -- set accounting line type info
25569: --
25570: xla_ae_lines_pkg.SetAcctLineType
25571: (p_component_type => l_component_type
25572: ,p_event_type_code => l_event_type_code
25573: ,p_line_definition_owner_code => l_line_definition_owner_code
25574: ,p_line_definition_code => l_line_definition_code
25580: ,p_event_class_code => l_event_class_code);
25581: --
25582: -- set accounting class
25583: --
25584: xla_ae_lines_pkg.SetAcctClass(
25585: p_accounting_class_code => 'PA_BUDGET_ENC'
25586: , p_ae_header_id => l_ae_header_id
25587: );
25588:
25588:
25589: --
25590: -- set rounding class
25591: --
25592: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
25593: 'PA_BUDGET_ENC';
25594:
25595: --
25596: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
25592: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
25593: 'PA_BUDGET_ENC';
25594:
25595: --
25596: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
25597: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
25598: --
25599: -- bulk performance
25600: --
25593: 'PA_BUDGET_ENC';
25594:
25595: --
25596: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
25597: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
25598: --
25599: -- bulk performance
25600: --
25601: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
25597: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
25598: --
25599: -- bulk performance
25600: --
25601: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
25602:
25603: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
25604: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
25605:
25599: -- bulk performance
25600: --
25601: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
25602:
25603: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
25604: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
25605:
25606: -- 4955764
25607: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
25603: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
25604: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
25605:
25606: -- 4955764
25607: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
25608: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
25609:
25610: -- 4458381 Public Sector Enh
25611:
25683: l_rec_acct_attrs.array_num_value(33) := p_source_39;
25684: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
25685: l_rec_acct_attrs.array_num_value(34) := p_source_40;
25686:
25687: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
25688: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
25689:
25690: ---------------------------------------------------------------------------------------------------------------
25691: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
25684: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
25685: l_rec_acct_attrs.array_num_value(34) := p_source_40;
25686:
25687: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
25688: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
25689:
25690: ---------------------------------------------------------------------------------------------------------------
25691: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
25692: ---------------------------------------------------------------------------------------------------------------
25687: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
25688: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
25689:
25690: ---------------------------------------------------------------------------------------------------------------
25691: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
25692: ---------------------------------------------------------------------------------------------------------------
25693: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
25694:
25695: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25689:
25690: ---------------------------------------------------------------------------------------------------------------
25691: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
25692: ---------------------------------------------------------------------------------------------------------------
25693: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
25694:
25695: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25696: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25697:
25691: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
25692: ---------------------------------------------------------------------------------------------------------------
25693: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
25694:
25695: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25696: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25697:
25698: IF xla_accounting_cache_pkg.GetValueChar
25699: (p_source_code => 'LEDGER_CATEGORY_CODE'
25692: ---------------------------------------------------------------------------------------------------------------
25693: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
25694:
25695: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25696: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25697:
25698: IF xla_accounting_cache_pkg.GetValueChar
25699: (p_source_code => 'LEDGER_CATEGORY_CODE'
25700: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
25703: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
25704: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
25705: )
25706: THEN
25707: xla_ae_lines_pkg.BflowUpgEntry
25708: (p_business_method_code => l_bflow_method_code
25709: ,p_business_class_code => l_bflow_class_code
25710: ,p_balance_type => l_balance_type_code);
25711: ELSE
25709: ,p_business_class_code => l_bflow_class_code
25710: ,p_balance_type => l_balance_type_code);
25711: ELSE
25712: NULL;
25713: XLA_AE_LINES_PKG.business_flow_validation(
25714: p_business_method_code => l_bflow_method_code
25715: ,p_business_class_code => l_bflow_class_code
25716: ,p_inherit_description_flag => l_inherit_desc_flag);
25717: END IF;
25723: --
25724: -- call description
25725: --
25726:
25727: xla_ae_lines_pkg.SetLineDescription(
25728: p_ae_header_id => l_ae_header_id
25729: ,p_description => Description_2 (
25730: p_application_id => p_application_id
25731: , p_ae_header_id => l_ae_header_id
25769: xla_accounting_err_pkg.build_message
25770: (p_appli_s_name => 'XLA'
25771: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
25772: ,p_token_1 => 'LINE_NUMBER'
25773: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
25774: ,p_token_2 => 'LINE_TYPE_NAME'
25775: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
25776: l_component_type
25777: ,l_component_code
25805: --
25806: --
25807: ------------------------------------------------------------------------------------------------
25808: -- 4219869 Business Flow
25809: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
25810: -- Prior Entry. Currently, the following code is always generated.
25811: ------------------------------------------------------------------------------------------------
25812: -- No ValidateCurrentLine for business flow method of Prior Entry
25813:
25814: ------------------------------------------------------------------------------------
25815: -- 4219869 Business Flow
25816: -- Populated credit and debit amounts -- Need to generate this within IF
25817: ------------------------------------------------------------------------------------
25818: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
25819:
25820: ----------------------------------------------------------------------------------
25821: -- 4219869 Business Flow
25822: -- Update journal entry status -- Need to generate this within IF
25846: -- To allow MPA report to determine if it should generate report process
25847: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
25848: ------------------------------------------------------------------------------------------
25849:
25850: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
25851: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
25852:
25853: --
25854: -- Update the line information that should be overwritten
25847: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
25848: ------------------------------------------------------------------------------------------
25849:
25850: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
25851: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
25852:
25853: --
25854: -- Update the line information that should be overwritten
25855: --
25852:
25853: --
25854: -- Update the line information that should be overwritten
25855: --
25856: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
25857: p_header_num => 1);
25858: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
25859:
25860: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
25854: -- Update the line information that should be overwritten
25855: --
25856: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
25857: p_header_num => 1);
25858: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
25859:
25860: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
25861:
25862: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
25856: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
25857: p_header_num => 1);
25858: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
25859:
25860: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
25861:
25862: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
25863: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
25864: END IF;
25859:
25860: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
25861:
25862: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
25863: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
25864: END IF;
25865:
25866: --
25867: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
25866: --
25867: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
25868: --
25869: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
25870: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
25871: ELSE
25872: ---------------------------------------------------------------------------------------------------
25873: -- 4262811a Switch Sign
25874: ---------------------------------------------------------------------------------------------------
25871: ELSE
25872: ---------------------------------------------------------------------------------------------------
25873: -- 4262811a Switch Sign
25874: ---------------------------------------------------------------------------------------------------
25875: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
25876: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25877: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25878: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25879: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25872: ---------------------------------------------------------------------------------------------------
25873: -- 4262811a Switch Sign
25874: ---------------------------------------------------------------------------------------------------
25875: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
25876: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25877: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25878: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25879: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25880: -- 5132302
25873: -- 4262811a Switch Sign
25874: ---------------------------------------------------------------------------------------------------
25875: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
25876: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25877: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25878: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25879: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25880: -- 5132302
25881: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
25874: ---------------------------------------------------------------------------------------------------
25875: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
25876: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25877: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25878: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25879: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25880: -- 5132302
25881: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
25882: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25875: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
25876: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25877: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25878: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25879: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25880: -- 5132302
25881: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
25882: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25883:
25877: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25878: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25879: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25880: -- 5132302
25881: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
25882: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25883:
25884: END IF;
25885:
25878: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25879: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25880: -- 5132302
25881: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
25882: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25883:
25884: END IF;
25885:
25886: -- 4955764
25883:
25884: END IF;
25885:
25886: -- 4955764
25887: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
25888: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
25889:
25890:
25891: XLA_AE_LINES_PKG.ValidateCurrentLine;
25887: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
25888: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
25889:
25890:
25891: XLA_AE_LINES_PKG.ValidateCurrentLine;
25892: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
25893:
25894: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
25895: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
25888: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
25889:
25890:
25891: XLA_AE_LINES_PKG.ValidateCurrentLine;
25892: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
25893:
25894: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
25895: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
25896: ,p_balance_type_code => l_balance_type_code);
26041: --
26042: -- bulk performance
26043: --
26044: l_balance_type_code VARCHAR2(1);
26045: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
26046: l_log_module VARCHAR2(240);
26047:
26048: --
26049: -- Upgrade strategy
26118: ') = 'N'
26119: THEN
26120:
26121: --
26122: XLA_AE_LINES_PKG.SetNewLine;
26123:
26124: p_balance_type_code := l_balance_type_code;
26125: -- set the flag so later we will know whether the gain loss line needs to be created
26126:
26130:
26131: --
26132: -- bulk performance
26133: --
26134: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
26135: p_header_num => 0); -- 4262811
26136: --
26137: -- set accounting line options
26138: --
26135: p_header_num => 0); -- 4262811
26136: --
26137: -- set accounting line options
26138: --
26139: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
26140: p_natural_side_code => 'C'
26141: , p_gain_or_loss_flag => 'N'
26142: , p_gl_transfer_mode_code => 'S'
26143: , p_acct_entry_type_code => 'E'
26149: --
26150: --
26151: -- set accounting line type info
26152: --
26153: xla_ae_lines_pkg.SetAcctLineType
26154: (p_component_type => l_component_type
26155: ,p_event_type_code => l_event_type_code
26156: ,p_line_definition_owner_code => l_line_definition_owner_code
26157: ,p_line_definition_code => l_line_definition_code
26163: ,p_event_class_code => l_event_class_code);
26164: --
26165: -- set accounting class
26166: --
26167: xla_ae_lines_pkg.SetAcctClass(
26168: p_accounting_class_code => 'REQUISITION'
26169: , p_ae_header_id => l_ae_header_id
26170: );
26171:
26171:
26172: --
26173: -- set rounding class
26174: --
26175: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
26176: 'REQUISITION';
26177:
26178: --
26179: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
26175: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
26176: 'REQUISITION';
26177:
26178: --
26179: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
26180: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
26181: --
26182: -- bulk performance
26183: --
26176: 'REQUISITION';
26177:
26178: --
26179: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
26180: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
26181: --
26182: -- bulk performance
26183: --
26184: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
26180: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
26181: --
26182: -- bulk performance
26183: --
26184: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
26185:
26186: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
26187: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
26188:
26182: -- bulk performance
26183: --
26184: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
26185:
26186: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
26187: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
26188:
26189: -- 4955764
26190: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
26186: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
26187: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
26188:
26189: -- 4955764
26190: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
26191: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
26192:
26193: -- 4458381 Public Sector Enh
26194:
26270: l_rec_acct_attrs.array_num_value(30) := p_source_61;
26271: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
26272: l_rec_acct_attrs.array_num_value(31) := p_source_61;
26273:
26274: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
26275: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
26276:
26277: ---------------------------------------------------------------------------------------------------------------
26278: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
26271: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
26272: l_rec_acct_attrs.array_num_value(31) := p_source_61;
26273:
26274: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
26275: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
26276:
26277: ---------------------------------------------------------------------------------------------------------------
26278: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
26279: ---------------------------------------------------------------------------------------------------------------
26274: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
26275: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
26276:
26277: ---------------------------------------------------------------------------------------------------------------
26278: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
26279: ---------------------------------------------------------------------------------------------------------------
26280: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
26281:
26282: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
26276:
26277: ---------------------------------------------------------------------------------------------------------------
26278: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
26279: ---------------------------------------------------------------------------------------------------------------
26280: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
26281:
26282: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
26283: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
26284:
26278: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
26279: ---------------------------------------------------------------------------------------------------------------
26280: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
26281:
26282: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
26283: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
26284:
26285: IF xla_accounting_cache_pkg.GetValueChar
26286: (p_source_code => 'LEDGER_CATEGORY_CODE'
26279: ---------------------------------------------------------------------------------------------------------------
26280: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
26281:
26282: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
26283: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
26284:
26285: IF xla_accounting_cache_pkg.GetValueChar
26286: (p_source_code => 'LEDGER_CATEGORY_CODE'
26287: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
26290: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
26291: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
26292: )
26293: THEN
26294: xla_ae_lines_pkg.BflowUpgEntry
26295: (p_business_method_code => l_bflow_method_code
26296: ,p_business_class_code => l_bflow_class_code
26297: ,p_balance_type => l_balance_type_code);
26298: ELSE
26296: ,p_business_class_code => l_bflow_class_code
26297: ,p_balance_type => l_balance_type_code);
26298: ELSE
26299: NULL;
26300: XLA_AE_LINES_PKG.business_flow_validation(
26301: p_business_method_code => l_bflow_method_code
26302: ,p_business_class_code => l_bflow_class_code
26303: ,p_inherit_description_flag => l_inherit_desc_flag);
26304: END IF;
26343: xla_accounting_err_pkg.build_message
26344: (p_appli_s_name => 'XLA'
26345: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
26346: ,p_token_1 => 'LINE_NUMBER'
26347: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
26348: ,p_token_2 => 'LINE_TYPE_NAME'
26349: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
26350: l_component_type
26351: ,l_component_code
26379: --
26380: --
26381: ------------------------------------------------------------------------------------------------
26382: -- 4219869 Business Flow
26383: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
26384: -- Prior Entry. Currently, the following code is always generated.
26385: ------------------------------------------------------------------------------------------------
26386: -- No ValidateCurrentLine for business flow method of Prior Entry
26387:
26388: ------------------------------------------------------------------------------------
26389: -- 4219869 Business Flow
26390: -- Populated credit and debit amounts -- Need to generate this within IF
26391: ------------------------------------------------------------------------------------
26392: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
26393:
26394: ----------------------------------------------------------------------------------
26395: -- 4219869 Business Flow
26396: -- Update journal entry status -- Need to generate this within IF
26420: -- To allow MPA report to determine if it should generate report process
26421: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
26422: ------------------------------------------------------------------------------------------
26423:
26424: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
26425: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
26426:
26427: --
26428: -- Update the line information that should be overwritten
26421: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
26422: ------------------------------------------------------------------------------------------
26423:
26424: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
26425: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
26426:
26427: --
26428: -- Update the line information that should be overwritten
26429: --
26426:
26427: --
26428: -- Update the line information that should be overwritten
26429: --
26430: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
26431: p_header_num => 1);
26432: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
26433:
26434: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
26428: -- Update the line information that should be overwritten
26429: --
26430: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
26431: p_header_num => 1);
26432: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
26433:
26434: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
26435:
26436: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
26430: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
26431: p_header_num => 1);
26432: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
26433:
26434: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
26435:
26436: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
26437: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
26438: END IF;
26433:
26434: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
26435:
26436: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
26437: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
26438: END IF;
26439:
26440: --
26441: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
26440: --
26441: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
26442: --
26443: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
26444: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
26445: ELSE
26446: ---------------------------------------------------------------------------------------------------
26447: -- 4262811a Switch Sign
26448: ---------------------------------------------------------------------------------------------------
26445: ELSE
26446: ---------------------------------------------------------------------------------------------------
26447: -- 4262811a Switch Sign
26448: ---------------------------------------------------------------------------------------------------
26449: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
26450: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26451: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26452: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26453: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26446: ---------------------------------------------------------------------------------------------------
26447: -- 4262811a Switch Sign
26448: ---------------------------------------------------------------------------------------------------
26449: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
26450: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26451: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26452: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26453: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26454: -- 5132302
26447: -- 4262811a Switch Sign
26448: ---------------------------------------------------------------------------------------------------
26449: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
26450: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26451: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26452: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26453: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26454: -- 5132302
26455: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
26448: ---------------------------------------------------------------------------------------------------
26449: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
26450: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26451: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26452: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26453: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26454: -- 5132302
26455: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
26456: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26449: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
26450: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26451: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26452: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26453: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26454: -- 5132302
26455: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
26456: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26457:
26451: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26452: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26453: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26454: -- 5132302
26455: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
26456: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26457:
26458: END IF;
26459:
26452: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26453: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26454: -- 5132302
26455: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
26456: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26457:
26458: END IF;
26459:
26460: -- 4955764
26457:
26458: END IF;
26459:
26460: -- 4955764
26461: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
26462: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
26463:
26464:
26465: XLA_AE_LINES_PKG.ValidateCurrentLine;
26461: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
26462: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
26463:
26464:
26465: XLA_AE_LINES_PKG.ValidateCurrentLine;
26466: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
26467:
26468: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
26469: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
26462: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
26463:
26464:
26465: XLA_AE_LINES_PKG.ValidateCurrentLine;
26466: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
26467:
26468: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
26469: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
26470: ,p_balance_type_code => l_balance_type_code);
26613: --
26614: -- bulk performance
26615: --
26616: l_balance_type_code VARCHAR2(1);
26617: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
26618: l_log_module VARCHAR2(240);
26619:
26620: --
26621: -- Upgrade strategy
26688: ') = 'B_REQ'
26689: THEN
26690:
26691: --
26692: XLA_AE_LINES_PKG.SetNewLine;
26693:
26694: p_balance_type_code := l_balance_type_code;
26695: -- set the flag so later we will know whether the gain loss line needs to be created
26696:
26700:
26701: --
26702: -- bulk performance
26703: --
26704: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
26705: p_header_num => 0); -- 4262811
26706: --
26707: -- set accounting line options
26708: --
26705: p_header_num => 0); -- 4262811
26706: --
26707: -- set accounting line options
26708: --
26709: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
26710: p_natural_side_code => 'C'
26711: , p_gain_or_loss_flag => 'N'
26712: , p_gl_transfer_mode_code => 'S'
26713: , p_acct_entry_type_code => 'E'
26719: --
26720: --
26721: -- set accounting line type info
26722: --
26723: xla_ae_lines_pkg.SetAcctLineType
26724: (p_component_type => l_component_type
26725: ,p_event_type_code => l_event_type_code
26726: ,p_line_definition_owner_code => l_line_definition_owner_code
26727: ,p_line_definition_code => l_line_definition_code
26733: ,p_event_class_code => l_event_class_code);
26734: --
26735: -- set accounting class
26736: --
26737: xla_ae_lines_pkg.SetAcctClass(
26738: p_accounting_class_code => 'PURCHASE_ORDER'
26739: , p_ae_header_id => l_ae_header_id
26740: );
26741:
26741:
26742: --
26743: -- set rounding class
26744: --
26745: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
26746: 'PURCHASE_ORDER';
26747:
26748: --
26749: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
26745: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
26746: 'PURCHASE_ORDER';
26747:
26748: --
26749: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
26750: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
26751: --
26752: -- bulk performance
26753: --
26746: 'PURCHASE_ORDER';
26747:
26748: --
26749: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
26750: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
26751: --
26752: -- bulk performance
26753: --
26754: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
26750: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
26751: --
26752: -- bulk performance
26753: --
26754: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
26755:
26756: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
26757: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
26758:
26752: -- bulk performance
26753: --
26754: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
26755:
26756: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
26757: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
26758:
26759: -- 4955764
26760: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
26756: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
26757: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
26758:
26759: -- 4955764
26760: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
26761: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
26762:
26763: -- 4458381 Public Sector Enh
26764:
26840: l_rec_acct_attrs.array_num_value(30) := p_source_61;
26841: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
26842: l_rec_acct_attrs.array_num_value(31) := p_source_61;
26843:
26844: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
26845: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
26846:
26847: ---------------------------------------------------------------------------------------------------------------
26848: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
26841: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
26842: l_rec_acct_attrs.array_num_value(31) := p_source_61;
26843:
26844: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
26845: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
26846:
26847: ---------------------------------------------------------------------------------------------------------------
26848: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
26849: ---------------------------------------------------------------------------------------------------------------
26844: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
26845: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
26846:
26847: ---------------------------------------------------------------------------------------------------------------
26848: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
26849: ---------------------------------------------------------------------------------------------------------------
26850: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
26851:
26852: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
26846:
26847: ---------------------------------------------------------------------------------------------------------------
26848: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
26849: ---------------------------------------------------------------------------------------------------------------
26850: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
26851:
26852: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
26853: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
26854:
26848: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
26849: ---------------------------------------------------------------------------------------------------------------
26850: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
26851:
26852: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
26853: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
26854:
26855: IF xla_accounting_cache_pkg.GetValueChar
26856: (p_source_code => 'LEDGER_CATEGORY_CODE'
26849: ---------------------------------------------------------------------------------------------------------------
26850: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
26851:
26852: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
26853: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
26854:
26855: IF xla_accounting_cache_pkg.GetValueChar
26856: (p_source_code => 'LEDGER_CATEGORY_CODE'
26857: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
26860: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
26861: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
26862: )
26863: THEN
26864: xla_ae_lines_pkg.BflowUpgEntry
26865: (p_business_method_code => l_bflow_method_code
26866: ,p_business_class_code => l_bflow_class_code
26867: ,p_balance_type => l_balance_type_code);
26868: ELSE
26866: ,p_business_class_code => l_bflow_class_code
26867: ,p_balance_type => l_balance_type_code);
26868: ELSE
26869: NULL;
26870: XLA_AE_LINES_PKG.business_flow_validation(
26871: p_business_method_code => l_bflow_method_code
26872: ,p_business_class_code => l_bflow_class_code
26873: ,p_inherit_description_flag => l_inherit_desc_flag);
26874: END IF;
26913: xla_accounting_err_pkg.build_message
26914: (p_appli_s_name => 'XLA'
26915: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
26916: ,p_token_1 => 'LINE_NUMBER'
26917: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
26918: ,p_token_2 => 'LINE_TYPE_NAME'
26919: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
26920: l_component_type
26921: ,l_component_code
26949: --
26950: --
26951: ------------------------------------------------------------------------------------------------
26952: -- 4219869 Business Flow
26953: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
26954: -- Prior Entry. Currently, the following code is always generated.
26955: ------------------------------------------------------------------------------------------------
26956: -- No ValidateCurrentLine for business flow method of Prior Entry
26957:
26958: ------------------------------------------------------------------------------------
26959: -- 4219869 Business Flow
26960: -- Populated credit and debit amounts -- Need to generate this within IF
26961: ------------------------------------------------------------------------------------
26962: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
26963:
26964: ----------------------------------------------------------------------------------
26965: -- 4219869 Business Flow
26966: -- Update journal entry status -- Need to generate this within IF
26990: -- To allow MPA report to determine if it should generate report process
26991: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
26992: ------------------------------------------------------------------------------------------
26993:
26994: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
26995: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
26996:
26997: --
26998: -- Update the line information that should be overwritten
26991: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
26992: ------------------------------------------------------------------------------------------
26993:
26994: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
26995: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
26996:
26997: --
26998: -- Update the line information that should be overwritten
26999: --
26996:
26997: --
26998: -- Update the line information that should be overwritten
26999: --
27000: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
27001: p_header_num => 1);
27002: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
27003:
27004: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
26998: -- Update the line information that should be overwritten
26999: --
27000: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
27001: p_header_num => 1);
27002: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
27003:
27004: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
27005:
27006: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
27000: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
27001: p_header_num => 1);
27002: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
27003:
27004: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
27005:
27006: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
27007: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
27008: END IF;
27003:
27004: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
27005:
27006: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
27007: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
27008: END IF;
27009:
27010: --
27011: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
27010: --
27011: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
27012: --
27013: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
27014: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
27015: ELSE
27016: ---------------------------------------------------------------------------------------------------
27017: -- 4262811a Switch Sign
27018: ---------------------------------------------------------------------------------------------------
27015: ELSE
27016: ---------------------------------------------------------------------------------------------------
27017: -- 4262811a Switch Sign
27018: ---------------------------------------------------------------------------------------------------
27019: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
27020: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27021: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27022: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27023: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27016: ---------------------------------------------------------------------------------------------------
27017: -- 4262811a Switch Sign
27018: ---------------------------------------------------------------------------------------------------
27019: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
27020: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27021: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27022: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27023: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27024: -- 5132302
27017: -- 4262811a Switch Sign
27018: ---------------------------------------------------------------------------------------------------
27019: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
27020: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27021: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27022: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27023: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27024: -- 5132302
27025: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
27018: ---------------------------------------------------------------------------------------------------
27019: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
27020: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27021: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27022: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27023: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27024: -- 5132302
27025: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
27026: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27019: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
27020: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27021: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27022: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27023: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27024: -- 5132302
27025: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
27026: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27027:
27021: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27022: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27023: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27024: -- 5132302
27025: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
27026: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27027:
27028: END IF;
27029:
27022: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27023: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27024: -- 5132302
27025: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
27026: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27027:
27028: END IF;
27029:
27030: -- 4955764
27027:
27028: END IF;
27029:
27030: -- 4955764
27031: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
27032: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
27033:
27034:
27035: XLA_AE_LINES_PKG.ValidateCurrentLine;
27031: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
27032: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
27033:
27034:
27035: XLA_AE_LINES_PKG.ValidateCurrentLine;
27036: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
27037:
27038: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
27039: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
27032: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
27033:
27034:
27035: XLA_AE_LINES_PKG.ValidateCurrentLine;
27036: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
27037:
27038: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
27039: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
27040: ,p_balance_type_code => l_balance_type_code);
27214: --
27215: -- bulk performance
27216: --
27217: l_balance_type_code VARCHAR2(1);
27218: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
27219: l_log_module VARCHAR2(240);
27220:
27221: --
27222: -- Upgrade strategy
27299: ') = 'Y'
27300: THEN
27301:
27302: --
27303: XLA_AE_LINES_PKG.SetNewLine;
27304:
27305: p_balance_type_code := l_balance_type_code;
27306: -- set the flag so later we will know whether the gain loss line needs to be created
27307:
27311:
27312: --
27313: -- bulk performance
27314: --
27315: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
27316: p_header_num => 0); -- 4262811
27317: --
27318: -- set accounting line options
27319: --
27316: p_header_num => 0); -- 4262811
27317: --
27318: -- set accounting line options
27319: --
27320: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
27321: p_natural_side_code => 'C'
27322: , p_gain_or_loss_flag => 'N'
27323: , p_gl_transfer_mode_code => 'S'
27324: , p_acct_entry_type_code => 'E'
27330: --
27331: --
27332: -- set accounting line type info
27333: --
27334: xla_ae_lines_pkg.SetAcctLineType
27335: (p_component_type => l_component_type
27336: ,p_event_type_code => l_event_type_code
27337: ,p_line_definition_owner_code => l_line_definition_owner_code
27338: ,p_line_definition_code => l_line_definition_code
27344: ,p_event_class_code => l_event_class_code);
27345: --
27346: -- set accounting class
27347: --
27348: xla_ae_lines_pkg.SetAcctClass(
27349: p_accounting_class_code => 'REQ_PA_BURDENED'
27350: , p_ae_header_id => l_ae_header_id
27351: );
27352:
27352:
27353: --
27354: -- set rounding class
27355: --
27356: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
27357: 'REQ_PA_BURDENED';
27358:
27359: --
27360: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
27356: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
27357: 'REQ_PA_BURDENED';
27358:
27359: --
27360: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
27361: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
27362: --
27363: -- bulk performance
27364: --
27357: 'REQ_PA_BURDENED';
27358:
27359: --
27360: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
27361: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
27362: --
27363: -- bulk performance
27364: --
27365: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
27361: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
27362: --
27363: -- bulk performance
27364: --
27365: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
27366:
27367: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
27368: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
27369:
27363: -- bulk performance
27364: --
27365: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
27366:
27367: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
27368: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
27369:
27370: -- 4955764
27371: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
27367: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
27368: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
27369:
27370: -- 4955764
27371: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
27372: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
27373:
27374: -- 4458381 Public Sector Enh
27375: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
27371: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
27372: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
27373:
27374: -- 4458381 Public Sector Enh
27375: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
27376: --
27377: -- set accounting attributes for the line type
27378: --
27379: l_entered_amt_idx := 27;
27447: l_rec_acct_attrs.array_num_value(33) := p_source_39;
27448: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
27449: l_rec_acct_attrs.array_num_value(34) := p_source_40;
27450:
27451: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
27452: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
27453:
27454: ---------------------------------------------------------------------------------------------------------------
27455: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
27448: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
27449: l_rec_acct_attrs.array_num_value(34) := p_source_40;
27450:
27451: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
27452: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
27453:
27454: ---------------------------------------------------------------------------------------------------------------
27455: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
27456: ---------------------------------------------------------------------------------------------------------------
27451: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
27452: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
27453:
27454: ---------------------------------------------------------------------------------------------------------------
27455: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
27456: ---------------------------------------------------------------------------------------------------------------
27457: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
27458:
27459: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
27453:
27454: ---------------------------------------------------------------------------------------------------------------
27455: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
27456: ---------------------------------------------------------------------------------------------------------------
27457: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
27458:
27459: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
27460: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
27461:
27455: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
27456: ---------------------------------------------------------------------------------------------------------------
27457: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
27458:
27459: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
27460: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
27461:
27462: IF xla_accounting_cache_pkg.GetValueChar
27463: (p_source_code => 'LEDGER_CATEGORY_CODE'
27456: ---------------------------------------------------------------------------------------------------------------
27457: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
27458:
27459: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
27460: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
27461:
27462: IF xla_accounting_cache_pkg.GetValueChar
27463: (p_source_code => 'LEDGER_CATEGORY_CODE'
27464: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
27467: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
27468: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
27469: )
27470: THEN
27471: xla_ae_lines_pkg.BflowUpgEntry
27472: (p_business_method_code => l_bflow_method_code
27473: ,p_business_class_code => l_bflow_class_code
27474: ,p_balance_type => l_balance_type_code);
27475: ELSE
27484: --
27485: -- call description
27486: --
27487:
27488: xla_ae_lines_pkg.SetLineDescription(
27489: p_ae_header_id => l_ae_header_id
27490: ,p_description => Description_2 (
27491: p_application_id => p_application_id
27492: , p_ae_header_id => l_ae_header_id
27520: , x_value_type_code => l_adr_value_type_code
27521: , p_side => 'NA'
27522: );
27523:
27524: xla_ae_lines_pkg.set_ccid(
27525: p_code_combination_id => l_ccid
27526: , p_value_type_code => l_adr_value_type_code
27527: , p_transaction_coa_id => l_adr_transaction_coa_id
27528: , p_accounting_coa_id => l_adr_accounting_coa_id
27556: xla_accounting_err_pkg.build_message
27557: (p_appli_s_name => 'XLA'
27558: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
27559: ,p_token_1 => 'LINE_NUMBER'
27560: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
27561: ,p_token_2 => 'LINE_TYPE_NAME'
27562: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
27563: l_component_type
27564: ,l_component_code
27592: --
27593: --
27594: ------------------------------------------------------------------------------------------------
27595: -- 4219869 Business Flow
27596: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
27597: -- Prior Entry. Currently, the following code is always generated.
27598: ------------------------------------------------------------------------------------------------
27599: XLA_AE_LINES_PKG.ValidateCurrentLine;
27600:
27595: -- 4219869 Business Flow
27596: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
27597: -- Prior Entry. Currently, the following code is always generated.
27598: ------------------------------------------------------------------------------------------------
27599: XLA_AE_LINES_PKG.ValidateCurrentLine;
27600:
27601: ------------------------------------------------------------------------------------
27602: -- 4219869 Business Flow
27603: -- Populated credit and debit amounts -- Need to generate this within IF
27601: ------------------------------------------------------------------------------------
27602: -- 4219869 Business Flow
27603: -- Populated credit and debit amounts -- Need to generate this within IF
27604: ------------------------------------------------------------------------------------
27605: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
27606:
27607: ----------------------------------------------------------------------------------
27608: -- 4219869 Business Flow
27609: -- Update journal entry status -- Need to generate this within IF
27633: -- To allow MPA report to determine if it should generate report process
27634: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
27635: ------------------------------------------------------------------------------------------
27636:
27637: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
27638: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
27639:
27640: --
27641: -- Update the line information that should be overwritten
27634: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
27635: ------------------------------------------------------------------------------------------
27636:
27637: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
27638: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
27639:
27640: --
27641: -- Update the line information that should be overwritten
27642: --
27639:
27640: --
27641: -- Update the line information that should be overwritten
27642: --
27643: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
27644: p_header_num => 1);
27645: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
27646:
27647: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
27641: -- Update the line information that should be overwritten
27642: --
27643: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
27644: p_header_num => 1);
27645: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
27646:
27647: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
27648:
27649: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
27643: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
27644: p_header_num => 1);
27645: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
27646:
27647: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
27648:
27649: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
27650: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
27651: END IF;
27646:
27647: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
27648:
27649: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
27650: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
27651: END IF;
27652:
27653: --
27654: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
27653: --
27654: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
27655: --
27656: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
27657: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
27658: ELSE
27659: ---------------------------------------------------------------------------------------------------
27660: -- 4262811a Switch Sign
27661: ---------------------------------------------------------------------------------------------------
27658: ELSE
27659: ---------------------------------------------------------------------------------------------------
27660: -- 4262811a Switch Sign
27661: ---------------------------------------------------------------------------------------------------
27662: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
27663: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27664: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27665: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27666: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27659: ---------------------------------------------------------------------------------------------------
27660: -- 4262811a Switch Sign
27661: ---------------------------------------------------------------------------------------------------
27662: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
27663: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27664: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27665: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27666: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27667: -- 5132302
27660: -- 4262811a Switch Sign
27661: ---------------------------------------------------------------------------------------------------
27662: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
27663: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27664: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27665: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27666: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27667: -- 5132302
27668: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
27661: ---------------------------------------------------------------------------------------------------
27662: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
27663: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27664: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27665: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27666: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27667: -- 5132302
27668: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
27669: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27662: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
27663: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27664: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27665: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27666: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27667: -- 5132302
27668: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
27669: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27670:
27664: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27665: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27666: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27667: -- 5132302
27668: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
27669: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27670:
27671: END IF;
27672:
27665: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27666: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27667: -- 5132302
27668: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
27669: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27670:
27671: END IF;
27672:
27673: -- 4955764
27670:
27671: END IF;
27672:
27673: -- 4955764
27674: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
27675: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
27676:
27677:
27678: XLA_AE_LINES_PKG.ValidateCurrentLine;
27674: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
27675: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
27676:
27677:
27678: XLA_AE_LINES_PKG.ValidateCurrentLine;
27679: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
27680:
27681: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
27682: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
27675: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
27676:
27677:
27678: XLA_AE_LINES_PKG.ValidateCurrentLine;
27679: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
27680:
27681: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
27682: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
27683: ,p_balance_type_code => l_balance_type_code);
27857: --
27858: -- bulk performance
27859: --
27860: l_balance_type_code VARCHAR2(1);
27861: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
27862: l_log_module VARCHAR2(240);
27863:
27864: --
27865: -- Upgrade strategy
27940: ') = 'Y'
27941: THEN
27942:
27943: --
27944: XLA_AE_LINES_PKG.SetNewLine;
27945:
27946: p_balance_type_code := l_balance_type_code;
27947: -- set the flag so later we will know whether the gain loss line needs to be created
27948:
27952:
27953: --
27954: -- bulk performance
27955: --
27956: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
27957: p_header_num => 0); -- 4262811
27958: --
27959: -- set accounting line options
27960: --
27957: p_header_num => 0); -- 4262811
27958: --
27959: -- set accounting line options
27960: --
27961: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
27962: p_natural_side_code => 'C'
27963: , p_gain_or_loss_flag => 'N'
27964: , p_gl_transfer_mode_code => 'S'
27965: , p_acct_entry_type_code => 'E'
27971: --
27972: --
27973: -- set accounting line type info
27974: --
27975: xla_ae_lines_pkg.SetAcctLineType
27976: (p_component_type => l_component_type
27977: ,p_event_type_code => l_event_type_code
27978: ,p_line_definition_owner_code => l_line_definition_owner_code
27979: ,p_line_definition_code => l_line_definition_code
27985: ,p_event_class_code => l_event_class_code);
27986: --
27987: -- set accounting class
27988: --
27989: xla_ae_lines_pkg.SetAcctClass(
27990: p_accounting_class_code => 'REQ_PA_BURDEN'
27991: , p_ae_header_id => l_ae_header_id
27992: );
27993:
27993:
27994: --
27995: -- set rounding class
27996: --
27997: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
27998: 'REQ_PA_BURDEN';
27999:
28000: --
28001: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
27997: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
27998: 'REQ_PA_BURDEN';
27999:
28000: --
28001: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
28002: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
28003: --
28004: -- bulk performance
28005: --
27998: 'REQ_PA_BURDEN';
27999:
28000: --
28001: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
28002: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
28003: --
28004: -- bulk performance
28005: --
28006: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
28002: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
28003: --
28004: -- bulk performance
28005: --
28006: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
28007:
28008: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
28009: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
28010:
28004: -- bulk performance
28005: --
28006: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
28007:
28008: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
28009: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
28010:
28011: -- 4955764
28012: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
28008: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
28009: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
28010:
28011: -- 4955764
28012: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
28013: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
28014:
28015: -- 4458381 Public Sector Enh
28016: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
28012: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
28013: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
28014:
28015: -- 4458381 Public Sector Enh
28016: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
28017: --
28018: -- set accounting attributes for the line type
28019: --
28020: l_entered_amt_idx := 27;
28088: l_rec_acct_attrs.array_num_value(33) := p_source_39;
28089: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
28090: l_rec_acct_attrs.array_num_value(34) := p_source_40;
28091:
28092: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
28093: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
28094:
28095: ---------------------------------------------------------------------------------------------------------------
28096: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
28089: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
28090: l_rec_acct_attrs.array_num_value(34) := p_source_40;
28091:
28092: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
28093: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
28094:
28095: ---------------------------------------------------------------------------------------------------------------
28096: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
28097: ---------------------------------------------------------------------------------------------------------------
28092: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
28093: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
28094:
28095: ---------------------------------------------------------------------------------------------------------------
28096: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
28097: ---------------------------------------------------------------------------------------------------------------
28098: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
28099:
28100: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28094:
28095: ---------------------------------------------------------------------------------------------------------------
28096: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
28097: ---------------------------------------------------------------------------------------------------------------
28098: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
28099:
28100: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28101: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28102:
28096: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
28097: ---------------------------------------------------------------------------------------------------------------
28098: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
28099:
28100: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28101: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28102:
28103: IF xla_accounting_cache_pkg.GetValueChar
28104: (p_source_code => 'LEDGER_CATEGORY_CODE'
28097: ---------------------------------------------------------------------------------------------------------------
28098: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
28099:
28100: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28101: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28102:
28103: IF xla_accounting_cache_pkg.GetValueChar
28104: (p_source_code => 'LEDGER_CATEGORY_CODE'
28105: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
28108: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
28109: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
28110: )
28111: THEN
28112: xla_ae_lines_pkg.BflowUpgEntry
28113: (p_business_method_code => l_bflow_method_code
28114: ,p_business_class_code => l_bflow_class_code
28115: ,p_balance_type => l_balance_type_code);
28116: ELSE
28125: --
28126: -- call description
28127: --
28128:
28129: xla_ae_lines_pkg.SetLineDescription(
28130: p_ae_header_id => l_ae_header_id
28131: ,p_description => Description_2 (
28132: p_application_id => p_application_id
28133: , p_ae_header_id => l_ae_header_id
28161: , x_value_type_code => l_adr_value_type_code
28162: , p_side => 'NA'
28163: );
28164:
28165: xla_ae_lines_pkg.set_ccid(
28166: p_code_combination_id => l_ccid
28167: , p_value_type_code => l_adr_value_type_code
28168: , p_transaction_coa_id => l_adr_transaction_coa_id
28169: , p_accounting_coa_id => l_adr_accounting_coa_id
28197: xla_accounting_err_pkg.build_message
28198: (p_appli_s_name => 'XLA'
28199: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
28200: ,p_token_1 => 'LINE_NUMBER'
28201: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
28202: ,p_token_2 => 'LINE_TYPE_NAME'
28203: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
28204: l_component_type
28205: ,l_component_code
28233: --
28234: --
28235: ------------------------------------------------------------------------------------------------
28236: -- 4219869 Business Flow
28237: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
28238: -- Prior Entry. Currently, the following code is always generated.
28239: ------------------------------------------------------------------------------------------------
28240: XLA_AE_LINES_PKG.ValidateCurrentLine;
28241:
28236: -- 4219869 Business Flow
28237: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
28238: -- Prior Entry. Currently, the following code is always generated.
28239: ------------------------------------------------------------------------------------------------
28240: XLA_AE_LINES_PKG.ValidateCurrentLine;
28241:
28242: ------------------------------------------------------------------------------------
28243: -- 4219869 Business Flow
28244: -- Populated credit and debit amounts -- Need to generate this within IF
28242: ------------------------------------------------------------------------------------
28243: -- 4219869 Business Flow
28244: -- Populated credit and debit amounts -- Need to generate this within IF
28245: ------------------------------------------------------------------------------------
28246: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
28247:
28248: ----------------------------------------------------------------------------------
28249: -- 4219869 Business Flow
28250: -- Update journal entry status -- Need to generate this within IF
28274: -- To allow MPA report to determine if it should generate report process
28275: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
28276: ------------------------------------------------------------------------------------------
28277:
28278: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
28279: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
28280:
28281: --
28282: -- Update the line information that should be overwritten
28275: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
28276: ------------------------------------------------------------------------------------------
28277:
28278: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
28279: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
28280:
28281: --
28282: -- Update the line information that should be overwritten
28283: --
28280:
28281: --
28282: -- Update the line information that should be overwritten
28283: --
28284: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
28285: p_header_num => 1);
28286: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
28287:
28288: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
28282: -- Update the line information that should be overwritten
28283: --
28284: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
28285: p_header_num => 1);
28286: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
28287:
28288: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
28289:
28290: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
28284: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
28285: p_header_num => 1);
28286: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
28287:
28288: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
28289:
28290: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
28291: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
28292: END IF;
28287:
28288: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
28289:
28290: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
28291: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
28292: END IF;
28293:
28294: --
28295: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
28294: --
28295: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
28296: --
28297: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
28298: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
28299: ELSE
28300: ---------------------------------------------------------------------------------------------------
28301: -- 4262811a Switch Sign
28302: ---------------------------------------------------------------------------------------------------
28299: ELSE
28300: ---------------------------------------------------------------------------------------------------
28301: -- 4262811a Switch Sign
28302: ---------------------------------------------------------------------------------------------------
28303: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
28304: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28305: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28306: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28307: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28300: ---------------------------------------------------------------------------------------------------
28301: -- 4262811a Switch Sign
28302: ---------------------------------------------------------------------------------------------------
28303: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
28304: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28305: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28306: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28307: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28308: -- 5132302
28301: -- 4262811a Switch Sign
28302: ---------------------------------------------------------------------------------------------------
28303: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
28304: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28305: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28306: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28307: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28308: -- 5132302
28309: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
28302: ---------------------------------------------------------------------------------------------------
28303: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
28304: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28305: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28306: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28307: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28308: -- 5132302
28309: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
28310: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28303: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
28304: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28305: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28306: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28307: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28308: -- 5132302
28309: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
28310: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28311:
28305: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28306: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28307: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28308: -- 5132302
28309: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
28310: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28311:
28312: END IF;
28313:
28306: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28307: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28308: -- 5132302
28309: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
28310: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28311:
28312: END IF;
28313:
28314: -- 4955764
28311:
28312: END IF;
28313:
28314: -- 4955764
28315: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
28316: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
28317:
28318:
28319: XLA_AE_LINES_PKG.ValidateCurrentLine;
28315: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
28316: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
28317:
28318:
28319: XLA_AE_LINES_PKG.ValidateCurrentLine;
28320: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
28321:
28322: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
28323: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
28316: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
28317:
28318:
28319: XLA_AE_LINES_PKG.ValidateCurrentLine;
28320: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
28321:
28322: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
28323: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
28324: ,p_balance_type_code => l_balance_type_code);
28475: --
28476: -- bulk performance
28477: --
28478: l_balance_type_code VARCHAR2(1);
28479: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
28480: l_log_module VARCHAR2(240);
28481:
28482: --
28483: -- Upgrade strategy
28552: ') = 'Y'
28553: THEN
28554:
28555: --
28556: XLA_AE_LINES_PKG.SetNewLine;
28557:
28558: p_balance_type_code := l_balance_type_code;
28559: -- set the flag so later we will know whether the gain loss line needs to be created
28560:
28564:
28565: --
28566: -- bulk performance
28567: --
28568: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
28569: p_header_num => 0); -- 4262811
28570: --
28571: -- set accounting line options
28572: --
28569: p_header_num => 0); -- 4262811
28570: --
28571: -- set accounting line options
28572: --
28573: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
28574: p_natural_side_code => 'C'
28575: , p_gain_or_loss_flag => 'N'
28576: , p_gl_transfer_mode_code => 'S'
28577: , p_acct_entry_type_code => 'E'
28583: --
28584: --
28585: -- set accounting line type info
28586: --
28587: xla_ae_lines_pkg.SetAcctLineType
28588: (p_component_type => l_component_type
28589: ,p_event_type_code => l_event_type_code
28590: ,p_line_definition_owner_code => l_line_definition_owner_code
28591: ,p_line_definition_code => l_line_definition_code
28597: ,p_event_class_code => l_event_class_code);
28598: --
28599: -- set accounting class
28600: --
28601: xla_ae_lines_pkg.SetAcctClass(
28602: p_accounting_class_code => 'REQUISITION'
28603: , p_ae_header_id => l_ae_header_id
28604: );
28605:
28605:
28606: --
28607: -- set rounding class
28608: --
28609: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
28610: 'REQUISITION';
28611:
28612: --
28613: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
28609: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
28610: 'REQUISITION';
28611:
28612: --
28613: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
28614: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
28615: --
28616: -- bulk performance
28617: --
28610: 'REQUISITION';
28611:
28612: --
28613: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
28614: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
28615: --
28616: -- bulk performance
28617: --
28618: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
28614: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
28615: --
28616: -- bulk performance
28617: --
28618: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
28619:
28620: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
28621: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
28622:
28616: -- bulk performance
28617: --
28618: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
28619:
28620: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
28621: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
28622:
28623: -- 4955764
28624: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
28620: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
28621: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
28622:
28623: -- 4955764
28624: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
28625: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
28626:
28627: -- 4458381 Public Sector Enh
28628: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
28624: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
28625: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
28626:
28627: -- 4458381 Public Sector Enh
28628: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
28629: --
28630: -- set accounting attributes for the line type
28631: --
28632: l_entered_amt_idx := 23;
28710: l_rec_acct_attrs.array_num_value(33) := p_source_61;
28711: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
28712: l_rec_acct_attrs.array_num_value(34) := p_source_61;
28713:
28714: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
28715: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
28716:
28717: ---------------------------------------------------------------------------------------------------------------
28718: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
28711: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
28712: l_rec_acct_attrs.array_num_value(34) := p_source_61;
28713:
28714: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
28715: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
28716:
28717: ---------------------------------------------------------------------------------------------------------------
28718: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
28719: ---------------------------------------------------------------------------------------------------------------
28714: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
28715: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
28716:
28717: ---------------------------------------------------------------------------------------------------------------
28718: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
28719: ---------------------------------------------------------------------------------------------------------------
28720: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
28721:
28722: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28716:
28717: ---------------------------------------------------------------------------------------------------------------
28718: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
28719: ---------------------------------------------------------------------------------------------------------------
28720: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
28721:
28722: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28723: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28724:
28718: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
28719: ---------------------------------------------------------------------------------------------------------------
28720: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
28721:
28722: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28723: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28724:
28725: IF xla_accounting_cache_pkg.GetValueChar
28726: (p_source_code => 'LEDGER_CATEGORY_CODE'
28719: ---------------------------------------------------------------------------------------------------------------
28720: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
28721:
28722: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28723: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28724:
28725: IF xla_accounting_cache_pkg.GetValueChar
28726: (p_source_code => 'LEDGER_CATEGORY_CODE'
28727: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
28730: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
28731: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
28732: )
28733: THEN
28734: xla_ae_lines_pkg.BflowUpgEntry
28735: (p_business_method_code => l_bflow_method_code
28736: ,p_business_class_code => l_bflow_class_code
28737: ,p_balance_type => l_balance_type_code);
28738: ELSE
28747: --
28748: -- call description
28749: --
28750:
28751: xla_ae_lines_pkg.SetLineDescription(
28752: p_ae_header_id => l_ae_header_id
28753: ,p_description => Description_3 (
28754: p_application_id => p_application_id
28755: , p_ae_header_id => l_ae_header_id
28780: , x_value_type_code => l_adr_value_type_code
28781: , p_side => 'NA'
28782: );
28783:
28784: xla_ae_lines_pkg.set_ccid(
28785: p_code_combination_id => l_ccid
28786: , p_value_type_code => l_adr_value_type_code
28787: , p_transaction_coa_id => l_adr_transaction_coa_id
28788: , p_accounting_coa_id => l_adr_accounting_coa_id
28816: xla_accounting_err_pkg.build_message
28817: (p_appli_s_name => 'XLA'
28818: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
28819: ,p_token_1 => 'LINE_NUMBER'
28820: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
28821: ,p_token_2 => 'LINE_TYPE_NAME'
28822: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
28823: l_component_type
28824: ,l_component_code
28852: --
28853: --
28854: ------------------------------------------------------------------------------------------------
28855: -- 4219869 Business Flow
28856: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
28857: -- Prior Entry. Currently, the following code is always generated.
28858: ------------------------------------------------------------------------------------------------
28859: XLA_AE_LINES_PKG.ValidateCurrentLine;
28860:
28855: -- 4219869 Business Flow
28856: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
28857: -- Prior Entry. Currently, the following code is always generated.
28858: ------------------------------------------------------------------------------------------------
28859: XLA_AE_LINES_PKG.ValidateCurrentLine;
28860:
28861: ------------------------------------------------------------------------------------
28862: -- 4219869 Business Flow
28863: -- Populated credit and debit amounts -- Need to generate this within IF
28861: ------------------------------------------------------------------------------------
28862: -- 4219869 Business Flow
28863: -- Populated credit and debit amounts -- Need to generate this within IF
28864: ------------------------------------------------------------------------------------
28865: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
28866:
28867: ----------------------------------------------------------------------------------
28868: -- 4219869 Business Flow
28869: -- Update journal entry status -- Need to generate this within IF
28893: -- To allow MPA report to determine if it should generate report process
28894: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
28895: ------------------------------------------------------------------------------------------
28896:
28897: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
28898: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
28899:
28900: --
28901: -- Update the line information that should be overwritten
28894: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
28895: ------------------------------------------------------------------------------------------
28896:
28897: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
28898: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
28899:
28900: --
28901: -- Update the line information that should be overwritten
28902: --
28899:
28900: --
28901: -- Update the line information that should be overwritten
28902: --
28903: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
28904: p_header_num => 1);
28905: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
28906:
28907: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
28901: -- Update the line information that should be overwritten
28902: --
28903: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
28904: p_header_num => 1);
28905: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
28906:
28907: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
28908:
28909: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
28903: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
28904: p_header_num => 1);
28905: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
28906:
28907: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
28908:
28909: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
28910: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
28911: END IF;
28906:
28907: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
28908:
28909: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
28910: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
28911: END IF;
28912:
28913: --
28914: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
28913: --
28914: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
28915: --
28916: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
28917: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
28918: ELSE
28919: ---------------------------------------------------------------------------------------------------
28920: -- 4262811a Switch Sign
28921: ---------------------------------------------------------------------------------------------------
28918: ELSE
28919: ---------------------------------------------------------------------------------------------------
28920: -- 4262811a Switch Sign
28921: ---------------------------------------------------------------------------------------------------
28922: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
28923: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28924: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28925: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28926: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28919: ---------------------------------------------------------------------------------------------------
28920: -- 4262811a Switch Sign
28921: ---------------------------------------------------------------------------------------------------
28922: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
28923: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28924: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28925: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28926: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28927: -- 5132302
28920: -- 4262811a Switch Sign
28921: ---------------------------------------------------------------------------------------------------
28922: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
28923: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28924: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28925: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28926: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28927: -- 5132302
28928: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
28921: ---------------------------------------------------------------------------------------------------
28922: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
28923: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28924: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28925: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28926: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28927: -- 5132302
28928: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
28929: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28922: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
28923: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28924: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28925: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28926: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28927: -- 5132302
28928: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
28929: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28930:
28924: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28925: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28926: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28927: -- 5132302
28928: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
28929: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28930:
28931: END IF;
28932:
28925: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28926: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28927: -- 5132302
28928: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
28929: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28930:
28931: END IF;
28932:
28933: -- 4955764
28930:
28931: END IF;
28932:
28933: -- 4955764
28934: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
28935: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
28936:
28937:
28938: XLA_AE_LINES_PKG.ValidateCurrentLine;
28934: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
28935: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
28936:
28937:
28938: XLA_AE_LINES_PKG.ValidateCurrentLine;
28939: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
28940:
28941: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
28942: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
28935: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
28936:
28937:
28938: XLA_AE_LINES_PKG.ValidateCurrentLine;
28939: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
28940:
28941: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
28942: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
28943: ,p_balance_type_code => l_balance_type_code);
29117: --
29118: -- bulk performance
29119: --
29120: l_balance_type_code VARCHAR2(1);
29121: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
29122: l_log_module VARCHAR2(240);
29123:
29124: --
29125: -- Upgrade strategy
29198: ') = 'D'
29199: THEN
29200:
29201: --
29202: XLA_AE_LINES_PKG.SetNewLine;
29203:
29204: p_balance_type_code := l_balance_type_code;
29205: -- set the flag so later we will know whether the gain loss line needs to be created
29206:
29210:
29211: --
29212: -- bulk performance
29213: --
29214: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
29215: p_header_num => 0); -- 4262811
29216: --
29217: -- set accounting line options
29218: --
29215: p_header_num => 0); -- 4262811
29216: --
29217: -- set accounting line options
29218: --
29219: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
29220: p_natural_side_code => 'D'
29221: , p_gain_or_loss_flag => 'N'
29222: , p_gl_transfer_mode_code => 'S'
29223: , p_acct_entry_type_code => 'E'
29229: --
29230: --
29231: -- set accounting line type info
29232: --
29233: xla_ae_lines_pkg.SetAcctLineType
29234: (p_component_type => l_component_type
29235: ,p_event_type_code => l_event_type_code
29236: ,p_line_definition_owner_code => l_line_definition_owner_code
29237: ,p_line_definition_code => l_line_definition_code
29243: ,p_event_class_code => l_event_class_code);
29244: --
29245: -- set accounting class
29246: --
29247: xla_ae_lines_pkg.SetAcctClass(
29248: p_accounting_class_code => 'PO_PA_BURDENED'
29249: , p_ae_header_id => l_ae_header_id
29250: );
29251:
29251:
29252: --
29253: -- set rounding class
29254: --
29255: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
29256: 'PO_PA_BURDENED';
29257:
29258: --
29259: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
29255: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
29256: 'PO_PA_BURDENED';
29257:
29258: --
29259: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
29260: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
29261: --
29262: -- bulk performance
29263: --
29256: 'PO_PA_BURDENED';
29257:
29258: --
29259: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
29260: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
29261: --
29262: -- bulk performance
29263: --
29264: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
29260: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
29261: --
29262: -- bulk performance
29263: --
29264: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
29265:
29266: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
29267: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
29268:
29262: -- bulk performance
29263: --
29264: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
29265:
29266: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
29267: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
29268:
29269: -- 4955764
29270: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
29266: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
29267: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
29268:
29269: -- 4955764
29270: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
29271: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
29272:
29273: -- 4458381 Public Sector Enh
29274: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
29270: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
29271: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
29272:
29273: -- 4458381 Public Sector Enh
29274: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
29275: --
29276: -- set accounting attributes for the line type
29277: --
29278: l_entered_amt_idx := 28;
29348: l_rec_acct_attrs.array_num_value(34) := p_source_39;
29349: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
29350: l_rec_acct_attrs.array_num_value(35) := p_source_40;
29351:
29352: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
29353: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
29354:
29355: ---------------------------------------------------------------------------------------------------------------
29356: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
29349: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
29350: l_rec_acct_attrs.array_num_value(35) := p_source_40;
29351:
29352: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
29353: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
29354:
29355: ---------------------------------------------------------------------------------------------------------------
29356: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
29357: ---------------------------------------------------------------------------------------------------------------
29352: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
29353: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
29354:
29355: ---------------------------------------------------------------------------------------------------------------
29356: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
29357: ---------------------------------------------------------------------------------------------------------------
29358: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
29359:
29360: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
29354:
29355: ---------------------------------------------------------------------------------------------------------------
29356: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
29357: ---------------------------------------------------------------------------------------------------------------
29358: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
29359:
29360: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
29361: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
29362:
29356: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
29357: ---------------------------------------------------------------------------------------------------------------
29358: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
29359:
29360: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
29361: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
29362:
29363: IF xla_accounting_cache_pkg.GetValueChar
29364: (p_source_code => 'LEDGER_CATEGORY_CODE'
29357: ---------------------------------------------------------------------------------------------------------------
29358: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
29359:
29360: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
29361: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
29362:
29363: IF xla_accounting_cache_pkg.GetValueChar
29364: (p_source_code => 'LEDGER_CATEGORY_CODE'
29365: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
29368: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
29369: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
29370: )
29371: THEN
29372: xla_ae_lines_pkg.BflowUpgEntry
29373: (p_business_method_code => l_bflow_method_code
29374: ,p_business_class_code => l_bflow_class_code
29375: ,p_balance_type => l_balance_type_code);
29376: ELSE
29385: --
29386: -- call description
29387: --
29388:
29389: xla_ae_lines_pkg.SetLineDescription(
29390: p_ae_header_id => l_ae_header_id
29391: ,p_description => Description_2 (
29392: p_application_id => p_application_id
29393: , p_ae_header_id => l_ae_header_id
29421: , x_value_type_code => l_adr_value_type_code
29422: , p_side => 'NA'
29423: );
29424:
29425: xla_ae_lines_pkg.set_ccid(
29426: p_code_combination_id => l_ccid
29427: , p_value_type_code => l_adr_value_type_code
29428: , p_transaction_coa_id => l_adr_transaction_coa_id
29429: , p_accounting_coa_id => l_adr_accounting_coa_id
29457: xla_accounting_err_pkg.build_message
29458: (p_appli_s_name => 'XLA'
29459: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
29460: ,p_token_1 => 'LINE_NUMBER'
29461: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
29462: ,p_token_2 => 'LINE_TYPE_NAME'
29463: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
29464: l_component_type
29465: ,l_component_code
29493: --
29494: --
29495: ------------------------------------------------------------------------------------------------
29496: -- 4219869 Business Flow
29497: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
29498: -- Prior Entry. Currently, the following code is always generated.
29499: ------------------------------------------------------------------------------------------------
29500: XLA_AE_LINES_PKG.ValidateCurrentLine;
29501:
29496: -- 4219869 Business Flow
29497: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
29498: -- Prior Entry. Currently, the following code is always generated.
29499: ------------------------------------------------------------------------------------------------
29500: XLA_AE_LINES_PKG.ValidateCurrentLine;
29501:
29502: ------------------------------------------------------------------------------------
29503: -- 4219869 Business Flow
29504: -- Populated credit and debit amounts -- Need to generate this within IF
29502: ------------------------------------------------------------------------------------
29503: -- 4219869 Business Flow
29504: -- Populated credit and debit amounts -- Need to generate this within IF
29505: ------------------------------------------------------------------------------------
29506: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
29507:
29508: ----------------------------------------------------------------------------------
29509: -- 4219869 Business Flow
29510: -- Update journal entry status -- Need to generate this within IF
29534: -- To allow MPA report to determine if it should generate report process
29535: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
29536: ------------------------------------------------------------------------------------------
29537:
29538: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
29539: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
29540:
29541: --
29542: -- Update the line information that should be overwritten
29535: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
29536: ------------------------------------------------------------------------------------------
29537:
29538: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
29539: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
29540:
29541: --
29542: -- Update the line information that should be overwritten
29543: --
29540:
29541: --
29542: -- Update the line information that should be overwritten
29543: --
29544: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
29545: p_header_num => 1);
29546: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
29547:
29548: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
29542: -- Update the line information that should be overwritten
29543: --
29544: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
29545: p_header_num => 1);
29546: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
29547:
29548: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
29549:
29550: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
29544: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
29545: p_header_num => 1);
29546: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
29547:
29548: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
29549:
29550: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
29551: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
29552: END IF;
29547:
29548: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
29549:
29550: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
29551: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
29552: END IF;
29553:
29554: --
29555: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
29554: --
29555: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
29556: --
29557: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
29558: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
29559: ELSE
29560: ---------------------------------------------------------------------------------------------------
29561: -- 4262811a Switch Sign
29562: ---------------------------------------------------------------------------------------------------
29559: ELSE
29560: ---------------------------------------------------------------------------------------------------
29561: -- 4262811a Switch Sign
29562: ---------------------------------------------------------------------------------------------------
29563: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
29564: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29565: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29566: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29567: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29560: ---------------------------------------------------------------------------------------------------
29561: -- 4262811a Switch Sign
29562: ---------------------------------------------------------------------------------------------------
29563: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
29564: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29565: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29566: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29567: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29568: -- 5132302
29561: -- 4262811a Switch Sign
29562: ---------------------------------------------------------------------------------------------------
29563: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
29564: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29565: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29566: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29567: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29568: -- 5132302
29569: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
29562: ---------------------------------------------------------------------------------------------------
29563: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
29564: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29565: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29566: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29567: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29568: -- 5132302
29569: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
29570: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29563: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
29564: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29565: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29566: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29567: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29568: -- 5132302
29569: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
29570: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29571:
29565: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29566: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29567: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29568: -- 5132302
29569: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
29570: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29571:
29572: END IF;
29573:
29566: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29567: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29568: -- 5132302
29569: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
29570: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29571:
29572: END IF;
29573:
29574: -- 4955764
29571:
29572: END IF;
29573:
29574: -- 4955764
29575: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
29576: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
29577:
29578:
29579: XLA_AE_LINES_PKG.ValidateCurrentLine;
29575: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
29576: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
29577:
29578:
29579: XLA_AE_LINES_PKG.ValidateCurrentLine;
29580: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
29581:
29582: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
29583: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
29576: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
29577:
29578:
29579: XLA_AE_LINES_PKG.ValidateCurrentLine;
29580: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
29581:
29582: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
29583: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
29584: ,p_balance_type_code => l_balance_type_code);
29758: --
29759: -- bulk performance
29760: --
29761: l_balance_type_code VARCHAR2(1);
29762: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
29763: l_log_module VARCHAR2(240);
29764:
29765: --
29766: -- Upgrade strategy
29841: ') = 'S'
29842: THEN
29843:
29844: --
29845: XLA_AE_LINES_PKG.SetNewLine;
29846:
29847: p_balance_type_code := l_balance_type_code;
29848: -- set the flag so later we will know whether the gain loss line needs to be created
29849:
29853:
29854: --
29855: -- bulk performance
29856: --
29857: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
29858: p_header_num => 0); -- 4262811
29859: --
29860: -- set accounting line options
29861: --
29858: p_header_num => 0); -- 4262811
29859: --
29860: -- set accounting line options
29861: --
29862: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
29863: p_natural_side_code => 'D'
29864: , p_gain_or_loss_flag => 'N'
29865: , p_gl_transfer_mode_code => 'S'
29866: , p_acct_entry_type_code => 'E'
29872: --
29873: --
29874: -- set accounting line type info
29875: --
29876: xla_ae_lines_pkg.SetAcctLineType
29877: (p_component_type => l_component_type
29878: ,p_event_type_code => l_event_type_code
29879: ,p_line_definition_owner_code => l_line_definition_owner_code
29880: ,p_line_definition_code => l_line_definition_code
29886: ,p_event_class_code => l_event_class_code);
29887: --
29888: -- set accounting class
29889: --
29890: xla_ae_lines_pkg.SetAcctClass(
29891: p_accounting_class_code => 'PO_PA_BURDENED'
29892: , p_ae_header_id => l_ae_header_id
29893: );
29894:
29894:
29895: --
29896: -- set rounding class
29897: --
29898: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
29899: 'PO_PA_BURDENED';
29900:
29901: --
29902: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
29898: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
29899: 'PO_PA_BURDENED';
29900:
29901: --
29902: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
29903: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
29904: --
29905: -- bulk performance
29906: --
29899: 'PO_PA_BURDENED';
29900:
29901: --
29902: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
29903: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
29904: --
29905: -- bulk performance
29906: --
29907: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
29903: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
29904: --
29905: -- bulk performance
29906: --
29907: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
29908:
29909: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
29910: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
29911:
29905: -- bulk performance
29906: --
29907: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
29908:
29909: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
29910: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
29911:
29912: -- 4955764
29913: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
29909: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
29910: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
29911:
29912: -- 4955764
29913: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
29914: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
29915:
29916: -- 4458381 Public Sector Enh
29917: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
29913: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
29914: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
29915:
29916: -- 4458381 Public Sector Enh
29917: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
29918: --
29919: -- set accounting attributes for the line type
29920: --
29921: l_entered_amt_idx := 28;
29991: l_rec_acct_attrs.array_num_value(34) := p_source_39;
29992: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
29993: l_rec_acct_attrs.array_num_value(35) := p_source_40;
29994:
29995: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
29996: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
29997:
29998: ---------------------------------------------------------------------------------------------------------------
29999: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
29992: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
29993: l_rec_acct_attrs.array_num_value(35) := p_source_40;
29994:
29995: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
29996: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
29997:
29998: ---------------------------------------------------------------------------------------------------------------
29999: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
30000: ---------------------------------------------------------------------------------------------------------------
29995: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
29996: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
29997:
29998: ---------------------------------------------------------------------------------------------------------------
29999: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
30000: ---------------------------------------------------------------------------------------------------------------
30001: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
30002:
30003: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
29997:
29998: ---------------------------------------------------------------------------------------------------------------
29999: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
30000: ---------------------------------------------------------------------------------------------------------------
30001: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
30002:
30003: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
30004: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
30005:
29999: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
30000: ---------------------------------------------------------------------------------------------------------------
30001: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
30002:
30003: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
30004: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
30005:
30006: IF xla_accounting_cache_pkg.GetValueChar
30007: (p_source_code => 'LEDGER_CATEGORY_CODE'
30000: ---------------------------------------------------------------------------------------------------------------
30001: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
30002:
30003: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
30004: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
30005:
30006: IF xla_accounting_cache_pkg.GetValueChar
30007: (p_source_code => 'LEDGER_CATEGORY_CODE'
30008: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
30011: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
30012: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
30013: )
30014: THEN
30015: xla_ae_lines_pkg.BflowUpgEntry
30016: (p_business_method_code => l_bflow_method_code
30017: ,p_business_class_code => l_bflow_class_code
30018: ,p_balance_type => l_balance_type_code);
30019: ELSE
30028: --
30029: -- call description
30030: --
30031:
30032: xla_ae_lines_pkg.SetLineDescription(
30033: p_ae_header_id => l_ae_header_id
30034: ,p_description => Description_2 (
30035: p_application_id => p_application_id
30036: , p_ae_header_id => l_ae_header_id
30064: , x_value_type_code => l_adr_value_type_code
30065: , p_side => 'NA'
30066: );
30067:
30068: xla_ae_lines_pkg.set_ccid(
30069: p_code_combination_id => l_ccid
30070: , p_value_type_code => l_adr_value_type_code
30071: , p_transaction_coa_id => l_adr_transaction_coa_id
30072: , p_accounting_coa_id => l_adr_accounting_coa_id
30100: xla_accounting_err_pkg.build_message
30101: (p_appli_s_name => 'XLA'
30102: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
30103: ,p_token_1 => 'LINE_NUMBER'
30104: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
30105: ,p_token_2 => 'LINE_TYPE_NAME'
30106: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
30107: l_component_type
30108: ,l_component_code
30136: --
30137: --
30138: ------------------------------------------------------------------------------------------------
30139: -- 4219869 Business Flow
30140: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
30141: -- Prior Entry. Currently, the following code is always generated.
30142: ------------------------------------------------------------------------------------------------
30143: XLA_AE_LINES_PKG.ValidateCurrentLine;
30144:
30139: -- 4219869 Business Flow
30140: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
30141: -- Prior Entry. Currently, the following code is always generated.
30142: ------------------------------------------------------------------------------------------------
30143: XLA_AE_LINES_PKG.ValidateCurrentLine;
30144:
30145: ------------------------------------------------------------------------------------
30146: -- 4219869 Business Flow
30147: -- Populated credit and debit amounts -- Need to generate this within IF
30145: ------------------------------------------------------------------------------------
30146: -- 4219869 Business Flow
30147: -- Populated credit and debit amounts -- Need to generate this within IF
30148: ------------------------------------------------------------------------------------
30149: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
30150:
30151: ----------------------------------------------------------------------------------
30152: -- 4219869 Business Flow
30153: -- Update journal entry status -- Need to generate this within IF
30177: -- To allow MPA report to determine if it should generate report process
30178: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
30179: ------------------------------------------------------------------------------------------
30180:
30181: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
30182: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
30183:
30184: --
30185: -- Update the line information that should be overwritten
30178: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
30179: ------------------------------------------------------------------------------------------
30180:
30181: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
30182: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
30183:
30184: --
30185: -- Update the line information that should be overwritten
30186: --
30183:
30184: --
30185: -- Update the line information that should be overwritten
30186: --
30187: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
30188: p_header_num => 1);
30189: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
30190:
30191: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
30185: -- Update the line information that should be overwritten
30186: --
30187: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
30188: p_header_num => 1);
30189: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
30190:
30191: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
30192:
30193: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
30187: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
30188: p_header_num => 1);
30189: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
30190:
30191: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
30192:
30193: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
30194: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
30195: END IF;
30190:
30191: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
30192:
30193: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
30194: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
30195: END IF;
30196:
30197: --
30198: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
30197: --
30198: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
30199: --
30200: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
30201: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
30202: ELSE
30203: ---------------------------------------------------------------------------------------------------
30204: -- 4262811a Switch Sign
30205: ---------------------------------------------------------------------------------------------------
30202: ELSE
30203: ---------------------------------------------------------------------------------------------------
30204: -- 4262811a Switch Sign
30205: ---------------------------------------------------------------------------------------------------
30206: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
30207: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30208: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30209: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30210: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30203: ---------------------------------------------------------------------------------------------------
30204: -- 4262811a Switch Sign
30205: ---------------------------------------------------------------------------------------------------
30206: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
30207: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30208: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30209: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30210: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30211: -- 5132302
30204: -- 4262811a Switch Sign
30205: ---------------------------------------------------------------------------------------------------
30206: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
30207: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30208: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30209: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30210: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30211: -- 5132302
30212: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
30205: ---------------------------------------------------------------------------------------------------
30206: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
30207: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30208: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30209: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30210: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30211: -- 5132302
30212: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
30213: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30206: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
30207: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30208: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30209: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30210: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30211: -- 5132302
30212: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
30213: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30214:
30208: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30209: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30210: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30211: -- 5132302
30212: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
30213: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30214:
30215: END IF;
30216:
30209: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30210: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30211: -- 5132302
30212: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
30213: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30214:
30215: END IF;
30216:
30217: -- 4955764
30214:
30215: END IF;
30216:
30217: -- 4955764
30218: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
30219: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
30220:
30221:
30222: XLA_AE_LINES_PKG.ValidateCurrentLine;
30218: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
30219: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
30220:
30221:
30222: XLA_AE_LINES_PKG.ValidateCurrentLine;
30223: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
30224:
30225: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
30226: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
30219: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
30220:
30221:
30222: XLA_AE_LINES_PKG.ValidateCurrentLine;
30223: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
30224:
30225: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
30226: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
30227: ,p_balance_type_code => l_balance_type_code);
30399: --
30400: -- bulk performance
30401: --
30402: l_balance_type_code VARCHAR2(1);
30403: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
30404: l_log_module VARCHAR2(240);
30405:
30406: --
30407: -- Upgrade strategy
30482: ') = 'S'
30483: THEN
30484:
30485: --
30486: XLA_AE_LINES_PKG.SetNewLine;
30487:
30488: p_balance_type_code := l_balance_type_code;
30489: -- set the flag so later we will know whether the gain loss line needs to be created
30490:
30494:
30495: --
30496: -- bulk performance
30497: --
30498: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
30499: p_header_num => 0); -- 4262811
30500: --
30501: -- set accounting line options
30502: --
30499: p_header_num => 0); -- 4262811
30500: --
30501: -- set accounting line options
30502: --
30503: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
30504: p_natural_side_code => 'D'
30505: , p_gain_or_loss_flag => 'N'
30506: , p_gl_transfer_mode_code => 'S'
30507: , p_acct_entry_type_code => 'E'
30513: --
30514: --
30515: -- set accounting line type info
30516: --
30517: xla_ae_lines_pkg.SetAcctLineType
30518: (p_component_type => l_component_type
30519: ,p_event_type_code => l_event_type_code
30520: ,p_line_definition_owner_code => l_line_definition_owner_code
30521: ,p_line_definition_code => l_line_definition_code
30527: ,p_event_class_code => l_event_class_code);
30528: --
30529: -- set accounting class
30530: --
30531: xla_ae_lines_pkg.SetAcctClass(
30532: p_accounting_class_code => 'PO_PA_BURDENED'
30533: , p_ae_header_id => l_ae_header_id
30534: );
30535:
30535:
30536: --
30537: -- set rounding class
30538: --
30539: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
30540: 'PO_PA_BURDENED';
30541:
30542: --
30543: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
30539: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
30540: 'PO_PA_BURDENED';
30541:
30542: --
30543: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
30544: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
30545: --
30546: -- bulk performance
30547: --
30540: 'PO_PA_BURDENED';
30541:
30542: --
30543: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
30544: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
30545: --
30546: -- bulk performance
30547: --
30548: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
30544: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
30545: --
30546: -- bulk performance
30547: --
30548: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
30549:
30550: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
30551: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
30552:
30546: -- bulk performance
30547: --
30548: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
30549:
30550: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
30551: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
30552:
30553: -- 4955764
30554: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
30550: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
30551: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
30552:
30553: -- 4955764
30554: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
30555: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
30556:
30557: -- 4458381 Public Sector Enh
30558: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
30554: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
30555: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
30556:
30557: -- 4458381 Public Sector Enh
30558: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
30559: --
30560: -- set accounting attributes for the line type
30561: --
30562: l_entered_amt_idx := 27;
30630: l_rec_acct_attrs.array_num_value(33) := p_source_39;
30631: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
30632: l_rec_acct_attrs.array_num_value(34) := p_source_40;
30633:
30634: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
30635: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
30636:
30637: ---------------------------------------------------------------------------------------------------------------
30638: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
30631: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
30632: l_rec_acct_attrs.array_num_value(34) := p_source_40;
30633:
30634: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
30635: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
30636:
30637: ---------------------------------------------------------------------------------------------------------------
30638: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
30639: ---------------------------------------------------------------------------------------------------------------
30634: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
30635: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
30636:
30637: ---------------------------------------------------------------------------------------------------------------
30638: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
30639: ---------------------------------------------------------------------------------------------------------------
30640: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
30641:
30642: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
30636:
30637: ---------------------------------------------------------------------------------------------------------------
30638: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
30639: ---------------------------------------------------------------------------------------------------------------
30640: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
30641:
30642: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
30643: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
30644:
30638: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
30639: ---------------------------------------------------------------------------------------------------------------
30640: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
30641:
30642: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
30643: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
30644:
30645: IF xla_accounting_cache_pkg.GetValueChar
30646: (p_source_code => 'LEDGER_CATEGORY_CODE'
30639: ---------------------------------------------------------------------------------------------------------------
30640: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
30641:
30642: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
30643: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
30644:
30645: IF xla_accounting_cache_pkg.GetValueChar
30646: (p_source_code => 'LEDGER_CATEGORY_CODE'
30647: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
30650: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
30651: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
30652: )
30653: THEN
30654: xla_ae_lines_pkg.BflowUpgEntry
30655: (p_business_method_code => l_bflow_method_code
30656: ,p_business_class_code => l_bflow_class_code
30657: ,p_balance_type => l_balance_type_code);
30658: ELSE
30667: --
30668: -- call description
30669: --
30670:
30671: xla_ae_lines_pkg.SetLineDescription(
30672: p_ae_header_id => l_ae_header_id
30673: ,p_description => Description_2 (
30674: p_application_id => p_application_id
30675: , p_ae_header_id => l_ae_header_id
30703: , x_value_type_code => l_adr_value_type_code
30704: , p_side => 'NA'
30705: );
30706:
30707: xla_ae_lines_pkg.set_ccid(
30708: p_code_combination_id => l_ccid
30709: , p_value_type_code => l_adr_value_type_code
30710: , p_transaction_coa_id => l_adr_transaction_coa_id
30711: , p_accounting_coa_id => l_adr_accounting_coa_id
30739: xla_accounting_err_pkg.build_message
30740: (p_appli_s_name => 'XLA'
30741: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
30742: ,p_token_1 => 'LINE_NUMBER'
30743: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
30744: ,p_token_2 => 'LINE_TYPE_NAME'
30745: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
30746: l_component_type
30747: ,l_component_code
30775: --
30776: --
30777: ------------------------------------------------------------------------------------------------
30778: -- 4219869 Business Flow
30779: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
30780: -- Prior Entry. Currently, the following code is always generated.
30781: ------------------------------------------------------------------------------------------------
30782: XLA_AE_LINES_PKG.ValidateCurrentLine;
30783:
30778: -- 4219869 Business Flow
30779: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
30780: -- Prior Entry. Currently, the following code is always generated.
30781: ------------------------------------------------------------------------------------------------
30782: XLA_AE_LINES_PKG.ValidateCurrentLine;
30783:
30784: ------------------------------------------------------------------------------------
30785: -- 4219869 Business Flow
30786: -- Populated credit and debit amounts -- Need to generate this within IF
30784: ------------------------------------------------------------------------------------
30785: -- 4219869 Business Flow
30786: -- Populated credit and debit amounts -- Need to generate this within IF
30787: ------------------------------------------------------------------------------------
30788: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
30789:
30790: ----------------------------------------------------------------------------------
30791: -- 4219869 Business Flow
30792: -- Update journal entry status -- Need to generate this within IF
30816: -- To allow MPA report to determine if it should generate report process
30817: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
30818: ------------------------------------------------------------------------------------------
30819:
30820: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
30821: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
30822:
30823: --
30824: -- Update the line information that should be overwritten
30817: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
30818: ------------------------------------------------------------------------------------------
30819:
30820: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
30821: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
30822:
30823: --
30824: -- Update the line information that should be overwritten
30825: --
30822:
30823: --
30824: -- Update the line information that should be overwritten
30825: --
30826: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
30827: p_header_num => 1);
30828: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
30829:
30830: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
30824: -- Update the line information that should be overwritten
30825: --
30826: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
30827: p_header_num => 1);
30828: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
30829:
30830: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
30831:
30832: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
30826: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
30827: p_header_num => 1);
30828: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
30829:
30830: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
30831:
30832: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
30833: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
30834: END IF;
30829:
30830: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
30831:
30832: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
30833: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
30834: END IF;
30835:
30836: --
30837: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
30836: --
30837: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
30838: --
30839: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
30840: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
30841: ELSE
30842: ---------------------------------------------------------------------------------------------------
30843: -- 4262811a Switch Sign
30844: ---------------------------------------------------------------------------------------------------
30841: ELSE
30842: ---------------------------------------------------------------------------------------------------
30843: -- 4262811a Switch Sign
30844: ---------------------------------------------------------------------------------------------------
30845: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
30846: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30847: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30848: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30849: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30842: ---------------------------------------------------------------------------------------------------
30843: -- 4262811a Switch Sign
30844: ---------------------------------------------------------------------------------------------------
30845: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
30846: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30847: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30848: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30849: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30850: -- 5132302
30843: -- 4262811a Switch Sign
30844: ---------------------------------------------------------------------------------------------------
30845: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
30846: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30847: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30848: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30849: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30850: -- 5132302
30851: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
30844: ---------------------------------------------------------------------------------------------------
30845: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
30846: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30847: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30848: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30849: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30850: -- 5132302
30851: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
30852: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30845: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
30846: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30847: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30848: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30849: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30850: -- 5132302
30851: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
30852: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30853:
30847: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30848: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30849: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30850: -- 5132302
30851: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
30852: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30853:
30854: END IF;
30855:
30848: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30849: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30850: -- 5132302
30851: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
30852: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30853:
30854: END IF;
30855:
30856: -- 4955764
30853:
30854: END IF;
30855:
30856: -- 4955764
30857: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
30858: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
30859:
30860:
30861: XLA_AE_LINES_PKG.ValidateCurrentLine;
30857: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
30858: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
30859:
30860:
30861: XLA_AE_LINES_PKG.ValidateCurrentLine;
30862: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
30863:
30864: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
30865: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
30858: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
30859:
30860:
30861: XLA_AE_LINES_PKG.ValidateCurrentLine;
30862: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
30863:
30864: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
30865: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
30866: ,p_balance_type_code => l_balance_type_code);
31038: --
31039: -- bulk performance
31040: --
31041: l_balance_type_code VARCHAR2(1);
31042: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
31043: l_log_module VARCHAR2(240);
31044:
31045: --
31046: -- Upgrade strategy
31119: ') = 'D'
31120: THEN
31121:
31122: --
31123: XLA_AE_LINES_PKG.SetNewLine;
31124:
31125: p_balance_type_code := l_balance_type_code;
31126: -- set the flag so later we will know whether the gain loss line needs to be created
31127:
31131:
31132: --
31133: -- bulk performance
31134: --
31135: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
31136: p_header_num => 0); -- 4262811
31137: --
31138: -- set accounting line options
31139: --
31136: p_header_num => 0); -- 4262811
31137: --
31138: -- set accounting line options
31139: --
31140: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
31141: p_natural_side_code => 'D'
31142: , p_gain_or_loss_flag => 'N'
31143: , p_gl_transfer_mode_code => 'S'
31144: , p_acct_entry_type_code => 'E'
31150: --
31151: --
31152: -- set accounting line type info
31153: --
31154: xla_ae_lines_pkg.SetAcctLineType
31155: (p_component_type => l_component_type
31156: ,p_event_type_code => l_event_type_code
31157: ,p_line_definition_owner_code => l_line_definition_owner_code
31158: ,p_line_definition_code => l_line_definition_code
31164: ,p_event_class_code => l_event_class_code);
31165: --
31166: -- set accounting class
31167: --
31168: xla_ae_lines_pkg.SetAcctClass(
31169: p_accounting_class_code => 'PO_PA_BURDEN'
31170: , p_ae_header_id => l_ae_header_id
31171: );
31172:
31172:
31173: --
31174: -- set rounding class
31175: --
31176: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
31177: 'PO_PA_BURDEN';
31178:
31179: --
31180: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
31176: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
31177: 'PO_PA_BURDEN';
31178:
31179: --
31180: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
31181: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
31182: --
31183: -- bulk performance
31184: --
31177: 'PO_PA_BURDEN';
31178:
31179: --
31180: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
31181: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
31182: --
31183: -- bulk performance
31184: --
31185: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
31181: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
31182: --
31183: -- bulk performance
31184: --
31185: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
31186:
31187: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
31188: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
31189:
31183: -- bulk performance
31184: --
31185: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
31186:
31187: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
31188: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
31189:
31190: -- 4955764
31191: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
31187: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
31188: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
31189:
31190: -- 4955764
31191: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
31192: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
31193:
31194: -- 4458381 Public Sector Enh
31195: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
31191: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
31192: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
31193:
31194: -- 4458381 Public Sector Enh
31195: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
31196: --
31197: -- set accounting attributes for the line type
31198: --
31199: l_entered_amt_idx := 27;
31267: l_rec_acct_attrs.array_num_value(33) := p_source_39;
31268: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
31269: l_rec_acct_attrs.array_num_value(34) := p_source_40;
31270:
31271: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
31272: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
31273:
31274: ---------------------------------------------------------------------------------------------------------------
31275: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
31268: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
31269: l_rec_acct_attrs.array_num_value(34) := p_source_40;
31270:
31271: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
31272: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
31273:
31274: ---------------------------------------------------------------------------------------------------------------
31275: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
31276: ---------------------------------------------------------------------------------------------------------------
31271: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
31272: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
31273:
31274: ---------------------------------------------------------------------------------------------------------------
31275: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
31276: ---------------------------------------------------------------------------------------------------------------
31277: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
31278:
31279: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31273:
31274: ---------------------------------------------------------------------------------------------------------------
31275: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
31276: ---------------------------------------------------------------------------------------------------------------
31277: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
31278:
31279: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31280: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31281:
31275: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
31276: ---------------------------------------------------------------------------------------------------------------
31277: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
31278:
31279: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31280: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31281:
31282: IF xla_accounting_cache_pkg.GetValueChar
31283: (p_source_code => 'LEDGER_CATEGORY_CODE'
31276: ---------------------------------------------------------------------------------------------------------------
31277: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
31278:
31279: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31280: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31281:
31282: IF xla_accounting_cache_pkg.GetValueChar
31283: (p_source_code => 'LEDGER_CATEGORY_CODE'
31284: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
31287: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
31288: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
31289: )
31290: THEN
31291: xla_ae_lines_pkg.BflowUpgEntry
31292: (p_business_method_code => l_bflow_method_code
31293: ,p_business_class_code => l_bflow_class_code
31294: ,p_balance_type => l_balance_type_code);
31295: ELSE
31304: --
31305: -- call description
31306: --
31307:
31308: xla_ae_lines_pkg.SetLineDescription(
31309: p_ae_header_id => l_ae_header_id
31310: ,p_description => Description_2 (
31311: p_application_id => p_application_id
31312: , p_ae_header_id => l_ae_header_id
31340: , x_value_type_code => l_adr_value_type_code
31341: , p_side => 'NA'
31342: );
31343:
31344: xla_ae_lines_pkg.set_ccid(
31345: p_code_combination_id => l_ccid
31346: , p_value_type_code => l_adr_value_type_code
31347: , p_transaction_coa_id => l_adr_transaction_coa_id
31348: , p_accounting_coa_id => l_adr_accounting_coa_id
31376: xla_accounting_err_pkg.build_message
31377: (p_appli_s_name => 'XLA'
31378: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
31379: ,p_token_1 => 'LINE_NUMBER'
31380: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
31381: ,p_token_2 => 'LINE_TYPE_NAME'
31382: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
31383: l_component_type
31384: ,l_component_code
31412: --
31413: --
31414: ------------------------------------------------------------------------------------------------
31415: -- 4219869 Business Flow
31416: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
31417: -- Prior Entry. Currently, the following code is always generated.
31418: ------------------------------------------------------------------------------------------------
31419: XLA_AE_LINES_PKG.ValidateCurrentLine;
31420:
31415: -- 4219869 Business Flow
31416: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
31417: -- Prior Entry. Currently, the following code is always generated.
31418: ------------------------------------------------------------------------------------------------
31419: XLA_AE_LINES_PKG.ValidateCurrentLine;
31420:
31421: ------------------------------------------------------------------------------------
31422: -- 4219869 Business Flow
31423: -- Populated credit and debit amounts -- Need to generate this within IF
31421: ------------------------------------------------------------------------------------
31422: -- 4219869 Business Flow
31423: -- Populated credit and debit amounts -- Need to generate this within IF
31424: ------------------------------------------------------------------------------------
31425: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
31426:
31427: ----------------------------------------------------------------------------------
31428: -- 4219869 Business Flow
31429: -- Update journal entry status -- Need to generate this within IF
31453: -- To allow MPA report to determine if it should generate report process
31454: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
31455: ------------------------------------------------------------------------------------------
31456:
31457: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
31458: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
31459:
31460: --
31461: -- Update the line information that should be overwritten
31454: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
31455: ------------------------------------------------------------------------------------------
31456:
31457: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
31458: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
31459:
31460: --
31461: -- Update the line information that should be overwritten
31462: --
31459:
31460: --
31461: -- Update the line information that should be overwritten
31462: --
31463: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
31464: p_header_num => 1);
31465: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
31466:
31467: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
31461: -- Update the line information that should be overwritten
31462: --
31463: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
31464: p_header_num => 1);
31465: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
31466:
31467: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
31468:
31469: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
31463: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
31464: p_header_num => 1);
31465: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
31466:
31467: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
31468:
31469: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
31470: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
31471: END IF;
31466:
31467: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
31468:
31469: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
31470: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
31471: END IF;
31472:
31473: --
31474: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
31473: --
31474: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
31475: --
31476: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
31477: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
31478: ELSE
31479: ---------------------------------------------------------------------------------------------------
31480: -- 4262811a Switch Sign
31481: ---------------------------------------------------------------------------------------------------
31478: ELSE
31479: ---------------------------------------------------------------------------------------------------
31480: -- 4262811a Switch Sign
31481: ---------------------------------------------------------------------------------------------------
31482: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
31483: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31484: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31485: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31486: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31479: ---------------------------------------------------------------------------------------------------
31480: -- 4262811a Switch Sign
31481: ---------------------------------------------------------------------------------------------------
31482: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
31483: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31484: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31485: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31486: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31487: -- 5132302
31480: -- 4262811a Switch Sign
31481: ---------------------------------------------------------------------------------------------------
31482: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
31483: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31484: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31485: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31486: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31487: -- 5132302
31488: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
31481: ---------------------------------------------------------------------------------------------------
31482: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
31483: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31484: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31485: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31486: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31487: -- 5132302
31488: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
31489: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31482: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
31483: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31484: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31485: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31486: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31487: -- 5132302
31488: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
31489: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31490:
31484: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31485: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31486: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31487: -- 5132302
31488: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
31489: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31490:
31491: END IF;
31492:
31485: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31486: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31487: -- 5132302
31488: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
31489: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31490:
31491: END IF;
31492:
31493: -- 4955764
31490:
31491: END IF;
31492:
31493: -- 4955764
31494: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
31495: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
31496:
31497:
31498: XLA_AE_LINES_PKG.ValidateCurrentLine;
31494: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
31495: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
31496:
31497:
31498: XLA_AE_LINES_PKG.ValidateCurrentLine;
31499: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
31500:
31501: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
31502: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
31495: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
31496:
31497:
31498: XLA_AE_LINES_PKG.ValidateCurrentLine;
31499: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
31500:
31501: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
31502: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
31503: ,p_balance_type_code => l_balance_type_code);
31650: --
31651: -- bulk performance
31652: --
31653: l_balance_type_code VARCHAR2(1);
31654: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
31655: l_log_module VARCHAR2(240);
31656:
31657: --
31658: -- Upgrade strategy
31725: ') = 'M'
31726: THEN
31727:
31728: --
31729: XLA_AE_LINES_PKG.SetNewLine;
31730:
31731: p_balance_type_code := l_balance_type_code;
31732: -- set the flag so later we will know whether the gain loss line needs to be created
31733:
31737:
31738: --
31739: -- bulk performance
31740: --
31741: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
31742: p_header_num => 0); -- 4262811
31743: --
31744: -- set accounting line options
31745: --
31742: p_header_num => 0); -- 4262811
31743: --
31744: -- set accounting line options
31745: --
31746: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
31747: p_natural_side_code => 'D'
31748: , p_gain_or_loss_flag => 'N'
31749: , p_gl_transfer_mode_code => 'S'
31750: , p_acct_entry_type_code => 'E'
31756: --
31757: --
31758: -- set accounting line type info
31759: --
31760: xla_ae_lines_pkg.SetAcctLineType
31761: (p_component_type => l_component_type
31762: ,p_event_type_code => l_event_type_code
31763: ,p_line_definition_owner_code => l_line_definition_owner_code
31764: ,p_line_definition_code => l_line_definition_code
31770: ,p_event_class_code => l_event_class_code);
31771: --
31772: -- set accounting class
31773: --
31774: xla_ae_lines_pkg.SetAcctClass(
31775: p_accounting_class_code => 'PURCHASE_ORDER'
31776: , p_ae_header_id => l_ae_header_id
31777: );
31778:
31778:
31779: --
31780: -- set rounding class
31781: --
31782: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
31783: 'PURCHASE_ORDER';
31784:
31785: --
31786: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
31782: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
31783: 'PURCHASE_ORDER';
31784:
31785: --
31786: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
31787: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
31788: --
31789: -- bulk performance
31790: --
31783: 'PURCHASE_ORDER';
31784:
31785: --
31786: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
31787: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
31788: --
31789: -- bulk performance
31790: --
31791: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
31787: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
31788: --
31789: -- bulk performance
31790: --
31791: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
31792:
31793: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
31794: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
31795:
31789: -- bulk performance
31790: --
31791: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
31792:
31793: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
31794: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
31795:
31796: -- 4955764
31797: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
31793: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
31794: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
31795:
31796: -- 4955764
31797: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
31798: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
31799:
31800: -- 4458381 Public Sector Enh
31801: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
31797: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
31798: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
31799:
31800: -- 4458381 Public Sector Enh
31801: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
31802: --
31803: -- set accounting attributes for the line type
31804: --
31805: l_entered_amt_idx := 23;
31883: l_rec_acct_attrs.array_num_value(33) := p_source_61;
31884: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
31885: l_rec_acct_attrs.array_num_value(34) := p_source_61;
31886:
31887: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
31888: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
31889:
31890: ---------------------------------------------------------------------------------------------------------------
31891: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
31884: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
31885: l_rec_acct_attrs.array_num_value(34) := p_source_61;
31886:
31887: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
31888: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
31889:
31890: ---------------------------------------------------------------------------------------------------------------
31891: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
31892: ---------------------------------------------------------------------------------------------------------------
31887: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
31888: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
31889:
31890: ---------------------------------------------------------------------------------------------------------------
31891: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
31892: ---------------------------------------------------------------------------------------------------------------
31893: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
31894:
31895: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31889:
31890: ---------------------------------------------------------------------------------------------------------------
31891: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
31892: ---------------------------------------------------------------------------------------------------------------
31893: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
31894:
31895: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31896: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31897:
31891: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
31892: ---------------------------------------------------------------------------------------------------------------
31893: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
31894:
31895: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31896: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31897:
31898: IF xla_accounting_cache_pkg.GetValueChar
31899: (p_source_code => 'LEDGER_CATEGORY_CODE'
31892: ---------------------------------------------------------------------------------------------------------------
31893: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
31894:
31895: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31896: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31897:
31898: IF xla_accounting_cache_pkg.GetValueChar
31899: (p_source_code => 'LEDGER_CATEGORY_CODE'
31900: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
31903: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
31904: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
31905: )
31906: THEN
31907: xla_ae_lines_pkg.BflowUpgEntry
31908: (p_business_method_code => l_bflow_method_code
31909: ,p_business_class_code => l_bflow_class_code
31910: ,p_balance_type => l_balance_type_code);
31911: ELSE
31920: --
31921: -- call description
31922: --
31923:
31924: xla_ae_lines_pkg.SetLineDescription(
31925: p_ae_header_id => l_ae_header_id
31926: ,p_description => Description_3 (
31927: p_application_id => p_application_id
31928: , p_ae_header_id => l_ae_header_id
31953: , x_value_type_code => l_adr_value_type_code
31954: , p_side => 'NA'
31955: );
31956:
31957: xla_ae_lines_pkg.set_ccid(
31958: p_code_combination_id => l_ccid
31959: , p_value_type_code => l_adr_value_type_code
31960: , p_transaction_coa_id => l_adr_transaction_coa_id
31961: , p_accounting_coa_id => l_adr_accounting_coa_id
31989: xla_accounting_err_pkg.build_message
31990: (p_appli_s_name => 'XLA'
31991: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
31992: ,p_token_1 => 'LINE_NUMBER'
31993: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
31994: ,p_token_2 => 'LINE_TYPE_NAME'
31995: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
31996: l_component_type
31997: ,l_component_code
32025: --
32026: --
32027: ------------------------------------------------------------------------------------------------
32028: -- 4219869 Business Flow
32029: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
32030: -- Prior Entry. Currently, the following code is always generated.
32031: ------------------------------------------------------------------------------------------------
32032: XLA_AE_LINES_PKG.ValidateCurrentLine;
32033:
32028: -- 4219869 Business Flow
32029: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
32030: -- Prior Entry. Currently, the following code is always generated.
32031: ------------------------------------------------------------------------------------------------
32032: XLA_AE_LINES_PKG.ValidateCurrentLine;
32033:
32034: ------------------------------------------------------------------------------------
32035: -- 4219869 Business Flow
32036: -- Populated credit and debit amounts -- Need to generate this within IF
32034: ------------------------------------------------------------------------------------
32035: -- 4219869 Business Flow
32036: -- Populated credit and debit amounts -- Need to generate this within IF
32037: ------------------------------------------------------------------------------------
32038: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
32039:
32040: ----------------------------------------------------------------------------------
32041: -- 4219869 Business Flow
32042: -- Update journal entry status -- Need to generate this within IF
32066: -- To allow MPA report to determine if it should generate report process
32067: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
32068: ------------------------------------------------------------------------------------------
32069:
32070: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
32071: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
32072:
32073: --
32074: -- Update the line information that should be overwritten
32067: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
32068: ------------------------------------------------------------------------------------------
32069:
32070: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
32071: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
32072:
32073: --
32074: -- Update the line information that should be overwritten
32075: --
32072:
32073: --
32074: -- Update the line information that should be overwritten
32075: --
32076: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
32077: p_header_num => 1);
32078: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
32079:
32080: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
32074: -- Update the line information that should be overwritten
32075: --
32076: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
32077: p_header_num => 1);
32078: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
32079:
32080: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
32081:
32082: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
32076: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
32077: p_header_num => 1);
32078: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
32079:
32080: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
32081:
32082: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
32083: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
32084: END IF;
32079:
32080: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
32081:
32082: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
32083: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
32084: END IF;
32085:
32086: --
32087: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
32086: --
32087: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
32088: --
32089: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
32090: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
32091: ELSE
32092: ---------------------------------------------------------------------------------------------------
32093: -- 4262811a Switch Sign
32094: ---------------------------------------------------------------------------------------------------
32091: ELSE
32092: ---------------------------------------------------------------------------------------------------
32093: -- 4262811a Switch Sign
32094: ---------------------------------------------------------------------------------------------------
32095: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
32096: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32097: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32098: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32099: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32092: ---------------------------------------------------------------------------------------------------
32093: -- 4262811a Switch Sign
32094: ---------------------------------------------------------------------------------------------------
32095: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
32096: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32097: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32098: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32099: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32100: -- 5132302
32093: -- 4262811a Switch Sign
32094: ---------------------------------------------------------------------------------------------------
32095: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
32096: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32097: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32098: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32099: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32100: -- 5132302
32101: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
32094: ---------------------------------------------------------------------------------------------------
32095: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
32096: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32097: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32098: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32099: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32100: -- 5132302
32101: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
32102: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32095: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
32096: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32097: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32098: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32099: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32100: -- 5132302
32101: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
32102: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32103:
32097: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32098: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32099: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32100: -- 5132302
32101: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
32102: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32103:
32104: END IF;
32105:
32098: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32099: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32100: -- 5132302
32101: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
32102: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32103:
32104: END IF;
32105:
32106: -- 4955764
32103:
32104: END IF;
32105:
32106: -- 4955764
32107: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
32108: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
32109:
32110:
32111: XLA_AE_LINES_PKG.ValidateCurrentLine;
32107: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
32108: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
32109:
32110:
32111: XLA_AE_LINES_PKG.ValidateCurrentLine;
32112: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
32113:
32114: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
32115: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
32108: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
32109:
32110:
32111: XLA_AE_LINES_PKG.ValidateCurrentLine;
32112: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
32113:
32114: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
32115: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
32116: ,p_balance_type_code => l_balance_type_code);
32263: --
32264: -- bulk performance
32265: --
32266: l_balance_type_code VARCHAR2(1);
32267: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
32268: l_log_module VARCHAR2(240);
32269:
32270: --
32271: -- Upgrade strategy
32338: ') = 'M'
32339: THEN
32340:
32341: --
32342: XLA_AE_LINES_PKG.SetNewLine;
32343:
32344: p_balance_type_code := l_balance_type_code;
32345: -- set the flag so later we will know whether the gain loss line needs to be created
32346:
32350:
32351: --
32352: -- bulk performance
32353: --
32354: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
32355: p_header_num => 0); -- 4262811
32356: --
32357: -- set accounting line options
32358: --
32355: p_header_num => 0); -- 4262811
32356: --
32357: -- set accounting line options
32358: --
32359: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
32360: p_natural_side_code => 'D'
32361: , p_gain_or_loss_flag => 'N'
32362: , p_gl_transfer_mode_code => 'S'
32363: , p_acct_entry_type_code => 'E'
32369: --
32370: --
32371: -- set accounting line type info
32372: --
32373: xla_ae_lines_pkg.SetAcctLineType
32374: (p_component_type => l_component_type
32375: ,p_event_type_code => l_event_type_code
32376: ,p_line_definition_owner_code => l_line_definition_owner_code
32377: ,p_line_definition_code => l_line_definition_code
32383: ,p_event_class_code => l_event_class_code);
32384: --
32385: -- set accounting class
32386: --
32387: xla_ae_lines_pkg.SetAcctClass(
32388: p_accounting_class_code => 'PURCHASE_ORDER'
32389: , p_ae_header_id => l_ae_header_id
32390: );
32391:
32391:
32392: --
32393: -- set rounding class
32394: --
32395: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
32396: 'PURCHASE_ORDER';
32397:
32398: --
32399: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
32395: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
32396: 'PURCHASE_ORDER';
32397:
32398: --
32399: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
32400: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
32401: --
32402: -- bulk performance
32403: --
32396: 'PURCHASE_ORDER';
32397:
32398: --
32399: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
32400: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
32401: --
32402: -- bulk performance
32403: --
32404: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
32400: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
32401: --
32402: -- bulk performance
32403: --
32404: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
32405:
32406: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
32407: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
32408:
32402: -- bulk performance
32403: --
32404: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
32405:
32406: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
32407: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
32408:
32409: -- 4955764
32410: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
32406: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
32407: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
32408:
32409: -- 4955764
32410: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
32411: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
32412:
32413: -- 4458381 Public Sector Enh
32414: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
32410: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
32411: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
32412:
32413: -- 4458381 Public Sector Enh
32414: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
32415: --
32416: -- set accounting attributes for the line type
32417: --
32418: l_entered_amt_idx := 23;
32496: l_rec_acct_attrs.array_num_value(33) := p_source_61;
32497: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
32498: l_rec_acct_attrs.array_num_value(34) := p_source_61;
32499:
32500: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
32501: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
32502:
32503: ---------------------------------------------------------------------------------------------------------------
32504: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
32497: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
32498: l_rec_acct_attrs.array_num_value(34) := p_source_61;
32499:
32500: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
32501: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
32502:
32503: ---------------------------------------------------------------------------------------------------------------
32504: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
32505: ---------------------------------------------------------------------------------------------------------------
32500: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
32501: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
32502:
32503: ---------------------------------------------------------------------------------------------------------------
32504: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
32505: ---------------------------------------------------------------------------------------------------------------
32506: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
32507:
32508: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
32502:
32503: ---------------------------------------------------------------------------------------------------------------
32504: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
32505: ---------------------------------------------------------------------------------------------------------------
32506: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
32507:
32508: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
32509: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
32510:
32504: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
32505: ---------------------------------------------------------------------------------------------------------------
32506: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
32507:
32508: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
32509: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
32510:
32511: IF xla_accounting_cache_pkg.GetValueChar
32512: (p_source_code => 'LEDGER_CATEGORY_CODE'
32505: ---------------------------------------------------------------------------------------------------------------
32506: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
32507:
32508: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
32509: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
32510:
32511: IF xla_accounting_cache_pkg.GetValueChar
32512: (p_source_code => 'LEDGER_CATEGORY_CODE'
32513: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
32516: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
32517: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
32518: )
32519: THEN
32520: xla_ae_lines_pkg.BflowUpgEntry
32521: (p_business_method_code => l_bflow_method_code
32522: ,p_business_class_code => l_bflow_class_code
32523: ,p_balance_type => l_balance_type_code);
32524: ELSE
32533: --
32534: -- call description
32535: --
32536:
32537: xla_ae_lines_pkg.SetLineDescription(
32538: p_ae_header_id => l_ae_header_id
32539: ,p_description => Description_3 (
32540: p_application_id => p_application_id
32541: , p_ae_header_id => l_ae_header_id
32566: , x_value_type_code => l_adr_value_type_code
32567: , p_side => 'NA'
32568: );
32569:
32570: xla_ae_lines_pkg.set_ccid(
32571: p_code_combination_id => l_ccid
32572: , p_value_type_code => l_adr_value_type_code
32573: , p_transaction_coa_id => l_adr_transaction_coa_id
32574: , p_accounting_coa_id => l_adr_accounting_coa_id
32602: xla_accounting_err_pkg.build_message
32603: (p_appli_s_name => 'XLA'
32604: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
32605: ,p_token_1 => 'LINE_NUMBER'
32606: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
32607: ,p_token_2 => 'LINE_TYPE_NAME'
32608: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
32609: l_component_type
32610: ,l_component_code
32638: --
32639: --
32640: ------------------------------------------------------------------------------------------------
32641: -- 4219869 Business Flow
32642: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
32643: -- Prior Entry. Currently, the following code is always generated.
32644: ------------------------------------------------------------------------------------------------
32645: XLA_AE_LINES_PKG.ValidateCurrentLine;
32646:
32641: -- 4219869 Business Flow
32642: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
32643: -- Prior Entry. Currently, the following code is always generated.
32644: ------------------------------------------------------------------------------------------------
32645: XLA_AE_LINES_PKG.ValidateCurrentLine;
32646:
32647: ------------------------------------------------------------------------------------
32648: -- 4219869 Business Flow
32649: -- Populated credit and debit amounts -- Need to generate this within IF
32647: ------------------------------------------------------------------------------------
32648: -- 4219869 Business Flow
32649: -- Populated credit and debit amounts -- Need to generate this within IF
32650: ------------------------------------------------------------------------------------
32651: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
32652:
32653: ----------------------------------------------------------------------------------
32654: -- 4219869 Business Flow
32655: -- Update journal entry status -- Need to generate this within IF
32679: -- To allow MPA report to determine if it should generate report process
32680: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
32681: ------------------------------------------------------------------------------------------
32682:
32683: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
32684: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
32685:
32686: --
32687: -- Update the line information that should be overwritten
32680: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
32681: ------------------------------------------------------------------------------------------
32682:
32683: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
32684: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
32685:
32686: --
32687: -- Update the line information that should be overwritten
32688: --
32685:
32686: --
32687: -- Update the line information that should be overwritten
32688: --
32689: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
32690: p_header_num => 1);
32691: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
32692:
32693: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
32687: -- Update the line information that should be overwritten
32688: --
32689: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
32690: p_header_num => 1);
32691: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
32692:
32693: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
32694:
32695: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
32689: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
32690: p_header_num => 1);
32691: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
32692:
32693: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
32694:
32695: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
32696: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
32697: END IF;
32692:
32693: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
32694:
32695: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
32696: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
32697: END IF;
32698:
32699: --
32700: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
32699: --
32700: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
32701: --
32702: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
32703: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
32704: ELSE
32705: ---------------------------------------------------------------------------------------------------
32706: -- 4262811a Switch Sign
32707: ---------------------------------------------------------------------------------------------------
32704: ELSE
32705: ---------------------------------------------------------------------------------------------------
32706: -- 4262811a Switch Sign
32707: ---------------------------------------------------------------------------------------------------
32708: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
32709: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32710: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32711: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32712: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32705: ---------------------------------------------------------------------------------------------------
32706: -- 4262811a Switch Sign
32707: ---------------------------------------------------------------------------------------------------
32708: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
32709: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32710: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32711: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32712: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32713: -- 5132302
32706: -- 4262811a Switch Sign
32707: ---------------------------------------------------------------------------------------------------
32708: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
32709: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32710: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32711: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32712: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32713: -- 5132302
32714: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
32707: ---------------------------------------------------------------------------------------------------
32708: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
32709: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32710: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32711: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32712: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32713: -- 5132302
32714: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
32715: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32708: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
32709: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32710: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32711: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32712: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32713: -- 5132302
32714: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
32715: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32716:
32710: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32711: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32712: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32713: -- 5132302
32714: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
32715: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32716:
32717: END IF;
32718:
32711: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32712: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32713: -- 5132302
32714: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
32715: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32716:
32717: END IF;
32718:
32719: -- 4955764
32716:
32717: END IF;
32718:
32719: -- 4955764
32720: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
32721: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
32722:
32723:
32724: XLA_AE_LINES_PKG.ValidateCurrentLine;
32720: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
32721: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
32722:
32723:
32724: XLA_AE_LINES_PKG.ValidateCurrentLine;
32725: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
32726:
32727: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
32728: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
32721: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
32722:
32723:
32724: XLA_AE_LINES_PKG.ValidateCurrentLine;
32725: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
32726:
32727: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
32728: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
32729: ,p_balance_type_code => l_balance_type_code);
32901: --
32902: -- bulk performance
32903: --
32904: l_balance_type_code VARCHAR2(1);
32905: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
32906: l_log_module VARCHAR2(240);
32907:
32908: --
32909: -- Upgrade strategy
32984: ') = 'S'
32985: THEN
32986:
32987: --
32988: XLA_AE_LINES_PKG.SetNewLine;
32989:
32990: p_balance_type_code := l_balance_type_code;
32991: -- set the flag so later we will know whether the gain loss line needs to be created
32992:
32996:
32997: --
32998: -- bulk performance
32999: --
33000: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
33001: p_header_num => 0); -- 4262811
33002: --
33003: -- set accounting line options
33004: --
33001: p_header_num => 0); -- 4262811
33002: --
33003: -- set accounting line options
33004: --
33005: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
33006: p_natural_side_code => 'D'
33007: , p_gain_or_loss_flag => 'N'
33008: , p_gl_transfer_mode_code => 'S'
33009: , p_acct_entry_type_code => 'E'
33015: --
33016: --
33017: -- set accounting line type info
33018: --
33019: xla_ae_lines_pkg.SetAcctLineType
33020: (p_component_type => l_component_type
33021: ,p_event_type_code => l_event_type_code
33022: ,p_line_definition_owner_code => l_line_definition_owner_code
33023: ,p_line_definition_code => l_line_definition_code
33029: ,p_event_class_code => l_event_class_code);
33030: --
33031: -- set accounting class
33032: --
33033: xla_ae_lines_pkg.SetAcctClass(
33034: p_accounting_class_code => 'PO_PA_BURDENED'
33035: , p_ae_header_id => l_ae_header_id
33036: );
33037:
33037:
33038: --
33039: -- set rounding class
33040: --
33041: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
33042: 'PO_PA_BURDENED';
33043:
33044: --
33045: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
33041: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
33042: 'PO_PA_BURDENED';
33043:
33044: --
33045: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
33046: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
33047: --
33048: -- bulk performance
33049: --
33042: 'PO_PA_BURDENED';
33043:
33044: --
33045: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
33046: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
33047: --
33048: -- bulk performance
33049: --
33050: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
33046: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
33047: --
33048: -- bulk performance
33049: --
33050: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
33051:
33052: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
33053: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
33054:
33048: -- bulk performance
33049: --
33050: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
33051:
33052: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
33053: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
33054:
33055: -- 4955764
33056: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
33052: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
33053: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
33054:
33055: -- 4955764
33056: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
33057: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
33058:
33059: -- 4458381 Public Sector Enh
33060: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
33056: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
33057: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
33058:
33059: -- 4458381 Public Sector Enh
33060: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
33061: --
33062: -- set accounting attributes for the line type
33063: --
33064: l_entered_amt_idx := 27;
33132: l_rec_acct_attrs.array_num_value(33) := p_source_39;
33133: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
33134: l_rec_acct_attrs.array_num_value(34) := p_source_40;
33135:
33136: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
33137: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
33138:
33139: ---------------------------------------------------------------------------------------------------------------
33140: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
33133: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
33134: l_rec_acct_attrs.array_num_value(34) := p_source_40;
33135:
33136: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
33137: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
33138:
33139: ---------------------------------------------------------------------------------------------------------------
33140: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
33141: ---------------------------------------------------------------------------------------------------------------
33136: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
33137: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
33138:
33139: ---------------------------------------------------------------------------------------------------------------
33140: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
33141: ---------------------------------------------------------------------------------------------------------------
33142: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
33143:
33144: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
33138:
33139: ---------------------------------------------------------------------------------------------------------------
33140: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
33141: ---------------------------------------------------------------------------------------------------------------
33142: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
33143:
33144: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
33145: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
33146:
33140: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
33141: ---------------------------------------------------------------------------------------------------------------
33142: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
33143:
33144: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
33145: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
33146:
33147: IF xla_accounting_cache_pkg.GetValueChar
33148: (p_source_code => 'LEDGER_CATEGORY_CODE'
33141: ---------------------------------------------------------------------------------------------------------------
33142: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
33143:
33144: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
33145: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
33146:
33147: IF xla_accounting_cache_pkg.GetValueChar
33148: (p_source_code => 'LEDGER_CATEGORY_CODE'
33149: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
33152: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
33153: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
33154: )
33155: THEN
33156: xla_ae_lines_pkg.BflowUpgEntry
33157: (p_business_method_code => l_bflow_method_code
33158: ,p_business_class_code => l_bflow_class_code
33159: ,p_balance_type => l_balance_type_code);
33160: ELSE
33169: --
33170: -- call description
33171: --
33172:
33173: xla_ae_lines_pkg.SetLineDescription(
33174: p_ae_header_id => l_ae_header_id
33175: ,p_description => Description_2 (
33176: p_application_id => p_application_id
33177: , p_ae_header_id => l_ae_header_id
33205: , x_value_type_code => l_adr_value_type_code
33206: , p_side => 'NA'
33207: );
33208:
33209: xla_ae_lines_pkg.set_ccid(
33210: p_code_combination_id => l_ccid
33211: , p_value_type_code => l_adr_value_type_code
33212: , p_transaction_coa_id => l_adr_transaction_coa_id
33213: , p_accounting_coa_id => l_adr_accounting_coa_id
33241: xla_accounting_err_pkg.build_message
33242: (p_appli_s_name => 'XLA'
33243: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
33244: ,p_token_1 => 'LINE_NUMBER'
33245: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
33246: ,p_token_2 => 'LINE_TYPE_NAME'
33247: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
33248: l_component_type
33249: ,l_component_code
33277: --
33278: --
33279: ------------------------------------------------------------------------------------------------
33280: -- 4219869 Business Flow
33281: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
33282: -- Prior Entry. Currently, the following code is always generated.
33283: ------------------------------------------------------------------------------------------------
33284: XLA_AE_LINES_PKG.ValidateCurrentLine;
33285:
33280: -- 4219869 Business Flow
33281: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
33282: -- Prior Entry. Currently, the following code is always generated.
33283: ------------------------------------------------------------------------------------------------
33284: XLA_AE_LINES_PKG.ValidateCurrentLine;
33285:
33286: ------------------------------------------------------------------------------------
33287: -- 4219869 Business Flow
33288: -- Populated credit and debit amounts -- Need to generate this within IF
33286: ------------------------------------------------------------------------------------
33287: -- 4219869 Business Flow
33288: -- Populated credit and debit amounts -- Need to generate this within IF
33289: ------------------------------------------------------------------------------------
33290: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
33291:
33292: ----------------------------------------------------------------------------------
33293: -- 4219869 Business Flow
33294: -- Update journal entry status -- Need to generate this within IF
33318: -- To allow MPA report to determine if it should generate report process
33319: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
33320: ------------------------------------------------------------------------------------------
33321:
33322: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
33323: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
33324:
33325: --
33326: -- Update the line information that should be overwritten
33319: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
33320: ------------------------------------------------------------------------------------------
33321:
33322: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
33323: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
33324:
33325: --
33326: -- Update the line information that should be overwritten
33327: --
33324:
33325: --
33326: -- Update the line information that should be overwritten
33327: --
33328: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
33329: p_header_num => 1);
33330: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
33331:
33332: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
33326: -- Update the line information that should be overwritten
33327: --
33328: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
33329: p_header_num => 1);
33330: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
33331:
33332: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
33333:
33334: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
33328: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
33329: p_header_num => 1);
33330: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
33331:
33332: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
33333:
33334: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
33335: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
33336: END IF;
33331:
33332: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
33333:
33334: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
33335: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
33336: END IF;
33337:
33338: --
33339: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
33338: --
33339: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
33340: --
33341: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
33342: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
33343: ELSE
33344: ---------------------------------------------------------------------------------------------------
33345: -- 4262811a Switch Sign
33346: ---------------------------------------------------------------------------------------------------
33343: ELSE
33344: ---------------------------------------------------------------------------------------------------
33345: -- 4262811a Switch Sign
33346: ---------------------------------------------------------------------------------------------------
33347: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
33348: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33349: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33350: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33351: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33344: ---------------------------------------------------------------------------------------------------
33345: -- 4262811a Switch Sign
33346: ---------------------------------------------------------------------------------------------------
33347: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
33348: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33349: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33350: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33351: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33352: -- 5132302
33345: -- 4262811a Switch Sign
33346: ---------------------------------------------------------------------------------------------------
33347: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
33348: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33349: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33350: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33351: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33352: -- 5132302
33353: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
33346: ---------------------------------------------------------------------------------------------------
33347: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
33348: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33349: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33350: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33351: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33352: -- 5132302
33353: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
33354: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33347: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
33348: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33349: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33350: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33351: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33352: -- 5132302
33353: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
33354: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33355:
33349: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33350: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33351: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33352: -- 5132302
33353: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
33354: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33355:
33356: END IF;
33357:
33350: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33351: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33352: -- 5132302
33353: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
33354: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33355:
33356: END IF;
33357:
33358: -- 4955764
33355:
33356: END IF;
33357:
33358: -- 4955764
33359: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
33360: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
33361:
33362:
33363: XLA_AE_LINES_PKG.ValidateCurrentLine;
33359: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
33360: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
33361:
33362:
33363: XLA_AE_LINES_PKG.ValidateCurrentLine;
33364: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
33365:
33366: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
33367: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
33360: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
33361:
33362:
33363: XLA_AE_LINES_PKG.ValidateCurrentLine;
33364: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
33365:
33366: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
33367: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
33368: ,p_balance_type_code => l_balance_type_code);
33542: --
33543: -- bulk performance
33544: --
33545: l_balance_type_code VARCHAR2(1);
33546: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
33547: l_log_module VARCHAR2(240);
33548:
33549: --
33550: -- Upgrade strategy
33625: ') = 'S'
33626: THEN
33627:
33628: --
33629: XLA_AE_LINES_PKG.SetNewLine;
33630:
33631: p_balance_type_code := l_balance_type_code;
33632: -- set the flag so later we will know whether the gain loss line needs to be created
33633:
33637:
33638: --
33639: -- bulk performance
33640: --
33641: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
33642: p_header_num => 0); -- 4262811
33643: --
33644: -- set accounting line options
33645: --
33642: p_header_num => 0); -- 4262811
33643: --
33644: -- set accounting line options
33645: --
33646: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
33647: p_natural_side_code => 'D'
33648: , p_gain_or_loss_flag => 'N'
33649: , p_gl_transfer_mode_code => 'S'
33650: , p_acct_entry_type_code => 'E'
33656: --
33657: --
33658: -- set accounting line type info
33659: --
33660: xla_ae_lines_pkg.SetAcctLineType
33661: (p_component_type => l_component_type
33662: ,p_event_type_code => l_event_type_code
33663: ,p_line_definition_owner_code => l_line_definition_owner_code
33664: ,p_line_definition_code => l_line_definition_code
33670: ,p_event_class_code => l_event_class_code);
33671: --
33672: -- set accounting class
33673: --
33674: xla_ae_lines_pkg.SetAcctClass(
33675: p_accounting_class_code => 'PO_PA_BURDENED'
33676: , p_ae_header_id => l_ae_header_id
33677: );
33678:
33678:
33679: --
33680: -- set rounding class
33681: --
33682: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
33683: 'PO_PA_BURDENED';
33684:
33685: --
33686: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
33682: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
33683: 'PO_PA_BURDENED';
33684:
33685: --
33686: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
33687: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
33688: --
33689: -- bulk performance
33690: --
33683: 'PO_PA_BURDENED';
33684:
33685: --
33686: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
33687: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
33688: --
33689: -- bulk performance
33690: --
33691: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
33687: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
33688: --
33689: -- bulk performance
33690: --
33691: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
33692:
33693: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
33694: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
33695:
33689: -- bulk performance
33690: --
33691: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
33692:
33693: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
33694: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
33695:
33696: -- 4955764
33697: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
33693: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
33694: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
33695:
33696: -- 4955764
33697: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
33698: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
33699:
33700: -- 4458381 Public Sector Enh
33701: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
33697: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
33698: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
33699:
33700: -- 4458381 Public Sector Enh
33701: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
33702: --
33703: -- set accounting attributes for the line type
33704: --
33705: l_entered_amt_idx := 28;
33775: l_rec_acct_attrs.array_num_value(34) := p_source_39;
33776: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
33777: l_rec_acct_attrs.array_num_value(35) := p_source_40;
33778:
33779: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
33780: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
33781:
33782: ---------------------------------------------------------------------------------------------------------------
33783: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
33776: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
33777: l_rec_acct_attrs.array_num_value(35) := p_source_40;
33778:
33779: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
33780: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
33781:
33782: ---------------------------------------------------------------------------------------------------------------
33783: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
33784: ---------------------------------------------------------------------------------------------------------------
33779: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
33780: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
33781:
33782: ---------------------------------------------------------------------------------------------------------------
33783: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
33784: ---------------------------------------------------------------------------------------------------------------
33785: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
33786:
33787: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
33781:
33782: ---------------------------------------------------------------------------------------------------------------
33783: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
33784: ---------------------------------------------------------------------------------------------------------------
33785: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
33786:
33787: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
33788: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
33789:
33783: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
33784: ---------------------------------------------------------------------------------------------------------------
33785: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
33786:
33787: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
33788: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
33789:
33790: IF xla_accounting_cache_pkg.GetValueChar
33791: (p_source_code => 'LEDGER_CATEGORY_CODE'
33784: ---------------------------------------------------------------------------------------------------------------
33785: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
33786:
33787: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
33788: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
33789:
33790: IF xla_accounting_cache_pkg.GetValueChar
33791: (p_source_code => 'LEDGER_CATEGORY_CODE'
33792: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
33795: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
33796: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
33797: )
33798: THEN
33799: xla_ae_lines_pkg.BflowUpgEntry
33800: (p_business_method_code => l_bflow_method_code
33801: ,p_business_class_code => l_bflow_class_code
33802: ,p_balance_type => l_balance_type_code);
33803: ELSE
33812: --
33813: -- call description
33814: --
33815:
33816: xla_ae_lines_pkg.SetLineDescription(
33817: p_ae_header_id => l_ae_header_id
33818: ,p_description => Description_2 (
33819: p_application_id => p_application_id
33820: , p_ae_header_id => l_ae_header_id
33848: , x_value_type_code => l_adr_value_type_code
33849: , p_side => 'NA'
33850: );
33851:
33852: xla_ae_lines_pkg.set_ccid(
33853: p_code_combination_id => l_ccid
33854: , p_value_type_code => l_adr_value_type_code
33855: , p_transaction_coa_id => l_adr_transaction_coa_id
33856: , p_accounting_coa_id => l_adr_accounting_coa_id
33884: xla_accounting_err_pkg.build_message
33885: (p_appli_s_name => 'XLA'
33886: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
33887: ,p_token_1 => 'LINE_NUMBER'
33888: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
33889: ,p_token_2 => 'LINE_TYPE_NAME'
33890: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
33891: l_component_type
33892: ,l_component_code
33920: --
33921: --
33922: ------------------------------------------------------------------------------------------------
33923: -- 4219869 Business Flow
33924: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
33925: -- Prior Entry. Currently, the following code is always generated.
33926: ------------------------------------------------------------------------------------------------
33927: XLA_AE_LINES_PKG.ValidateCurrentLine;
33928:
33923: -- 4219869 Business Flow
33924: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
33925: -- Prior Entry. Currently, the following code is always generated.
33926: ------------------------------------------------------------------------------------------------
33927: XLA_AE_LINES_PKG.ValidateCurrentLine;
33928:
33929: ------------------------------------------------------------------------------------
33930: -- 4219869 Business Flow
33931: -- Populated credit and debit amounts -- Need to generate this within IF
33929: ------------------------------------------------------------------------------------
33930: -- 4219869 Business Flow
33931: -- Populated credit and debit amounts -- Need to generate this within IF
33932: ------------------------------------------------------------------------------------
33933: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
33934:
33935: ----------------------------------------------------------------------------------
33936: -- 4219869 Business Flow
33937: -- Update journal entry status -- Need to generate this within IF
33961: -- To allow MPA report to determine if it should generate report process
33962: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
33963: ------------------------------------------------------------------------------------------
33964:
33965: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
33966: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
33967:
33968: --
33969: -- Update the line information that should be overwritten
33962: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
33963: ------------------------------------------------------------------------------------------
33964:
33965: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
33966: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
33967:
33968: --
33969: -- Update the line information that should be overwritten
33970: --
33967:
33968: --
33969: -- Update the line information that should be overwritten
33970: --
33971: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
33972: p_header_num => 1);
33973: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
33974:
33975: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
33969: -- Update the line information that should be overwritten
33970: --
33971: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
33972: p_header_num => 1);
33973: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
33974:
33975: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
33976:
33977: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
33971: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
33972: p_header_num => 1);
33973: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
33974:
33975: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
33976:
33977: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
33978: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
33979: END IF;
33974:
33975: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
33976:
33977: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
33978: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
33979: END IF;
33980:
33981: --
33982: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
33981: --
33982: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
33983: --
33984: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
33985: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
33986: ELSE
33987: ---------------------------------------------------------------------------------------------------
33988: -- 4262811a Switch Sign
33989: ---------------------------------------------------------------------------------------------------
33986: ELSE
33987: ---------------------------------------------------------------------------------------------------
33988: -- 4262811a Switch Sign
33989: ---------------------------------------------------------------------------------------------------
33990: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
33991: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33992: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33993: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33994: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33987: ---------------------------------------------------------------------------------------------------
33988: -- 4262811a Switch Sign
33989: ---------------------------------------------------------------------------------------------------
33990: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
33991: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33992: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33993: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33994: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33995: -- 5132302
33988: -- 4262811a Switch Sign
33989: ---------------------------------------------------------------------------------------------------
33990: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
33991: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33992: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33993: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33994: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33995: -- 5132302
33996: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
33989: ---------------------------------------------------------------------------------------------------
33990: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
33991: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33992: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33993: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33994: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33995: -- 5132302
33996: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
33997: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33990: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
33991: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33992: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33993: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33994: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33995: -- 5132302
33996: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
33997: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33998:
33992: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33993: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33994: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33995: -- 5132302
33996: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
33997: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33998:
33999: END IF;
34000:
33993: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33994: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33995: -- 5132302
33996: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
33997: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33998:
33999: END IF;
34000:
34001: -- 4955764
33998:
33999: END IF;
34000:
34001: -- 4955764
34002: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
34003: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
34004:
34005:
34006: XLA_AE_LINES_PKG.ValidateCurrentLine;
34002: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
34003: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
34004:
34005:
34006: XLA_AE_LINES_PKG.ValidateCurrentLine;
34007: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
34008:
34009: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
34010: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
34003: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
34004:
34005:
34006: XLA_AE_LINES_PKG.ValidateCurrentLine;
34007: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
34008:
34009: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
34010: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
34011: ,p_balance_type_code => l_balance_type_code);
34185: --
34186: -- bulk performance
34187: --
34188: l_balance_type_code VARCHAR2(1);
34189: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
34190: l_log_module VARCHAR2(240);
34191:
34192: --
34193: -- Upgrade strategy
34275: ') = 'S'
34276: THEN
34277:
34278: --
34279: XLA_AE_LINES_PKG.SetNewLine;
34280:
34281: p_balance_type_code := l_balance_type_code;
34282: -- set the flag so later we will know whether the gain loss line needs to be created
34283:
34287:
34288: --
34289: -- bulk performance
34290: --
34291: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
34292: p_header_num => 0); -- 4262811
34293: --
34294: -- set accounting line options
34295: --
34292: p_header_num => 0); -- 4262811
34293: --
34294: -- set accounting line options
34295: --
34296: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
34297: p_natural_side_code => 'D'
34298: , p_gain_or_loss_flag => 'N'
34299: , p_gl_transfer_mode_code => 'S'
34300: , p_acct_entry_type_code => 'E'
34306: --
34307: --
34308: -- set accounting line type info
34309: --
34310: xla_ae_lines_pkg.SetAcctLineType
34311: (p_component_type => l_component_type
34312: ,p_event_type_code => l_event_type_code
34313: ,p_line_definition_owner_code => l_line_definition_owner_code
34314: ,p_line_definition_code => l_line_definition_code
34320: ,p_event_class_code => l_event_class_code);
34321: --
34322: -- set accounting class
34323: --
34324: xla_ae_lines_pkg.SetAcctClass(
34325: p_accounting_class_code => 'REQ_PA_BURDENED'
34326: , p_ae_header_id => l_ae_header_id
34327: );
34328:
34328:
34329: --
34330: -- set rounding class
34331: --
34332: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
34333: 'REQ_PA_BURDENED';
34334:
34335: --
34336: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
34332: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
34333: 'REQ_PA_BURDENED';
34334:
34335: --
34336: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
34337: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
34338: --
34339: -- bulk performance
34340: --
34333: 'REQ_PA_BURDENED';
34334:
34335: --
34336: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
34337: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
34338: --
34339: -- bulk performance
34340: --
34341: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
34337: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
34338: --
34339: -- bulk performance
34340: --
34341: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
34342:
34343: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
34344: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
34345:
34339: -- bulk performance
34340: --
34341: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
34342:
34343: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
34344: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
34345:
34346: -- 4955764
34347: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
34343: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
34344: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
34345:
34346: -- 4955764
34347: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
34348: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
34349:
34350: -- 4458381 Public Sector Enh
34351: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
34347: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
34348: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
34349:
34350: -- 4458381 Public Sector Enh
34351: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
34352: --
34353: -- set accounting attributes for the line type
34354: --
34355: l_entered_amt_idx := 28;
34425: l_rec_acct_attrs.array_num_value(34) := p_source_39;
34426: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
34427: l_rec_acct_attrs.array_num_value(35) := p_source_40;
34428:
34429: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
34430: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
34431:
34432: ---------------------------------------------------------------------------------------------------------------
34433: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
34426: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
34427: l_rec_acct_attrs.array_num_value(35) := p_source_40;
34428:
34429: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
34430: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
34431:
34432: ---------------------------------------------------------------------------------------------------------------
34433: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
34434: ---------------------------------------------------------------------------------------------------------------
34429: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
34430: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
34431:
34432: ---------------------------------------------------------------------------------------------------------------
34433: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
34434: ---------------------------------------------------------------------------------------------------------------
34435: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
34436:
34437: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
34431:
34432: ---------------------------------------------------------------------------------------------------------------
34433: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
34434: ---------------------------------------------------------------------------------------------------------------
34435: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
34436:
34437: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
34438: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
34439:
34433: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
34434: ---------------------------------------------------------------------------------------------------------------
34435: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
34436:
34437: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
34438: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
34439:
34440: IF xla_accounting_cache_pkg.GetValueChar
34441: (p_source_code => 'LEDGER_CATEGORY_CODE'
34434: ---------------------------------------------------------------------------------------------------------------
34435: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
34436:
34437: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
34438: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
34439:
34440: IF xla_accounting_cache_pkg.GetValueChar
34441: (p_source_code => 'LEDGER_CATEGORY_CODE'
34442: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
34445: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
34446: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
34447: )
34448: THEN
34449: xla_ae_lines_pkg.BflowUpgEntry
34450: (p_business_method_code => l_bflow_method_code
34451: ,p_business_class_code => l_bflow_class_code
34452: ,p_balance_type => l_balance_type_code);
34453: ELSE
34462: --
34463: -- call description
34464: --
34465:
34466: xla_ae_lines_pkg.SetLineDescription(
34467: p_ae_header_id => l_ae_header_id
34468: ,p_description => Description_2 (
34469: p_application_id => p_application_id
34470: , p_ae_header_id => l_ae_header_id
34498: , x_value_type_code => l_adr_value_type_code
34499: , p_side => 'NA'
34500: );
34501:
34502: xla_ae_lines_pkg.set_ccid(
34503: p_code_combination_id => l_ccid
34504: , p_value_type_code => l_adr_value_type_code
34505: , p_transaction_coa_id => l_adr_transaction_coa_id
34506: , p_accounting_coa_id => l_adr_accounting_coa_id
34534: xla_accounting_err_pkg.build_message
34535: (p_appli_s_name => 'XLA'
34536: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
34537: ,p_token_1 => 'LINE_NUMBER'
34538: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
34539: ,p_token_2 => 'LINE_TYPE_NAME'
34540: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
34541: l_component_type
34542: ,l_component_code
34570: --
34571: --
34572: ------------------------------------------------------------------------------------------------
34573: -- 4219869 Business Flow
34574: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
34575: -- Prior Entry. Currently, the following code is always generated.
34576: ------------------------------------------------------------------------------------------------
34577: XLA_AE_LINES_PKG.ValidateCurrentLine;
34578:
34573: -- 4219869 Business Flow
34574: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
34575: -- Prior Entry. Currently, the following code is always generated.
34576: ------------------------------------------------------------------------------------------------
34577: XLA_AE_LINES_PKG.ValidateCurrentLine;
34578:
34579: ------------------------------------------------------------------------------------
34580: -- 4219869 Business Flow
34581: -- Populated credit and debit amounts -- Need to generate this within IF
34579: ------------------------------------------------------------------------------------
34580: -- 4219869 Business Flow
34581: -- Populated credit and debit amounts -- Need to generate this within IF
34582: ------------------------------------------------------------------------------------
34583: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
34584:
34585: ----------------------------------------------------------------------------------
34586: -- 4219869 Business Flow
34587: -- Update journal entry status -- Need to generate this within IF
34611: -- To allow MPA report to determine if it should generate report process
34612: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
34613: ------------------------------------------------------------------------------------------
34614:
34615: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
34616: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
34617:
34618: --
34619: -- Update the line information that should be overwritten
34612: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
34613: ------------------------------------------------------------------------------------------
34614:
34615: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
34616: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
34617:
34618: --
34619: -- Update the line information that should be overwritten
34620: --
34617:
34618: --
34619: -- Update the line information that should be overwritten
34620: --
34621: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
34622: p_header_num => 1);
34623: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
34624:
34625: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
34619: -- Update the line information that should be overwritten
34620: --
34621: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
34622: p_header_num => 1);
34623: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
34624:
34625: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
34626:
34627: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
34621: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
34622: p_header_num => 1);
34623: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
34624:
34625: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
34626:
34627: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
34628: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
34629: END IF;
34624:
34625: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
34626:
34627: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
34628: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
34629: END IF;
34630:
34631: --
34632: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
34631: --
34632: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
34633: --
34634: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
34635: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
34636: ELSE
34637: ---------------------------------------------------------------------------------------------------
34638: -- 4262811a Switch Sign
34639: ---------------------------------------------------------------------------------------------------
34636: ELSE
34637: ---------------------------------------------------------------------------------------------------
34638: -- 4262811a Switch Sign
34639: ---------------------------------------------------------------------------------------------------
34640: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
34641: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34642: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34643: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34644: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34637: ---------------------------------------------------------------------------------------------------
34638: -- 4262811a Switch Sign
34639: ---------------------------------------------------------------------------------------------------
34640: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
34641: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34642: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34643: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34644: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34645: -- 5132302
34638: -- 4262811a Switch Sign
34639: ---------------------------------------------------------------------------------------------------
34640: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
34641: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34642: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34643: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34644: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34645: -- 5132302
34646: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
34639: ---------------------------------------------------------------------------------------------------
34640: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
34641: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34642: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34643: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34644: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34645: -- 5132302
34646: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
34647: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34640: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
34641: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34642: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34643: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34644: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34645: -- 5132302
34646: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
34647: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34648:
34642: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34643: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34644: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34645: -- 5132302
34646: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
34647: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34648:
34649: END IF;
34650:
34643: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34644: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34645: -- 5132302
34646: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
34647: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34648:
34649: END IF;
34650:
34651: -- 4955764
34648:
34649: END IF;
34650:
34651: -- 4955764
34652: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
34653: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
34654:
34655:
34656: XLA_AE_LINES_PKG.ValidateCurrentLine;
34652: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
34653: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
34654:
34655:
34656: XLA_AE_LINES_PKG.ValidateCurrentLine;
34657: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
34658:
34659: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
34660: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
34653: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
34654:
34655:
34656: XLA_AE_LINES_PKG.ValidateCurrentLine;
34657: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
34658:
34659: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
34660: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
34661: ,p_balance_type_code => l_balance_type_code);
34833: --
34834: -- bulk performance
34835: --
34836: l_balance_type_code VARCHAR2(1);
34837: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
34838: l_log_module VARCHAR2(240);
34839:
34840: --
34841: -- Upgrade strategy
34914: ') = 'D'
34915: THEN
34916:
34917: --
34918: XLA_AE_LINES_PKG.SetNewLine;
34919:
34920: p_balance_type_code := l_balance_type_code;
34921: -- set the flag so later we will know whether the gain loss line needs to be created
34922:
34926:
34927: --
34928: -- bulk performance
34929: --
34930: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
34931: p_header_num => 0); -- 4262811
34932: --
34933: -- set accounting line options
34934: --
34931: p_header_num => 0); -- 4262811
34932: --
34933: -- set accounting line options
34934: --
34935: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
34936: p_natural_side_code => 'D'
34937: , p_gain_or_loss_flag => 'N'
34938: , p_gl_transfer_mode_code => 'S'
34939: , p_acct_entry_type_code => 'E'
34945: --
34946: --
34947: -- set accounting line type info
34948: --
34949: xla_ae_lines_pkg.SetAcctLineType
34950: (p_component_type => l_component_type
34951: ,p_event_type_code => l_event_type_code
34952: ,p_line_definition_owner_code => l_line_definition_owner_code
34953: ,p_line_definition_code => l_line_definition_code
34959: ,p_event_class_code => l_event_class_code);
34960: --
34961: -- set accounting class
34962: --
34963: xla_ae_lines_pkg.SetAcctClass(
34964: p_accounting_class_code => 'PO_PA_BURDEN'
34965: , p_ae_header_id => l_ae_header_id
34966: );
34967:
34967:
34968: --
34969: -- set rounding class
34970: --
34971: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
34972: 'PO_PA_BURDEN';
34973:
34974: --
34975: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
34971: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
34972: 'PO_PA_BURDEN';
34973:
34974: --
34975: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
34976: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
34977: --
34978: -- bulk performance
34979: --
34972: 'PO_PA_BURDEN';
34973:
34974: --
34975: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
34976: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
34977: --
34978: -- bulk performance
34979: --
34980: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
34976: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
34977: --
34978: -- bulk performance
34979: --
34980: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
34981:
34982: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
34983: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
34984:
34978: -- bulk performance
34979: --
34980: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
34981:
34982: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
34983: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
34984:
34985: -- 4955764
34986: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
34982: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
34983: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
34984:
34985: -- 4955764
34986: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
34987: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
34988:
34989: -- 4458381 Public Sector Enh
34990: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
34986: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
34987: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
34988:
34989: -- 4458381 Public Sector Enh
34990: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
34991: --
34992: -- set accounting attributes for the line type
34993: --
34994: l_entered_amt_idx := 27;
35062: l_rec_acct_attrs.array_num_value(33) := p_source_39;
35063: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
35064: l_rec_acct_attrs.array_num_value(34) := p_source_40;
35065:
35066: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
35067: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
35068:
35069: ---------------------------------------------------------------------------------------------------------------
35070: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
35063: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
35064: l_rec_acct_attrs.array_num_value(34) := p_source_40;
35065:
35066: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
35067: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
35068:
35069: ---------------------------------------------------------------------------------------------------------------
35070: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
35071: ---------------------------------------------------------------------------------------------------------------
35066: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
35067: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
35068:
35069: ---------------------------------------------------------------------------------------------------------------
35070: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
35071: ---------------------------------------------------------------------------------------------------------------
35072: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
35073:
35074: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35068:
35069: ---------------------------------------------------------------------------------------------------------------
35070: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
35071: ---------------------------------------------------------------------------------------------------------------
35072: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
35073:
35074: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35075: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35076:
35070: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
35071: ---------------------------------------------------------------------------------------------------------------
35072: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
35073:
35074: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35075: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35076:
35077: IF xla_accounting_cache_pkg.GetValueChar
35078: (p_source_code => 'LEDGER_CATEGORY_CODE'
35071: ---------------------------------------------------------------------------------------------------------------
35072: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
35073:
35074: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35075: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35076:
35077: IF xla_accounting_cache_pkg.GetValueChar
35078: (p_source_code => 'LEDGER_CATEGORY_CODE'
35079: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
35082: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
35083: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
35084: )
35085: THEN
35086: xla_ae_lines_pkg.BflowUpgEntry
35087: (p_business_method_code => l_bflow_method_code
35088: ,p_business_class_code => l_bflow_class_code
35089: ,p_balance_type => l_balance_type_code);
35090: ELSE
35099: --
35100: -- call description
35101: --
35102:
35103: xla_ae_lines_pkg.SetLineDescription(
35104: p_ae_header_id => l_ae_header_id
35105: ,p_description => Description_2 (
35106: p_application_id => p_application_id
35107: , p_ae_header_id => l_ae_header_id
35135: , x_value_type_code => l_adr_value_type_code
35136: , p_side => 'NA'
35137: );
35138:
35139: xla_ae_lines_pkg.set_ccid(
35140: p_code_combination_id => l_ccid
35141: , p_value_type_code => l_adr_value_type_code
35142: , p_transaction_coa_id => l_adr_transaction_coa_id
35143: , p_accounting_coa_id => l_adr_accounting_coa_id
35171: xla_accounting_err_pkg.build_message
35172: (p_appli_s_name => 'XLA'
35173: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
35174: ,p_token_1 => 'LINE_NUMBER'
35175: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
35176: ,p_token_2 => 'LINE_TYPE_NAME'
35177: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
35178: l_component_type
35179: ,l_component_code
35207: --
35208: --
35209: ------------------------------------------------------------------------------------------------
35210: -- 4219869 Business Flow
35211: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
35212: -- Prior Entry. Currently, the following code is always generated.
35213: ------------------------------------------------------------------------------------------------
35214: XLA_AE_LINES_PKG.ValidateCurrentLine;
35215:
35210: -- 4219869 Business Flow
35211: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
35212: -- Prior Entry. Currently, the following code is always generated.
35213: ------------------------------------------------------------------------------------------------
35214: XLA_AE_LINES_PKG.ValidateCurrentLine;
35215:
35216: ------------------------------------------------------------------------------------
35217: -- 4219869 Business Flow
35218: -- Populated credit and debit amounts -- Need to generate this within IF
35216: ------------------------------------------------------------------------------------
35217: -- 4219869 Business Flow
35218: -- Populated credit and debit amounts -- Need to generate this within IF
35219: ------------------------------------------------------------------------------------
35220: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
35221:
35222: ----------------------------------------------------------------------------------
35223: -- 4219869 Business Flow
35224: -- Update journal entry status -- Need to generate this within IF
35248: -- To allow MPA report to determine if it should generate report process
35249: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
35250: ------------------------------------------------------------------------------------------
35251:
35252: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
35253: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
35254:
35255: --
35256: -- Update the line information that should be overwritten
35249: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
35250: ------------------------------------------------------------------------------------------
35251:
35252: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
35253: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
35254:
35255: --
35256: -- Update the line information that should be overwritten
35257: --
35254:
35255: --
35256: -- Update the line information that should be overwritten
35257: --
35258: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
35259: p_header_num => 1);
35260: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
35261:
35262: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
35256: -- Update the line information that should be overwritten
35257: --
35258: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
35259: p_header_num => 1);
35260: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
35261:
35262: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
35263:
35264: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
35258: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
35259: p_header_num => 1);
35260: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
35261:
35262: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
35263:
35264: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
35265: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
35266: END IF;
35261:
35262: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
35263:
35264: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
35265: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
35266: END IF;
35267:
35268: --
35269: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
35268: --
35269: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
35270: --
35271: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
35272: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
35273: ELSE
35274: ---------------------------------------------------------------------------------------------------
35275: -- 4262811a Switch Sign
35276: ---------------------------------------------------------------------------------------------------
35273: ELSE
35274: ---------------------------------------------------------------------------------------------------
35275: -- 4262811a Switch Sign
35276: ---------------------------------------------------------------------------------------------------
35277: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
35278: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35279: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35280: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35281: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35274: ---------------------------------------------------------------------------------------------------
35275: -- 4262811a Switch Sign
35276: ---------------------------------------------------------------------------------------------------
35277: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
35278: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35279: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35280: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35281: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35282: -- 5132302
35275: -- 4262811a Switch Sign
35276: ---------------------------------------------------------------------------------------------------
35277: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
35278: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35279: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35280: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35281: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35282: -- 5132302
35283: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
35276: ---------------------------------------------------------------------------------------------------
35277: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
35278: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35279: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35280: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35281: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35282: -- 5132302
35283: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
35284: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35277: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
35278: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35279: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35280: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35281: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35282: -- 5132302
35283: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
35284: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35285:
35279: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35280: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35281: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35282: -- 5132302
35283: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
35284: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35285:
35286: END IF;
35287:
35280: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35281: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35282: -- 5132302
35283: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
35284: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35285:
35286: END IF;
35287:
35288: -- 4955764
35285:
35286: END IF;
35287:
35288: -- 4955764
35289: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
35290: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
35291:
35292:
35293: XLA_AE_LINES_PKG.ValidateCurrentLine;
35289: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
35290: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
35291:
35292:
35293: XLA_AE_LINES_PKG.ValidateCurrentLine;
35294: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
35295:
35296: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
35297: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
35290: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
35291:
35292:
35293: XLA_AE_LINES_PKG.ValidateCurrentLine;
35294: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
35295:
35296: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
35297: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
35298: ,p_balance_type_code => l_balance_type_code);
35472: --
35473: -- bulk performance
35474: --
35475: l_balance_type_code VARCHAR2(1);
35476: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
35477: l_log_module VARCHAR2(240);
35478:
35479: --
35480: -- Upgrade strategy
35553: ') = 'D'
35554: THEN
35555:
35556: --
35557: XLA_AE_LINES_PKG.SetNewLine;
35558:
35559: p_balance_type_code := l_balance_type_code;
35560: -- set the flag so later we will know whether the gain loss line needs to be created
35561:
35565:
35566: --
35567: -- bulk performance
35568: --
35569: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
35570: p_header_num => 0); -- 4262811
35571: --
35572: -- set accounting line options
35573: --
35570: p_header_num => 0); -- 4262811
35571: --
35572: -- set accounting line options
35573: --
35574: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
35575: p_natural_side_code => 'D'
35576: , p_gain_or_loss_flag => 'N'
35577: , p_gl_transfer_mode_code => 'S'
35578: , p_acct_entry_type_code => 'E'
35584: --
35585: --
35586: -- set accounting line type info
35587: --
35588: xla_ae_lines_pkg.SetAcctLineType
35589: (p_component_type => l_component_type
35590: ,p_event_type_code => l_event_type_code
35591: ,p_line_definition_owner_code => l_line_definition_owner_code
35592: ,p_line_definition_code => l_line_definition_code
35598: ,p_event_class_code => l_event_class_code);
35599: --
35600: -- set accounting class
35601: --
35602: xla_ae_lines_pkg.SetAcctClass(
35603: p_accounting_class_code => 'PO_PA_BURDEN'
35604: , p_ae_header_id => l_ae_header_id
35605: );
35606:
35606:
35607: --
35608: -- set rounding class
35609: --
35610: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
35611: 'PO_PA_BURDEN';
35612:
35613: --
35614: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
35610: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
35611: 'PO_PA_BURDEN';
35612:
35613: --
35614: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
35615: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
35616: --
35617: -- bulk performance
35618: --
35611: 'PO_PA_BURDEN';
35612:
35613: --
35614: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
35615: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
35616: --
35617: -- bulk performance
35618: --
35619: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
35615: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
35616: --
35617: -- bulk performance
35618: --
35619: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
35620:
35621: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
35622: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
35623:
35617: -- bulk performance
35618: --
35619: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
35620:
35621: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
35622: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
35623:
35624: -- 4955764
35625: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
35621: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
35622: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
35623:
35624: -- 4955764
35625: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
35626: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
35627:
35628: -- 4458381 Public Sector Enh
35629: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
35625: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
35626: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
35627:
35628: -- 4458381 Public Sector Enh
35629: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
35630: --
35631: -- set accounting attributes for the line type
35632: --
35633: l_entered_amt_idx := 28;
35703: l_rec_acct_attrs.array_num_value(34) := p_source_39;
35704: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
35705: l_rec_acct_attrs.array_num_value(35) := p_source_40;
35706:
35707: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
35708: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
35709:
35710: ---------------------------------------------------------------------------------------------------------------
35711: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
35704: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
35705: l_rec_acct_attrs.array_num_value(35) := p_source_40;
35706:
35707: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
35708: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
35709:
35710: ---------------------------------------------------------------------------------------------------------------
35711: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
35712: ---------------------------------------------------------------------------------------------------------------
35707: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
35708: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
35709:
35710: ---------------------------------------------------------------------------------------------------------------
35711: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
35712: ---------------------------------------------------------------------------------------------------------------
35713: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
35714:
35715: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35709:
35710: ---------------------------------------------------------------------------------------------------------------
35711: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
35712: ---------------------------------------------------------------------------------------------------------------
35713: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
35714:
35715: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35716: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35717:
35711: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
35712: ---------------------------------------------------------------------------------------------------------------
35713: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
35714:
35715: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35716: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35717:
35718: IF xla_accounting_cache_pkg.GetValueChar
35719: (p_source_code => 'LEDGER_CATEGORY_CODE'
35712: ---------------------------------------------------------------------------------------------------------------
35713: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
35714:
35715: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35716: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35717:
35718: IF xla_accounting_cache_pkg.GetValueChar
35719: (p_source_code => 'LEDGER_CATEGORY_CODE'
35720: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
35723: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
35724: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
35725: )
35726: THEN
35727: xla_ae_lines_pkg.BflowUpgEntry
35728: (p_business_method_code => l_bflow_method_code
35729: ,p_business_class_code => l_bflow_class_code
35730: ,p_balance_type => l_balance_type_code);
35731: ELSE
35740: --
35741: -- call description
35742: --
35743:
35744: xla_ae_lines_pkg.SetLineDescription(
35745: p_ae_header_id => l_ae_header_id
35746: ,p_description => Description_2 (
35747: p_application_id => p_application_id
35748: , p_ae_header_id => l_ae_header_id
35776: , x_value_type_code => l_adr_value_type_code
35777: , p_side => 'NA'
35778: );
35779:
35780: xla_ae_lines_pkg.set_ccid(
35781: p_code_combination_id => l_ccid
35782: , p_value_type_code => l_adr_value_type_code
35783: , p_transaction_coa_id => l_adr_transaction_coa_id
35784: , p_accounting_coa_id => l_adr_accounting_coa_id
35812: xla_accounting_err_pkg.build_message
35813: (p_appli_s_name => 'XLA'
35814: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
35815: ,p_token_1 => 'LINE_NUMBER'
35816: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
35817: ,p_token_2 => 'LINE_TYPE_NAME'
35818: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
35819: l_component_type
35820: ,l_component_code
35848: --
35849: --
35850: ------------------------------------------------------------------------------------------------
35851: -- 4219869 Business Flow
35852: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
35853: -- Prior Entry. Currently, the following code is always generated.
35854: ------------------------------------------------------------------------------------------------
35855: XLA_AE_LINES_PKG.ValidateCurrentLine;
35856:
35851: -- 4219869 Business Flow
35852: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
35853: -- Prior Entry. Currently, the following code is always generated.
35854: ------------------------------------------------------------------------------------------------
35855: XLA_AE_LINES_PKG.ValidateCurrentLine;
35856:
35857: ------------------------------------------------------------------------------------
35858: -- 4219869 Business Flow
35859: -- Populated credit and debit amounts -- Need to generate this within IF
35857: ------------------------------------------------------------------------------------
35858: -- 4219869 Business Flow
35859: -- Populated credit and debit amounts -- Need to generate this within IF
35860: ------------------------------------------------------------------------------------
35861: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
35862:
35863: ----------------------------------------------------------------------------------
35864: -- 4219869 Business Flow
35865: -- Update journal entry status -- Need to generate this within IF
35889: -- To allow MPA report to determine if it should generate report process
35890: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
35891: ------------------------------------------------------------------------------------------
35892:
35893: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
35894: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
35895:
35896: --
35897: -- Update the line information that should be overwritten
35890: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
35891: ------------------------------------------------------------------------------------------
35892:
35893: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
35894: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
35895:
35896: --
35897: -- Update the line information that should be overwritten
35898: --
35895:
35896: --
35897: -- Update the line information that should be overwritten
35898: --
35899: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
35900: p_header_num => 1);
35901: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
35902:
35903: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
35897: -- Update the line information that should be overwritten
35898: --
35899: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
35900: p_header_num => 1);
35901: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
35902:
35903: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
35904:
35905: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
35899: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
35900: p_header_num => 1);
35901: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
35902:
35903: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
35904:
35905: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
35906: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
35907: END IF;
35902:
35903: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
35904:
35905: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
35906: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
35907: END IF;
35908:
35909: --
35910: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
35909: --
35910: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
35911: --
35912: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
35913: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
35914: ELSE
35915: ---------------------------------------------------------------------------------------------------
35916: -- 4262811a Switch Sign
35917: ---------------------------------------------------------------------------------------------------
35914: ELSE
35915: ---------------------------------------------------------------------------------------------------
35916: -- 4262811a Switch Sign
35917: ---------------------------------------------------------------------------------------------------
35918: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
35919: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35920: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35921: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35922: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35915: ---------------------------------------------------------------------------------------------------
35916: -- 4262811a Switch Sign
35917: ---------------------------------------------------------------------------------------------------
35918: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
35919: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35920: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35921: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35922: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35923: -- 5132302
35916: -- 4262811a Switch Sign
35917: ---------------------------------------------------------------------------------------------------
35918: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
35919: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35920: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35921: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35922: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35923: -- 5132302
35924: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
35917: ---------------------------------------------------------------------------------------------------
35918: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
35919: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35920: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35921: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35922: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35923: -- 5132302
35924: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
35925: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35918: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
35919: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35920: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35921: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35922: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35923: -- 5132302
35924: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
35925: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35926:
35920: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35921: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35922: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35923: -- 5132302
35924: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
35925: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35926:
35927: END IF;
35928:
35921: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35922: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35923: -- 5132302
35924: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
35925: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35926:
35927: END IF;
35928:
35929: -- 4955764
35926:
35927: END IF;
35928:
35929: -- 4955764
35930: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
35931: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
35932:
35933:
35934: XLA_AE_LINES_PKG.ValidateCurrentLine;
35930: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
35931: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
35932:
35933:
35934: XLA_AE_LINES_PKG.ValidateCurrentLine;
35935: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
35936:
35937: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
35938: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
35931: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
35932:
35933:
35934: XLA_AE_LINES_PKG.ValidateCurrentLine;
35935: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
35936:
35937: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
35938: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
35939: ,p_balance_type_code => l_balance_type_code);
36113: --
36114: -- bulk performance
36115: --
36116: l_balance_type_code VARCHAR2(1);
36117: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
36118: l_log_module VARCHAR2(240);
36119:
36120: --
36121: -- Upgrade strategy
36201: ') = 'D'
36202: THEN
36203:
36204: --
36205: XLA_AE_LINES_PKG.SetNewLine;
36206:
36207: p_balance_type_code := l_balance_type_code;
36208: -- set the flag so later we will know whether the gain loss line needs to be created
36209:
36213:
36214: --
36215: -- bulk performance
36216: --
36217: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
36218: p_header_num => 0); -- 4262811
36219: --
36220: -- set accounting line options
36221: --
36218: p_header_num => 0); -- 4262811
36219: --
36220: -- set accounting line options
36221: --
36222: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
36223: p_natural_side_code => 'D'
36224: , p_gain_or_loss_flag => 'N'
36225: , p_gl_transfer_mode_code => 'S'
36226: , p_acct_entry_type_code => 'E'
36232: --
36233: --
36234: -- set accounting line type info
36235: --
36236: xla_ae_lines_pkg.SetAcctLineType
36237: (p_component_type => l_component_type
36238: ,p_event_type_code => l_event_type_code
36239: ,p_line_definition_owner_code => l_line_definition_owner_code
36240: ,p_line_definition_code => l_line_definition_code
36246: ,p_event_class_code => l_event_class_code);
36247: --
36248: -- set accounting class
36249: --
36250: xla_ae_lines_pkg.SetAcctClass(
36251: p_accounting_class_code => 'REQ_PA_BURDEN'
36252: , p_ae_header_id => l_ae_header_id
36253: );
36254:
36254:
36255: --
36256: -- set rounding class
36257: --
36258: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
36259: 'REQ_PA_BURDEN';
36260:
36261: --
36262: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
36258: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
36259: 'REQ_PA_BURDEN';
36260:
36261: --
36262: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
36263: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
36264: --
36265: -- bulk performance
36266: --
36259: 'REQ_PA_BURDEN';
36260:
36261: --
36262: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
36263: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
36264: --
36265: -- bulk performance
36266: --
36267: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
36263: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
36264: --
36265: -- bulk performance
36266: --
36267: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
36268:
36269: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
36270: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
36271:
36265: -- bulk performance
36266: --
36267: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
36268:
36269: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
36270: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
36271:
36272: -- 4955764
36273: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
36269: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
36270: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
36271:
36272: -- 4955764
36273: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
36274: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
36275:
36276: -- 4458381 Public Sector Enh
36277: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
36273: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
36274: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
36275:
36276: -- 4458381 Public Sector Enh
36277: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
36278: --
36279: -- set accounting attributes for the line type
36280: --
36281: l_entered_amt_idx := 28;
36351: l_rec_acct_attrs.array_num_value(34) := p_source_39;
36352: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
36353: l_rec_acct_attrs.array_num_value(35) := p_source_40;
36354:
36355: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
36356: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
36357:
36358: ---------------------------------------------------------------------------------------------------------------
36359: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
36352: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
36353: l_rec_acct_attrs.array_num_value(35) := p_source_40;
36354:
36355: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
36356: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
36357:
36358: ---------------------------------------------------------------------------------------------------------------
36359: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
36360: ---------------------------------------------------------------------------------------------------------------
36355: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
36356: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
36357:
36358: ---------------------------------------------------------------------------------------------------------------
36359: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
36360: ---------------------------------------------------------------------------------------------------------------
36361: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
36362:
36363: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
36357:
36358: ---------------------------------------------------------------------------------------------------------------
36359: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
36360: ---------------------------------------------------------------------------------------------------------------
36361: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
36362:
36363: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
36364: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
36365:
36359: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
36360: ---------------------------------------------------------------------------------------------------------------
36361: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
36362:
36363: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
36364: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
36365:
36366: IF xla_accounting_cache_pkg.GetValueChar
36367: (p_source_code => 'LEDGER_CATEGORY_CODE'
36360: ---------------------------------------------------------------------------------------------------------------
36361: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
36362:
36363: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
36364: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
36365:
36366: IF xla_accounting_cache_pkg.GetValueChar
36367: (p_source_code => 'LEDGER_CATEGORY_CODE'
36368: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
36371: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
36372: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
36373: )
36374: THEN
36375: xla_ae_lines_pkg.BflowUpgEntry
36376: (p_business_method_code => l_bflow_method_code
36377: ,p_business_class_code => l_bflow_class_code
36378: ,p_balance_type => l_balance_type_code);
36379: ELSE
36388: --
36389: -- call description
36390: --
36391:
36392: xla_ae_lines_pkg.SetLineDescription(
36393: p_ae_header_id => l_ae_header_id
36394: ,p_description => Description_2 (
36395: p_application_id => p_application_id
36396: , p_ae_header_id => l_ae_header_id
36424: , x_value_type_code => l_adr_value_type_code
36425: , p_side => 'NA'
36426: );
36427:
36428: xla_ae_lines_pkg.set_ccid(
36429: p_code_combination_id => l_ccid
36430: , p_value_type_code => l_adr_value_type_code
36431: , p_transaction_coa_id => l_adr_transaction_coa_id
36432: , p_accounting_coa_id => l_adr_accounting_coa_id
36460: xla_accounting_err_pkg.build_message
36461: (p_appli_s_name => 'XLA'
36462: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
36463: ,p_token_1 => 'LINE_NUMBER'
36464: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
36465: ,p_token_2 => 'LINE_TYPE_NAME'
36466: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
36467: l_component_type
36468: ,l_component_code
36496: --
36497: --
36498: ------------------------------------------------------------------------------------------------
36499: -- 4219869 Business Flow
36500: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
36501: -- Prior Entry. Currently, the following code is always generated.
36502: ------------------------------------------------------------------------------------------------
36503: XLA_AE_LINES_PKG.ValidateCurrentLine;
36504:
36499: -- 4219869 Business Flow
36500: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
36501: -- Prior Entry. Currently, the following code is always generated.
36502: ------------------------------------------------------------------------------------------------
36503: XLA_AE_LINES_PKG.ValidateCurrentLine;
36504:
36505: ------------------------------------------------------------------------------------
36506: -- 4219869 Business Flow
36507: -- Populated credit and debit amounts -- Need to generate this within IF
36505: ------------------------------------------------------------------------------------
36506: -- 4219869 Business Flow
36507: -- Populated credit and debit amounts -- Need to generate this within IF
36508: ------------------------------------------------------------------------------------
36509: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
36510:
36511: ----------------------------------------------------------------------------------
36512: -- 4219869 Business Flow
36513: -- Update journal entry status -- Need to generate this within IF
36537: -- To allow MPA report to determine if it should generate report process
36538: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
36539: ------------------------------------------------------------------------------------------
36540:
36541: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
36542: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
36543:
36544: --
36545: -- Update the line information that should be overwritten
36538: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
36539: ------------------------------------------------------------------------------------------
36540:
36541: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
36542: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
36543:
36544: --
36545: -- Update the line information that should be overwritten
36546: --
36543:
36544: --
36545: -- Update the line information that should be overwritten
36546: --
36547: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
36548: p_header_num => 1);
36549: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
36550:
36551: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
36545: -- Update the line information that should be overwritten
36546: --
36547: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
36548: p_header_num => 1);
36549: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
36550:
36551: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
36552:
36553: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
36547: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
36548: p_header_num => 1);
36549: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
36550:
36551: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
36552:
36553: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
36554: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
36555: END IF;
36550:
36551: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
36552:
36553: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
36554: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
36555: END IF;
36556:
36557: --
36558: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
36557: --
36558: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
36559: --
36560: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
36561: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
36562: ELSE
36563: ---------------------------------------------------------------------------------------------------
36564: -- 4262811a Switch Sign
36565: ---------------------------------------------------------------------------------------------------
36562: ELSE
36563: ---------------------------------------------------------------------------------------------------
36564: -- 4262811a Switch Sign
36565: ---------------------------------------------------------------------------------------------------
36566: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
36567: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36568: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36569: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36570: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36563: ---------------------------------------------------------------------------------------------------
36564: -- 4262811a Switch Sign
36565: ---------------------------------------------------------------------------------------------------
36566: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
36567: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36568: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36569: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36570: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36571: -- 5132302
36564: -- 4262811a Switch Sign
36565: ---------------------------------------------------------------------------------------------------
36566: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
36567: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36568: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36569: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36570: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36571: -- 5132302
36572: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
36565: ---------------------------------------------------------------------------------------------------
36566: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
36567: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36568: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36569: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36570: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36571: -- 5132302
36572: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
36573: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36566: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
36567: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36568: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36569: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36570: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36571: -- 5132302
36572: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
36573: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36574:
36568: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36569: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36570: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36571: -- 5132302
36572: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
36573: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36574:
36575: END IF;
36576:
36569: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36570: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36571: -- 5132302
36572: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
36573: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36574:
36575: END IF;
36576:
36577: -- 4955764
36574:
36575: END IF;
36576:
36577: -- 4955764
36578: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
36579: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
36580:
36581:
36582: XLA_AE_LINES_PKG.ValidateCurrentLine;
36578: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
36579: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
36580:
36581:
36582: XLA_AE_LINES_PKG.ValidateCurrentLine;
36583: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
36584:
36585: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
36586: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
36579: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
36580:
36581:
36582: XLA_AE_LINES_PKG.ValidateCurrentLine;
36583: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
36584:
36585: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
36586: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
36587: ,p_balance_type_code => l_balance_type_code);
36736: --
36737: -- bulk performance
36738: --
36739: l_balance_type_code VARCHAR2(1);
36740: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
36741: l_log_module VARCHAR2(240);
36742:
36743: --
36744: -- Upgrade strategy
36813: ') = 'AGREEMENT'
36814: THEN
36815:
36816: --
36817: XLA_AE_LINES_PKG.SetNewLine;
36818:
36819: p_balance_type_code := l_balance_type_code;
36820: -- set the flag so later we will know whether the gain loss line needs to be created
36821:
36825:
36826: --
36827: -- bulk performance
36828: --
36829: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
36830: p_header_num => 0); -- 4262811
36831: --
36832: -- set accounting line options
36833: --
36830: p_header_num => 0); -- 4262811
36831: --
36832: -- set accounting line options
36833: --
36834: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
36835: p_natural_side_code => 'D'
36836: , p_gain_or_loss_flag => 'N'
36837: , p_gl_transfer_mode_code => 'S'
36838: , p_acct_entry_type_code => 'E'
36844: --
36845: --
36846: -- set accounting line type info
36847: --
36848: xla_ae_lines_pkg.SetAcctLineType
36849: (p_component_type => l_component_type
36850: ,p_event_type_code => l_event_type_code
36851: ,p_line_definition_owner_code => l_line_definition_owner_code
36852: ,p_line_definition_code => l_line_definition_code
36858: ,p_event_class_code => l_event_class_code);
36859: --
36860: -- set accounting class
36861: --
36862: xla_ae_lines_pkg.SetAcctClass(
36863: p_accounting_class_code => 'PURCHASE_ORDER'
36864: , p_ae_header_id => l_ae_header_id
36865: );
36866:
36866:
36867: --
36868: -- set rounding class
36869: --
36870: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
36871: 'PURCHASE_ORDER';
36872:
36873: --
36874: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
36870: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
36871: 'PURCHASE_ORDER';
36872:
36873: --
36874: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
36875: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
36876: --
36877: -- bulk performance
36878: --
36871: 'PURCHASE_ORDER';
36872:
36873: --
36874: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
36875: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
36876: --
36877: -- bulk performance
36878: --
36879: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
36875: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
36876: --
36877: -- bulk performance
36878: --
36879: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
36880:
36881: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
36882: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
36883:
36877: -- bulk performance
36878: --
36879: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
36880:
36881: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
36882: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
36883:
36884: -- 4955764
36885: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
36881: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
36882: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
36883:
36884: -- 4955764
36885: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
36886: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
36887:
36888: -- 4458381 Public Sector Enh
36889: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
36885: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
36886: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
36887:
36888: -- 4458381 Public Sector Enh
36889: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
36890: --
36891: -- set accounting attributes for the line type
36892: --
36893: l_entered_amt_idx := 23;
36971: l_rec_acct_attrs.array_num_value(33) := p_source_61;
36972: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
36973: l_rec_acct_attrs.array_num_value(34) := p_source_61;
36974:
36975: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
36976: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
36977:
36978: ---------------------------------------------------------------------------------------------------------------
36979: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
36972: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
36973: l_rec_acct_attrs.array_num_value(34) := p_source_61;
36974:
36975: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
36976: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
36977:
36978: ---------------------------------------------------------------------------------------------------------------
36979: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
36980: ---------------------------------------------------------------------------------------------------------------
36975: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
36976: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
36977:
36978: ---------------------------------------------------------------------------------------------------------------
36979: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
36980: ---------------------------------------------------------------------------------------------------------------
36981: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
36982:
36983: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
36977:
36978: ---------------------------------------------------------------------------------------------------------------
36979: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
36980: ---------------------------------------------------------------------------------------------------------------
36981: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
36982:
36983: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
36984: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
36985:
36979: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
36980: ---------------------------------------------------------------------------------------------------------------
36981: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
36982:
36983: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
36984: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
36985:
36986: IF xla_accounting_cache_pkg.GetValueChar
36987: (p_source_code => 'LEDGER_CATEGORY_CODE'
36980: ---------------------------------------------------------------------------------------------------------------
36981: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
36982:
36983: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
36984: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
36985:
36986: IF xla_accounting_cache_pkg.GetValueChar
36987: (p_source_code => 'LEDGER_CATEGORY_CODE'
36988: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
36991: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
36992: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
36993: )
36994: THEN
36995: xla_ae_lines_pkg.BflowUpgEntry
36996: (p_business_method_code => l_bflow_method_code
36997: ,p_business_class_code => l_bflow_class_code
36998: ,p_balance_type => l_balance_type_code);
36999: ELSE
37008: --
37009: -- call description
37010: --
37011:
37012: xla_ae_lines_pkg.SetLineDescription(
37013: p_ae_header_id => l_ae_header_id
37014: ,p_description => Description_3 (
37015: p_application_id => p_application_id
37016: , p_ae_header_id => l_ae_header_id
37041: , x_value_type_code => l_adr_value_type_code
37042: , p_side => 'NA'
37043: );
37044:
37045: xla_ae_lines_pkg.set_ccid(
37046: p_code_combination_id => l_ccid
37047: , p_value_type_code => l_adr_value_type_code
37048: , p_transaction_coa_id => l_adr_transaction_coa_id
37049: , p_accounting_coa_id => l_adr_accounting_coa_id
37077: xla_accounting_err_pkg.build_message
37078: (p_appli_s_name => 'XLA'
37079: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
37080: ,p_token_1 => 'LINE_NUMBER'
37081: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
37082: ,p_token_2 => 'LINE_TYPE_NAME'
37083: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
37084: l_component_type
37085: ,l_component_code
37113: --
37114: --
37115: ------------------------------------------------------------------------------------------------
37116: -- 4219869 Business Flow
37117: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
37118: -- Prior Entry. Currently, the following code is always generated.
37119: ------------------------------------------------------------------------------------------------
37120: XLA_AE_LINES_PKG.ValidateCurrentLine;
37121:
37116: -- 4219869 Business Flow
37117: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
37118: -- Prior Entry. Currently, the following code is always generated.
37119: ------------------------------------------------------------------------------------------------
37120: XLA_AE_LINES_PKG.ValidateCurrentLine;
37121:
37122: ------------------------------------------------------------------------------------
37123: -- 4219869 Business Flow
37124: -- Populated credit and debit amounts -- Need to generate this within IF
37122: ------------------------------------------------------------------------------------
37123: -- 4219869 Business Flow
37124: -- Populated credit and debit amounts -- Need to generate this within IF
37125: ------------------------------------------------------------------------------------
37126: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
37127:
37128: ----------------------------------------------------------------------------------
37129: -- 4219869 Business Flow
37130: -- Update journal entry status -- Need to generate this within IF
37154: -- To allow MPA report to determine if it should generate report process
37155: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
37156: ------------------------------------------------------------------------------------------
37157:
37158: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
37159: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
37160:
37161: --
37162: -- Update the line information that should be overwritten
37155: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
37156: ------------------------------------------------------------------------------------------
37157:
37158: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
37159: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
37160:
37161: --
37162: -- Update the line information that should be overwritten
37163: --
37160:
37161: --
37162: -- Update the line information that should be overwritten
37163: --
37164: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
37165: p_header_num => 1);
37166: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
37167:
37168: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
37162: -- Update the line information that should be overwritten
37163: --
37164: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
37165: p_header_num => 1);
37166: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
37167:
37168: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
37169:
37170: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
37164: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
37165: p_header_num => 1);
37166: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
37167:
37168: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
37169:
37170: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
37171: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
37172: END IF;
37167:
37168: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
37169:
37170: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
37171: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
37172: END IF;
37173:
37174: --
37175: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
37174: --
37175: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
37176: --
37177: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
37178: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
37179: ELSE
37180: ---------------------------------------------------------------------------------------------------
37181: -- 4262811a Switch Sign
37182: ---------------------------------------------------------------------------------------------------
37179: ELSE
37180: ---------------------------------------------------------------------------------------------------
37181: -- 4262811a Switch Sign
37182: ---------------------------------------------------------------------------------------------------
37183: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
37184: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37185: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37186: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37187: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37180: ---------------------------------------------------------------------------------------------------
37181: -- 4262811a Switch Sign
37182: ---------------------------------------------------------------------------------------------------
37183: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
37184: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37185: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37186: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37187: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37188: -- 5132302
37181: -- 4262811a Switch Sign
37182: ---------------------------------------------------------------------------------------------------
37183: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
37184: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37185: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37186: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37187: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37188: -- 5132302
37189: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
37182: ---------------------------------------------------------------------------------------------------
37183: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
37184: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37185: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37186: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37187: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37188: -- 5132302
37189: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
37190: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37183: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
37184: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37185: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37186: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37187: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37188: -- 5132302
37189: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
37190: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37191:
37185: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37186: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37187: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37188: -- 5132302
37189: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
37190: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37191:
37192: END IF;
37193:
37186: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37187: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37188: -- 5132302
37189: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
37190: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37191:
37192: END IF;
37193:
37194: -- 4955764
37191:
37192: END IF;
37193:
37194: -- 4955764
37195: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
37196: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
37197:
37198:
37199: XLA_AE_LINES_PKG.ValidateCurrentLine;
37195: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
37196: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
37197:
37198:
37199: XLA_AE_LINES_PKG.ValidateCurrentLine;
37200: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
37201:
37202: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
37203: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
37196: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
37197:
37198:
37199: XLA_AE_LINES_PKG.ValidateCurrentLine;
37200: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
37201:
37202: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
37203: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
37204: ,p_balance_type_code => l_balance_type_code);
37355: --
37356: -- bulk performance
37357: --
37358: l_balance_type_code VARCHAR2(1);
37359: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
37360: l_log_module VARCHAR2(240);
37361:
37362: --
37363: -- Upgrade strategy
37442: p_source_24 IS NULL )
37443: THEN
37444:
37445: --
37446: XLA_AE_LINES_PKG.SetNewLine;
37447:
37448: p_balance_type_code := l_balance_type_code;
37449: -- set the flag so later we will know whether the gain loss line needs to be created
37450:
37454:
37455: --
37456: -- bulk performance
37457: --
37458: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
37459: p_header_num => 0); -- 4262811
37460: --
37461: -- set accounting line options
37462: --
37459: p_header_num => 0); -- 4262811
37460: --
37461: -- set accounting line options
37462: --
37463: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
37464: p_natural_side_code => 'D'
37465: , p_gain_or_loss_flag => 'N'
37466: , p_gl_transfer_mode_code => 'S'
37467: , p_acct_entry_type_code => 'E'
37473: --
37474: --
37475: -- set accounting line type info
37476: --
37477: xla_ae_lines_pkg.SetAcctLineType
37478: (p_component_type => l_component_type
37479: ,p_event_type_code => l_event_type_code
37480: ,p_line_definition_owner_code => l_line_definition_owner_code
37481: ,p_line_definition_code => l_line_definition_code
37487: ,p_event_class_code => l_event_class_code);
37488: --
37489: -- set accounting class
37490: --
37491: xla_ae_lines_pkg.SetAcctClass(
37492: p_accounting_class_code => 'PURCHASE_ORDER'
37493: , p_ae_header_id => l_ae_header_id
37494: );
37495:
37495:
37496: --
37497: -- set rounding class
37498: --
37499: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
37500: 'PURCHASE_ORDER';
37501:
37502: --
37503: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
37499: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
37500: 'PURCHASE_ORDER';
37501:
37502: --
37503: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
37504: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
37505: --
37506: -- bulk performance
37507: --
37500: 'PURCHASE_ORDER';
37501:
37502: --
37503: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
37504: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
37505: --
37506: -- bulk performance
37507: --
37508: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
37504: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
37505: --
37506: -- bulk performance
37507: --
37508: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
37509:
37510: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
37511: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
37512:
37506: -- bulk performance
37507: --
37508: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
37509:
37510: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
37511: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
37512:
37513: -- 4955764
37514: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
37510: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
37511: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
37512:
37513: -- 4955764
37514: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
37515: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
37516:
37517: -- 4458381 Public Sector Enh
37518: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
37514: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
37515: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
37516:
37517: -- 4458381 Public Sector Enh
37518: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
37519: --
37520: -- set accounting attributes for the line type
37521: --
37522: l_entered_amt_idx := 23;
37600: l_rec_acct_attrs.array_num_value(33) := p_source_61;
37601: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
37602: l_rec_acct_attrs.array_num_value(34) := p_source_61;
37603:
37604: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
37605: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
37606:
37607: ---------------------------------------------------------------------------------------------------------------
37608: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
37601: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
37602: l_rec_acct_attrs.array_num_value(34) := p_source_61;
37603:
37604: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
37605: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
37606:
37607: ---------------------------------------------------------------------------------------------------------------
37608: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
37609: ---------------------------------------------------------------------------------------------------------------
37604: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
37605: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
37606:
37607: ---------------------------------------------------------------------------------------------------------------
37608: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
37609: ---------------------------------------------------------------------------------------------------------------
37610: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
37611:
37612: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
37606:
37607: ---------------------------------------------------------------------------------------------------------------
37608: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
37609: ---------------------------------------------------------------------------------------------------------------
37610: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
37611:
37612: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
37613: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
37614:
37608: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
37609: ---------------------------------------------------------------------------------------------------------------
37610: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
37611:
37612: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
37613: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
37614:
37615: IF xla_accounting_cache_pkg.GetValueChar
37616: (p_source_code => 'LEDGER_CATEGORY_CODE'
37609: ---------------------------------------------------------------------------------------------------------------
37610: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
37611:
37612: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
37613: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
37614:
37615: IF xla_accounting_cache_pkg.GetValueChar
37616: (p_source_code => 'LEDGER_CATEGORY_CODE'
37617: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
37620: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
37621: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
37622: )
37623: THEN
37624: xla_ae_lines_pkg.BflowUpgEntry
37625: (p_business_method_code => l_bflow_method_code
37626: ,p_business_class_code => l_bflow_class_code
37627: ,p_balance_type => l_balance_type_code);
37628: ELSE
37637: --
37638: -- call description
37639: --
37640:
37641: xla_ae_lines_pkg.SetLineDescription(
37642: p_ae_header_id => l_ae_header_id
37643: ,p_description => Description_3 (
37644: p_application_id => p_application_id
37645: , p_ae_header_id => l_ae_header_id
37670: , x_value_type_code => l_adr_value_type_code
37671: , p_side => 'NA'
37672: );
37673:
37674: xla_ae_lines_pkg.set_ccid(
37675: p_code_combination_id => l_ccid
37676: , p_value_type_code => l_adr_value_type_code
37677: , p_transaction_coa_id => l_adr_transaction_coa_id
37678: , p_accounting_coa_id => l_adr_accounting_coa_id
37706: xla_accounting_err_pkg.build_message
37707: (p_appli_s_name => 'XLA'
37708: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
37709: ,p_token_1 => 'LINE_NUMBER'
37710: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
37711: ,p_token_2 => 'LINE_TYPE_NAME'
37712: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
37713: l_component_type
37714: ,l_component_code
37742: --
37743: --
37744: ------------------------------------------------------------------------------------------------
37745: -- 4219869 Business Flow
37746: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
37747: -- Prior Entry. Currently, the following code is always generated.
37748: ------------------------------------------------------------------------------------------------
37749: XLA_AE_LINES_PKG.ValidateCurrentLine;
37750:
37745: -- 4219869 Business Flow
37746: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
37747: -- Prior Entry. Currently, the following code is always generated.
37748: ------------------------------------------------------------------------------------------------
37749: XLA_AE_LINES_PKG.ValidateCurrentLine;
37750:
37751: ------------------------------------------------------------------------------------
37752: -- 4219869 Business Flow
37753: -- Populated credit and debit amounts -- Need to generate this within IF
37751: ------------------------------------------------------------------------------------
37752: -- 4219869 Business Flow
37753: -- Populated credit and debit amounts -- Need to generate this within IF
37754: ------------------------------------------------------------------------------------
37755: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
37756:
37757: ----------------------------------------------------------------------------------
37758: -- 4219869 Business Flow
37759: -- Update journal entry status -- Need to generate this within IF
37783: -- To allow MPA report to determine if it should generate report process
37784: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
37785: ------------------------------------------------------------------------------------------
37786:
37787: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
37788: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
37789:
37790: --
37791: -- Update the line information that should be overwritten
37784: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
37785: ------------------------------------------------------------------------------------------
37786:
37787: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
37788: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
37789:
37790: --
37791: -- Update the line information that should be overwritten
37792: --
37789:
37790: --
37791: -- Update the line information that should be overwritten
37792: --
37793: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
37794: p_header_num => 1);
37795: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
37796:
37797: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
37791: -- Update the line information that should be overwritten
37792: --
37793: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
37794: p_header_num => 1);
37795: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
37796:
37797: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
37798:
37799: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
37793: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
37794: p_header_num => 1);
37795: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
37796:
37797: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
37798:
37799: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
37800: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
37801: END IF;
37796:
37797: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
37798:
37799: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
37800: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
37801: END IF;
37802:
37803: --
37804: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
37803: --
37804: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
37805: --
37806: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
37807: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
37808: ELSE
37809: ---------------------------------------------------------------------------------------------------
37810: -- 4262811a Switch Sign
37811: ---------------------------------------------------------------------------------------------------
37808: ELSE
37809: ---------------------------------------------------------------------------------------------------
37810: -- 4262811a Switch Sign
37811: ---------------------------------------------------------------------------------------------------
37812: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
37813: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37814: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37815: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37816: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37809: ---------------------------------------------------------------------------------------------------
37810: -- 4262811a Switch Sign
37811: ---------------------------------------------------------------------------------------------------
37812: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
37813: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37814: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37815: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37816: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37817: -- 5132302
37810: -- 4262811a Switch Sign
37811: ---------------------------------------------------------------------------------------------------
37812: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
37813: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37814: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37815: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37816: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37817: -- 5132302
37818: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
37811: ---------------------------------------------------------------------------------------------------
37812: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
37813: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37814: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37815: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37816: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37817: -- 5132302
37818: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
37819: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37812: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
37813: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37814: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37815: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37816: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37817: -- 5132302
37818: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
37819: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37820:
37814: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37815: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37816: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37817: -- 5132302
37818: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
37819: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37820:
37821: END IF;
37822:
37815: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37816: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37817: -- 5132302
37818: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
37819: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37820:
37821: END IF;
37822:
37823: -- 4955764
37820:
37821: END IF;
37822:
37823: -- 4955764
37824: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
37825: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
37826:
37827:
37828: XLA_AE_LINES_PKG.ValidateCurrentLine;
37824: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
37825: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
37826:
37827:
37828: XLA_AE_LINES_PKG.ValidateCurrentLine;
37829: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
37830:
37831: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
37832: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
37825: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
37826:
37827:
37828: XLA_AE_LINES_PKG.ValidateCurrentLine;
37829: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
37830:
37831: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
37832: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
37833: ,p_balance_type_code => l_balance_type_code);
37998: --
37999: -- bulk performance
38000: --
38001: l_balance_type_code VARCHAR2(1);
38002: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
38003: l_log_module VARCHAR2(240);
38004:
38005: --
38006: -- Upgrade strategy
38121: ') = 'M'
38122: ) THEN
38123:
38124: --
38125: XLA_AE_LINES_PKG.SetNewLine;
38126:
38127: p_balance_type_code := l_balance_type_code;
38128: -- set the flag so later we will know whether the gain loss line needs to be created
38129:
38133:
38134: --
38135: -- bulk performance
38136: --
38137: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
38138: p_header_num => 0); -- 4262811
38139: --
38140: -- set accounting line options
38141: --
38138: p_header_num => 0); -- 4262811
38139: --
38140: -- set accounting line options
38141: --
38142: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
38143: p_natural_side_code => 'D'
38144: , p_gain_or_loss_flag => 'N'
38145: , p_gl_transfer_mode_code => 'S'
38146: , p_acct_entry_type_code => 'E'
38152: --
38153: --
38154: -- set accounting line type info
38155: --
38156: xla_ae_lines_pkg.SetAcctLineType
38157: (p_component_type => l_component_type
38158: ,p_event_type_code => l_event_type_code
38159: ,p_line_definition_owner_code => l_line_definition_owner_code
38160: ,p_line_definition_code => l_line_definition_code
38166: ,p_event_class_code => l_event_class_code);
38167: --
38168: -- set accounting class
38169: --
38170: xla_ae_lines_pkg.SetAcctClass(
38171: p_accounting_class_code => 'PA_BUDGET_ENC'
38172: , p_ae_header_id => l_ae_header_id
38173: );
38174:
38174:
38175: --
38176: -- set rounding class
38177: --
38178: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
38179: 'PA_BUDGET_ENC';
38180:
38181: --
38182: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
38178: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
38179: 'PA_BUDGET_ENC';
38180:
38181: --
38182: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
38183: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
38184: --
38185: -- bulk performance
38186: --
38179: 'PA_BUDGET_ENC';
38180:
38181: --
38182: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
38183: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
38184: --
38185: -- bulk performance
38186: --
38187: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
38183: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
38184: --
38185: -- bulk performance
38186: --
38187: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
38188:
38189: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
38190: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
38191:
38185: -- bulk performance
38186: --
38187: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
38188:
38189: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
38190: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
38191:
38192: -- 4955764
38193: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
38189: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
38190: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
38191:
38192: -- 4955764
38193: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
38194: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
38195:
38196: -- 4458381 Public Sector Enh
38197:
38271: l_rec_acct_attrs.array_num_value(34) := p_source_39;
38272: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
38273: l_rec_acct_attrs.array_num_value(35) := p_source_40;
38274:
38275: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
38276: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
38277:
38278: ---------------------------------------------------------------------------------------------------------------
38279: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
38272: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
38273: l_rec_acct_attrs.array_num_value(35) := p_source_40;
38274:
38275: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
38276: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
38277:
38278: ---------------------------------------------------------------------------------------------------------------
38279: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
38280: ---------------------------------------------------------------------------------------------------------------
38275: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
38276: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
38277:
38278: ---------------------------------------------------------------------------------------------------------------
38279: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
38280: ---------------------------------------------------------------------------------------------------------------
38281: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
38282:
38283: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38277:
38278: ---------------------------------------------------------------------------------------------------------------
38279: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
38280: ---------------------------------------------------------------------------------------------------------------
38281: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
38282:
38283: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38284: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38285:
38279: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
38280: ---------------------------------------------------------------------------------------------------------------
38281: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
38282:
38283: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38284: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38285:
38286: IF xla_accounting_cache_pkg.GetValueChar
38287: (p_source_code => 'LEDGER_CATEGORY_CODE'
38280: ---------------------------------------------------------------------------------------------------------------
38281: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
38282:
38283: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38284: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38285:
38286: IF xla_accounting_cache_pkg.GetValueChar
38287: (p_source_code => 'LEDGER_CATEGORY_CODE'
38288: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
38291: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
38292: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
38293: )
38294: THEN
38295: xla_ae_lines_pkg.BflowUpgEntry
38296: (p_business_method_code => l_bflow_method_code
38297: ,p_business_class_code => l_bflow_class_code
38298: ,p_balance_type => l_balance_type_code);
38299: ELSE
38297: ,p_business_class_code => l_bflow_class_code
38298: ,p_balance_type => l_balance_type_code);
38299: ELSE
38300: NULL;
38301: XLA_AE_LINES_PKG.business_flow_validation(
38302: p_business_method_code => l_bflow_method_code
38303: ,p_business_class_code => l_bflow_class_code
38304: ,p_inherit_description_flag => l_inherit_desc_flag);
38305: END IF;
38311: --
38312: -- call description
38313: --
38314:
38315: xla_ae_lines_pkg.SetLineDescription(
38316: p_ae_header_id => l_ae_header_id
38317: ,p_description => Description_2 (
38318: p_application_id => p_application_id
38319: , p_ae_header_id => l_ae_header_id
38357: xla_accounting_err_pkg.build_message
38358: (p_appli_s_name => 'XLA'
38359: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
38360: ,p_token_1 => 'LINE_NUMBER'
38361: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
38362: ,p_token_2 => 'LINE_TYPE_NAME'
38363: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
38364: l_component_type
38365: ,l_component_code
38393: --
38394: --
38395: ------------------------------------------------------------------------------------------------
38396: -- 4219869 Business Flow
38397: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
38398: -- Prior Entry. Currently, the following code is always generated.
38399: ------------------------------------------------------------------------------------------------
38400: -- No ValidateCurrentLine for business flow method of Prior Entry
38401:
38402: ------------------------------------------------------------------------------------
38403: -- 4219869 Business Flow
38404: -- Populated credit and debit amounts -- Need to generate this within IF
38405: ------------------------------------------------------------------------------------
38406: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
38407:
38408: ----------------------------------------------------------------------------------
38409: -- 4219869 Business Flow
38410: -- Update journal entry status -- Need to generate this within IF
38434: -- To allow MPA report to determine if it should generate report process
38435: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
38436: ------------------------------------------------------------------------------------------
38437:
38438: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
38439: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
38440:
38441: --
38442: -- Update the line information that should be overwritten
38435: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
38436: ------------------------------------------------------------------------------------------
38437:
38438: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
38439: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
38440:
38441: --
38442: -- Update the line information that should be overwritten
38443: --
38440:
38441: --
38442: -- Update the line information that should be overwritten
38443: --
38444: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
38445: p_header_num => 1);
38446: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
38447:
38448: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
38442: -- Update the line information that should be overwritten
38443: --
38444: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
38445: p_header_num => 1);
38446: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
38447:
38448: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
38449:
38450: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
38444: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
38445: p_header_num => 1);
38446: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
38447:
38448: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
38449:
38450: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
38451: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
38452: END IF;
38447:
38448: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
38449:
38450: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
38451: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
38452: END IF;
38453:
38454: --
38455: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
38454: --
38455: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
38456: --
38457: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
38458: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
38459: ELSE
38460: ---------------------------------------------------------------------------------------------------
38461: -- 4262811a Switch Sign
38462: ---------------------------------------------------------------------------------------------------
38459: ELSE
38460: ---------------------------------------------------------------------------------------------------
38461: -- 4262811a Switch Sign
38462: ---------------------------------------------------------------------------------------------------
38463: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
38464: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38465: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38466: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38467: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38460: ---------------------------------------------------------------------------------------------------
38461: -- 4262811a Switch Sign
38462: ---------------------------------------------------------------------------------------------------
38463: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
38464: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38465: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38466: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38467: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38468: -- 5132302
38461: -- 4262811a Switch Sign
38462: ---------------------------------------------------------------------------------------------------
38463: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
38464: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38465: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38466: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38467: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38468: -- 5132302
38469: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
38462: ---------------------------------------------------------------------------------------------------
38463: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
38464: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38465: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38466: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38467: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38468: -- 5132302
38469: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
38470: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38463: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
38464: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38465: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38466: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38467: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38468: -- 5132302
38469: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
38470: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38471:
38465: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38466: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38467: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38468: -- 5132302
38469: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
38470: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38471:
38472: END IF;
38473:
38466: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38467: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38468: -- 5132302
38469: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
38470: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38471:
38472: END IF;
38473:
38474: -- 4955764
38471:
38472: END IF;
38473:
38474: -- 4955764
38475: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
38476: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
38477:
38478:
38479: XLA_AE_LINES_PKG.ValidateCurrentLine;
38475: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
38476: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
38477:
38478:
38479: XLA_AE_LINES_PKG.ValidateCurrentLine;
38480: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
38481:
38482: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
38483: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
38476: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
38477:
38478:
38479: XLA_AE_LINES_PKG.ValidateCurrentLine;
38480: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
38481:
38482: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
38483: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
38484: ,p_balance_type_code => l_balance_type_code);
38647: --
38648: -- bulk performance
38649: --
38650: l_balance_type_code VARCHAR2(1);
38651: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
38652: l_log_module VARCHAR2(240);
38653:
38654: --
38655: -- Upgrade strategy
38766: ') = 'B_REQ')
38767: ) THEN
38768:
38769: --
38770: XLA_AE_LINES_PKG.SetNewLine;
38771:
38772: p_balance_type_code := l_balance_type_code;
38773: -- set the flag so later we will know whether the gain loss line needs to be created
38774:
38778:
38779: --
38780: -- bulk performance
38781: --
38782: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
38783: p_header_num => 0); -- 4262811
38784: --
38785: -- set accounting line options
38786: --
38783: p_header_num => 0); -- 4262811
38784: --
38785: -- set accounting line options
38786: --
38787: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
38788: p_natural_side_code => 'D'
38789: , p_gain_or_loss_flag => 'N'
38790: , p_gl_transfer_mode_code => 'S'
38791: , p_acct_entry_type_code => 'E'
38797: --
38798: --
38799: -- set accounting line type info
38800: --
38801: xla_ae_lines_pkg.SetAcctLineType
38802: (p_component_type => l_component_type
38803: ,p_event_type_code => l_event_type_code
38804: ,p_line_definition_owner_code => l_line_definition_owner_code
38805: ,p_line_definition_code => l_line_definition_code
38811: ,p_event_class_code => l_event_class_code);
38812: --
38813: -- set accounting class
38814: --
38815: xla_ae_lines_pkg.SetAcctClass(
38816: p_accounting_class_code => 'PA_BUDGET_ENC'
38817: , p_ae_header_id => l_ae_header_id
38818: );
38819:
38819:
38820: --
38821: -- set rounding class
38822: --
38823: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
38824: 'PA_BUDGET_ENC';
38825:
38826: --
38827: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
38823: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
38824: 'PA_BUDGET_ENC';
38825:
38826: --
38827: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
38828: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
38829: --
38830: -- bulk performance
38831: --
38824: 'PA_BUDGET_ENC';
38825:
38826: --
38827: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
38828: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
38829: --
38830: -- bulk performance
38831: --
38832: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
38828: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
38829: --
38830: -- bulk performance
38831: --
38832: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
38833:
38834: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
38835: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
38836:
38830: -- bulk performance
38831: --
38832: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
38833:
38834: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
38835: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
38836:
38837: -- 4955764
38838: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
38834: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
38835: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
38836:
38837: -- 4955764
38838: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
38839: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
38840:
38841: -- 4458381 Public Sector Enh
38842:
38914: l_rec_acct_attrs.array_num_value(33) := p_source_39;
38915: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
38916: l_rec_acct_attrs.array_num_value(34) := p_source_40;
38917:
38918: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
38919: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
38920:
38921: ---------------------------------------------------------------------------------------------------------------
38922: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
38915: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
38916: l_rec_acct_attrs.array_num_value(34) := p_source_40;
38917:
38918: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
38919: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
38920:
38921: ---------------------------------------------------------------------------------------------------------------
38922: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
38923: ---------------------------------------------------------------------------------------------------------------
38918: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
38919: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
38920:
38921: ---------------------------------------------------------------------------------------------------------------
38922: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
38923: ---------------------------------------------------------------------------------------------------------------
38924: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
38925:
38926: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38920:
38921: ---------------------------------------------------------------------------------------------------------------
38922: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
38923: ---------------------------------------------------------------------------------------------------------------
38924: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
38925:
38926: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38927: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38928:
38922: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
38923: ---------------------------------------------------------------------------------------------------------------
38924: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
38925:
38926: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38927: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38928:
38929: IF xla_accounting_cache_pkg.GetValueChar
38930: (p_source_code => 'LEDGER_CATEGORY_CODE'
38923: ---------------------------------------------------------------------------------------------------------------
38924: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
38925:
38926: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38927: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38928:
38929: IF xla_accounting_cache_pkg.GetValueChar
38930: (p_source_code => 'LEDGER_CATEGORY_CODE'
38931: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
38934: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
38935: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
38936: )
38937: THEN
38938: xla_ae_lines_pkg.BflowUpgEntry
38939: (p_business_method_code => l_bflow_method_code
38940: ,p_business_class_code => l_bflow_class_code
38941: ,p_balance_type => l_balance_type_code);
38942: ELSE
38940: ,p_business_class_code => l_bflow_class_code
38941: ,p_balance_type => l_balance_type_code);
38942: ELSE
38943: NULL;
38944: XLA_AE_LINES_PKG.business_flow_validation(
38945: p_business_method_code => l_bflow_method_code
38946: ,p_business_class_code => l_bflow_class_code
38947: ,p_inherit_description_flag => l_inherit_desc_flag);
38948: END IF;
38954: --
38955: -- call description
38956: --
38957:
38958: xla_ae_lines_pkg.SetLineDescription(
38959: p_ae_header_id => l_ae_header_id
38960: ,p_description => Description_2 (
38961: p_application_id => p_application_id
38962: , p_ae_header_id => l_ae_header_id
39000: xla_accounting_err_pkg.build_message
39001: (p_appli_s_name => 'XLA'
39002: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
39003: ,p_token_1 => 'LINE_NUMBER'
39004: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
39005: ,p_token_2 => 'LINE_TYPE_NAME'
39006: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
39007: l_component_type
39008: ,l_component_code
39036: --
39037: --
39038: ------------------------------------------------------------------------------------------------
39039: -- 4219869 Business Flow
39040: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
39041: -- Prior Entry. Currently, the following code is always generated.
39042: ------------------------------------------------------------------------------------------------
39043: -- No ValidateCurrentLine for business flow method of Prior Entry
39044:
39045: ------------------------------------------------------------------------------------
39046: -- 4219869 Business Flow
39047: -- Populated credit and debit amounts -- Need to generate this within IF
39048: ------------------------------------------------------------------------------------
39049: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
39050:
39051: ----------------------------------------------------------------------------------
39052: -- 4219869 Business Flow
39053: -- Update journal entry status -- Need to generate this within IF
39077: -- To allow MPA report to determine if it should generate report process
39078: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
39079: ------------------------------------------------------------------------------------------
39080:
39081: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
39082: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
39083:
39084: --
39085: -- Update the line information that should be overwritten
39078: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
39079: ------------------------------------------------------------------------------------------
39080:
39081: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
39082: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
39083:
39084: --
39085: -- Update the line information that should be overwritten
39086: --
39083:
39084: --
39085: -- Update the line information that should be overwritten
39086: --
39087: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
39088: p_header_num => 1);
39089: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
39090:
39091: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
39085: -- Update the line information that should be overwritten
39086: --
39087: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
39088: p_header_num => 1);
39089: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
39090:
39091: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
39092:
39093: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
39087: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
39088: p_header_num => 1);
39089: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
39090:
39091: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
39092:
39093: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
39094: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
39095: END IF;
39090:
39091: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
39092:
39093: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
39094: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
39095: END IF;
39096:
39097: --
39098: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
39097: --
39098: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
39099: --
39100: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
39101: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
39102: ELSE
39103: ---------------------------------------------------------------------------------------------------
39104: -- 4262811a Switch Sign
39105: ---------------------------------------------------------------------------------------------------
39102: ELSE
39103: ---------------------------------------------------------------------------------------------------
39104: -- 4262811a Switch Sign
39105: ---------------------------------------------------------------------------------------------------
39106: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
39107: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39108: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39109: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39110: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39103: ---------------------------------------------------------------------------------------------------
39104: -- 4262811a Switch Sign
39105: ---------------------------------------------------------------------------------------------------
39106: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
39107: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39108: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39109: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39110: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39111: -- 5132302
39104: -- 4262811a Switch Sign
39105: ---------------------------------------------------------------------------------------------------
39106: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
39107: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39108: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39109: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39110: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39111: -- 5132302
39112: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
39105: ---------------------------------------------------------------------------------------------------
39106: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
39107: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39108: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39109: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39110: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39111: -- 5132302
39112: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
39113: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39106: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
39107: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39108: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39109: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39110: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39111: -- 5132302
39112: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
39113: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39114:
39108: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39109: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39110: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39111: -- 5132302
39112: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
39113: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39114:
39115: END IF;
39116:
39109: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39110: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39111: -- 5132302
39112: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
39113: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39114:
39115: END IF;
39116:
39117: -- 4955764
39114:
39115: END IF;
39116:
39117: -- 4955764
39118: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
39119: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
39120:
39121:
39122: XLA_AE_LINES_PKG.ValidateCurrentLine;
39118: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
39119: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
39120:
39121:
39122: XLA_AE_LINES_PKG.ValidateCurrentLine;
39123: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
39124:
39125: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
39126: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
39119: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
39120:
39121:
39122: XLA_AE_LINES_PKG.ValidateCurrentLine;
39123: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
39124:
39125: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
39126: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
39127: ,p_balance_type_code => l_balance_type_code);
39294: --
39295: -- bulk performance
39296: --
39297: l_balance_type_code VARCHAR2(1);
39298: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
39299: l_log_module VARCHAR2(240);
39300:
39301: --
39302: -- Upgrade strategy
39399: ') = 'M'
39400: THEN
39401:
39402: --
39403: XLA_AE_LINES_PKG.SetNewLine;
39404:
39405: p_balance_type_code := l_balance_type_code;
39406: -- set the flag so later we will know whether the gain loss line needs to be created
39407:
39411:
39412: --
39413: -- bulk performance
39414: --
39415: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
39416: p_header_num => 0); -- 4262811
39417: --
39418: -- set accounting line options
39419: --
39416: p_header_num => 0); -- 4262811
39417: --
39418: -- set accounting line options
39419: --
39420: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
39421: p_natural_side_code => 'D'
39422: , p_gain_or_loss_flag => 'N'
39423: , p_gl_transfer_mode_code => 'S'
39424: , p_acct_entry_type_code => 'E'
39430: --
39431: --
39432: -- set accounting line type info
39433: --
39434: xla_ae_lines_pkg.SetAcctLineType
39435: (p_component_type => l_component_type
39436: ,p_event_type_code => l_event_type_code
39437: ,p_line_definition_owner_code => l_line_definition_owner_code
39438: ,p_line_definition_code => l_line_definition_code
39444: ,p_event_class_code => l_event_class_code);
39445: --
39446: -- set accounting class
39447: --
39448: xla_ae_lines_pkg.SetAcctClass(
39449: p_accounting_class_code => 'PA_BUDGET_ENC'
39450: , p_ae_header_id => l_ae_header_id
39451: );
39452:
39452:
39453: --
39454: -- set rounding class
39455: --
39456: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
39457: 'PA_BUDGET_ENC';
39458:
39459: --
39460: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
39456: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
39457: 'PA_BUDGET_ENC';
39458:
39459: --
39460: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
39461: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
39462: --
39463: -- bulk performance
39464: --
39457: 'PA_BUDGET_ENC';
39458:
39459: --
39460: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
39461: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
39462: --
39463: -- bulk performance
39464: --
39465: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
39461: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
39462: --
39463: -- bulk performance
39464: --
39465: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
39466:
39467: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
39468: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
39469:
39463: -- bulk performance
39464: --
39465: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
39466:
39467: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
39468: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
39469:
39470: -- 4955764
39471: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
39467: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
39468: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
39469:
39470: -- 4955764
39471: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
39472: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
39473:
39474: -- 4458381 Public Sector Enh
39475:
39549: l_rec_acct_attrs.array_num_value(34) := p_source_39;
39550: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
39551: l_rec_acct_attrs.array_num_value(35) := p_source_40;
39552:
39553: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
39554: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
39555:
39556: ---------------------------------------------------------------------------------------------------------------
39557: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
39550: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
39551: l_rec_acct_attrs.array_num_value(35) := p_source_40;
39552:
39553: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
39554: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
39555:
39556: ---------------------------------------------------------------------------------------------------------------
39557: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
39558: ---------------------------------------------------------------------------------------------------------------
39553: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
39554: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
39555:
39556: ---------------------------------------------------------------------------------------------------------------
39557: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
39558: ---------------------------------------------------------------------------------------------------------------
39559: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
39560:
39561: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
39555:
39556: ---------------------------------------------------------------------------------------------------------------
39557: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
39558: ---------------------------------------------------------------------------------------------------------------
39559: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
39560:
39561: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
39562: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
39563:
39557: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
39558: ---------------------------------------------------------------------------------------------------------------
39559: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
39560:
39561: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
39562: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
39563:
39564: IF xla_accounting_cache_pkg.GetValueChar
39565: (p_source_code => 'LEDGER_CATEGORY_CODE'
39558: ---------------------------------------------------------------------------------------------------------------
39559: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
39560:
39561: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
39562: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
39563:
39564: IF xla_accounting_cache_pkg.GetValueChar
39565: (p_source_code => 'LEDGER_CATEGORY_CODE'
39566: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
39569: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
39570: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
39571: )
39572: THEN
39573: xla_ae_lines_pkg.BflowUpgEntry
39574: (p_business_method_code => l_bflow_method_code
39575: ,p_business_class_code => l_bflow_class_code
39576: ,p_balance_type => l_balance_type_code);
39577: ELSE
39575: ,p_business_class_code => l_bflow_class_code
39576: ,p_balance_type => l_balance_type_code);
39577: ELSE
39578: NULL;
39579: XLA_AE_LINES_PKG.business_flow_validation(
39580: p_business_method_code => l_bflow_method_code
39581: ,p_business_class_code => l_bflow_class_code
39582: ,p_inherit_description_flag => l_inherit_desc_flag);
39583: END IF;
39589: --
39590: -- call description
39591: --
39592:
39593: xla_ae_lines_pkg.SetLineDescription(
39594: p_ae_header_id => l_ae_header_id
39595: ,p_description => Description_2 (
39596: p_application_id => p_application_id
39597: , p_ae_header_id => l_ae_header_id
39635: xla_accounting_err_pkg.build_message
39636: (p_appli_s_name => 'XLA'
39637: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
39638: ,p_token_1 => 'LINE_NUMBER'
39639: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
39640: ,p_token_2 => 'LINE_TYPE_NAME'
39641: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
39642: l_component_type
39643: ,l_component_code
39671: --
39672: --
39673: ------------------------------------------------------------------------------------------------
39674: -- 4219869 Business Flow
39675: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
39676: -- Prior Entry. Currently, the following code is always generated.
39677: ------------------------------------------------------------------------------------------------
39678: -- No ValidateCurrentLine for business flow method of Prior Entry
39679:
39680: ------------------------------------------------------------------------------------
39681: -- 4219869 Business Flow
39682: -- Populated credit and debit amounts -- Need to generate this within IF
39683: ------------------------------------------------------------------------------------
39684: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
39685:
39686: ----------------------------------------------------------------------------------
39687: -- 4219869 Business Flow
39688: -- Update journal entry status -- Need to generate this within IF
39712: -- To allow MPA report to determine if it should generate report process
39713: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
39714: ------------------------------------------------------------------------------------------
39715:
39716: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
39717: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
39718:
39719: --
39720: -- Update the line information that should be overwritten
39713: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
39714: ------------------------------------------------------------------------------------------
39715:
39716: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
39717: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
39718:
39719: --
39720: -- Update the line information that should be overwritten
39721: --
39718:
39719: --
39720: -- Update the line information that should be overwritten
39721: --
39722: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
39723: p_header_num => 1);
39724: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
39725:
39726: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
39720: -- Update the line information that should be overwritten
39721: --
39722: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
39723: p_header_num => 1);
39724: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
39725:
39726: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
39727:
39728: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
39722: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
39723: p_header_num => 1);
39724: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
39725:
39726: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
39727:
39728: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
39729: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
39730: END IF;
39725:
39726: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
39727:
39728: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
39729: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
39730: END IF;
39731:
39732: --
39733: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
39732: --
39733: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
39734: --
39735: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
39736: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
39737: ELSE
39738: ---------------------------------------------------------------------------------------------------
39739: -- 4262811a Switch Sign
39740: ---------------------------------------------------------------------------------------------------
39737: ELSE
39738: ---------------------------------------------------------------------------------------------------
39739: -- 4262811a Switch Sign
39740: ---------------------------------------------------------------------------------------------------
39741: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
39742: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39743: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39744: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39745: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39738: ---------------------------------------------------------------------------------------------------
39739: -- 4262811a Switch Sign
39740: ---------------------------------------------------------------------------------------------------
39741: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
39742: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39743: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39744: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39745: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39746: -- 5132302
39739: -- 4262811a Switch Sign
39740: ---------------------------------------------------------------------------------------------------
39741: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
39742: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39743: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39744: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39745: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39746: -- 5132302
39747: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
39740: ---------------------------------------------------------------------------------------------------
39741: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
39742: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39743: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39744: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39745: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39746: -- 5132302
39747: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
39748: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39741: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
39742: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39743: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39744: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39745: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39746: -- 5132302
39747: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
39748: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39749:
39743: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39744: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39745: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39746: -- 5132302
39747: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
39748: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39749:
39750: END IF;
39751:
39744: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39745: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39746: -- 5132302
39747: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
39748: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39749:
39750: END IF;
39751:
39752: -- 4955764
39749:
39750: END IF;
39751:
39752: -- 4955764
39753: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
39754: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
39755:
39756:
39757: XLA_AE_LINES_PKG.ValidateCurrentLine;
39753: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
39754: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
39755:
39756:
39757: XLA_AE_LINES_PKG.ValidateCurrentLine;
39758: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
39759:
39760: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
39761: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
39754: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
39755:
39756:
39757: XLA_AE_LINES_PKG.ValidateCurrentLine;
39758: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
39759:
39760: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
39761: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
39762: ,p_balance_type_code => l_balance_type_code);
39911: --
39912: -- bulk performance
39913: --
39914: l_balance_type_code VARCHAR2(1);
39915: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
39916: l_log_module VARCHAR2(240);
39917:
39918: --
39919: -- Upgrade strategy
39995: ') = 'M'
39996: THEN
39997:
39998: --
39999: XLA_AE_LINES_PKG.SetNewLine;
40000:
40001: p_balance_type_code := l_balance_type_code;
40002: -- set the flag so later we will know whether the gain loss line needs to be created
40003:
40007:
40008: --
40009: -- bulk performance
40010: --
40011: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
40012: p_header_num => 0); -- 4262811
40013: --
40014: -- set accounting line options
40015: --
40012: p_header_num => 0); -- 4262811
40013: --
40014: -- set accounting line options
40015: --
40016: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
40017: p_natural_side_code => 'D'
40018: , p_gain_or_loss_flag => 'N'
40019: , p_gl_transfer_mode_code => 'S'
40020: , p_acct_entry_type_code => 'E'
40026: --
40027: --
40028: -- set accounting line type info
40029: --
40030: xla_ae_lines_pkg.SetAcctLineType
40031: (p_component_type => l_component_type
40032: ,p_event_type_code => l_event_type_code
40033: ,p_line_definition_owner_code => l_line_definition_owner_code
40034: ,p_line_definition_code => l_line_definition_code
40040: ,p_event_class_code => l_event_class_code);
40041: --
40042: -- set accounting class
40043: --
40044: xla_ae_lines_pkg.SetAcctClass(
40045: p_accounting_class_code => 'PURCHASE_ORDER'
40046: , p_ae_header_id => l_ae_header_id
40047: );
40048:
40048:
40049: --
40050: -- set rounding class
40051: --
40052: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
40053: 'PURCHASE_ORDER';
40054:
40055: --
40056: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
40052: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
40053: 'PURCHASE_ORDER';
40054:
40055: --
40056: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
40057: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
40058: --
40059: -- bulk performance
40060: --
40053: 'PURCHASE_ORDER';
40054:
40055: --
40056: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
40057: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
40058: --
40059: -- bulk performance
40060: --
40061: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
40057: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
40058: --
40059: -- bulk performance
40060: --
40061: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
40062:
40063: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
40064: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
40065:
40059: -- bulk performance
40060: --
40061: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
40062:
40063: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
40064: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
40065:
40066: -- 4955764
40067: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
40063: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
40064: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
40065:
40066: -- 4955764
40067: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
40068: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
40069:
40070: -- 4458381 Public Sector Enh
40071: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
40067: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
40068: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
40069:
40070: -- 4458381 Public Sector Enh
40071: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1001;
40072: --
40073: -- set accounting attributes for the line type
40074: --
40075: l_entered_amt_idx := 23;
40153: l_rec_acct_attrs.array_num_value(33) := p_source_61;
40154: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
40155: l_rec_acct_attrs.array_num_value(34) := p_source_61;
40156:
40157: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
40158: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
40159:
40160: ---------------------------------------------------------------------------------------------------------------
40161: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
40154: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
40155: l_rec_acct_attrs.array_num_value(34) := p_source_61;
40156:
40157: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
40158: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
40159:
40160: ---------------------------------------------------------------------------------------------------------------
40161: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
40162: ---------------------------------------------------------------------------------------------------------------
40157: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
40158: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
40159:
40160: ---------------------------------------------------------------------------------------------------------------
40161: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
40162: ---------------------------------------------------------------------------------------------------------------
40163: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
40164:
40165: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
40159:
40160: ---------------------------------------------------------------------------------------------------------------
40161: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
40162: ---------------------------------------------------------------------------------------------------------------
40163: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
40164:
40165: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
40166: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
40167:
40161: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
40162: ---------------------------------------------------------------------------------------------------------------
40163: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
40164:
40165: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
40166: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
40167:
40168: IF xla_accounting_cache_pkg.GetValueChar
40169: (p_source_code => 'LEDGER_CATEGORY_CODE'
40162: ---------------------------------------------------------------------------------------------------------------
40163: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
40164:
40165: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
40166: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
40167:
40168: IF xla_accounting_cache_pkg.GetValueChar
40169: (p_source_code => 'LEDGER_CATEGORY_CODE'
40170: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
40173: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
40174: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
40175: )
40176: THEN
40177: xla_ae_lines_pkg.BflowUpgEntry
40178: (p_business_method_code => l_bflow_method_code
40179: ,p_business_class_code => l_bflow_class_code
40180: ,p_balance_type => l_balance_type_code);
40181: ELSE
40190: --
40191: -- call description
40192: --
40193:
40194: xla_ae_lines_pkg.SetLineDescription(
40195: p_ae_header_id => l_ae_header_id
40196: ,p_description => Description_3 (
40197: p_application_id => p_application_id
40198: , p_ae_header_id => l_ae_header_id
40223: , x_value_type_code => l_adr_value_type_code
40224: , p_side => 'NA'
40225: );
40226:
40227: xla_ae_lines_pkg.set_ccid(
40228: p_code_combination_id => l_ccid
40229: , p_value_type_code => l_adr_value_type_code
40230: , p_transaction_coa_id => l_adr_transaction_coa_id
40231: , p_accounting_coa_id => l_adr_accounting_coa_id
40259: xla_accounting_err_pkg.build_message
40260: (p_appli_s_name => 'XLA'
40261: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
40262: ,p_token_1 => 'LINE_NUMBER'
40263: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
40264: ,p_token_2 => 'LINE_TYPE_NAME'
40265: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
40266: l_component_type
40267: ,l_component_code
40295: --
40296: --
40297: ------------------------------------------------------------------------------------------------
40298: -- 4219869 Business Flow
40299: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
40300: -- Prior Entry. Currently, the following code is always generated.
40301: ------------------------------------------------------------------------------------------------
40302: XLA_AE_LINES_PKG.ValidateCurrentLine;
40303:
40298: -- 4219869 Business Flow
40299: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
40300: -- Prior Entry. Currently, the following code is always generated.
40301: ------------------------------------------------------------------------------------------------
40302: XLA_AE_LINES_PKG.ValidateCurrentLine;
40303:
40304: ------------------------------------------------------------------------------------
40305: -- 4219869 Business Flow
40306: -- Populated credit and debit amounts -- Need to generate this within IF
40304: ------------------------------------------------------------------------------------
40305: -- 4219869 Business Flow
40306: -- Populated credit and debit amounts -- Need to generate this within IF
40307: ------------------------------------------------------------------------------------
40308: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
40309:
40310: ----------------------------------------------------------------------------------
40311: -- 4219869 Business Flow
40312: -- Update journal entry status -- Need to generate this within IF
40336: -- To allow MPA report to determine if it should generate report process
40337: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
40338: ------------------------------------------------------------------------------------------
40339:
40340: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
40341: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
40342:
40343: --
40344: -- Update the line information that should be overwritten
40337: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
40338: ------------------------------------------------------------------------------------------
40339:
40340: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
40341: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
40342:
40343: --
40344: -- Update the line information that should be overwritten
40345: --
40342:
40343: --
40344: -- Update the line information that should be overwritten
40345: --
40346: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
40347: p_header_num => 1);
40348: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
40349:
40350: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
40344: -- Update the line information that should be overwritten
40345: --
40346: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
40347: p_header_num => 1);
40348: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
40349:
40350: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
40351:
40352: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
40346: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
40347: p_header_num => 1);
40348: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
40349:
40350: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
40351:
40352: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
40353: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
40354: END IF;
40349:
40350: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
40351:
40352: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
40353: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
40354: END IF;
40355:
40356: --
40357: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
40356: --
40357: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
40358: --
40359: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
40360: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
40361: ELSE
40362: ---------------------------------------------------------------------------------------------------
40363: -- 4262811a Switch Sign
40364: ---------------------------------------------------------------------------------------------------
40361: ELSE
40362: ---------------------------------------------------------------------------------------------------
40363: -- 4262811a Switch Sign
40364: ---------------------------------------------------------------------------------------------------
40365: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
40366: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40367: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40368: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40369: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40362: ---------------------------------------------------------------------------------------------------
40363: -- 4262811a Switch Sign
40364: ---------------------------------------------------------------------------------------------------
40365: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
40366: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40367: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40368: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40369: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40370: -- 5132302
40363: -- 4262811a Switch Sign
40364: ---------------------------------------------------------------------------------------------------
40365: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
40366: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40367: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40368: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40369: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40370: -- 5132302
40371: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
40364: ---------------------------------------------------------------------------------------------------
40365: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
40366: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40367: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40368: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40369: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40370: -- 5132302
40371: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
40372: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40365: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
40366: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40367: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40368: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40369: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40370: -- 5132302
40371: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
40372: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40373:
40367: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40368: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40369: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40370: -- 5132302
40371: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
40372: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40373:
40374: END IF;
40375:
40368: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40369: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40370: -- 5132302
40371: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
40372: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40373:
40374: END IF;
40375:
40376: -- 4955764
40373:
40374: END IF;
40375:
40376: -- 4955764
40377: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
40378: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
40379:
40380:
40381: XLA_AE_LINES_PKG.ValidateCurrentLine;
40377: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
40378: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
40379:
40380:
40381: XLA_AE_LINES_PKG.ValidateCurrentLine;
40382: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
40383:
40384: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
40385: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
40378: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
40379:
40380:
40381: XLA_AE_LINES_PKG.ValidateCurrentLine;
40382: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
40383:
40384: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
40385: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
40386: ,p_balance_type_code => l_balance_type_code);
40535: --
40536: -- bulk performance
40537: --
40538: l_balance_type_code VARCHAR2(1);
40539: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
40540: l_log_module VARCHAR2(240);
40541:
40542: --
40543: -- Upgrade strategy
40619: ') = 'M'
40620: THEN
40621:
40622: --
40623: XLA_AE_LINES_PKG.SetNewLine;
40624:
40625: p_balance_type_code := l_balance_type_code;
40626: -- set the flag so later we will know whether the gain loss line needs to be created
40627:
40631:
40632: --
40633: -- bulk performance
40634: --
40635: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
40636: p_header_num => 0); -- 4262811
40637: --
40638: -- set accounting line options
40639: --
40636: p_header_num => 0); -- 4262811
40637: --
40638: -- set accounting line options
40639: --
40640: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
40641: p_natural_side_code => 'D'
40642: , p_gain_or_loss_flag => 'N'
40643: , p_gl_transfer_mode_code => 'S'
40644: , p_acct_entry_type_code => 'E'
40650: --
40651: --
40652: -- set accounting line type info
40653: --
40654: xla_ae_lines_pkg.SetAcctLineType
40655: (p_component_type => l_component_type
40656: ,p_event_type_code => l_event_type_code
40657: ,p_line_definition_owner_code => l_line_definition_owner_code
40658: ,p_line_definition_code => l_line_definition_code
40664: ,p_event_class_code => l_event_class_code);
40665: --
40666: -- set accounting class
40667: --
40668: xla_ae_lines_pkg.SetAcctClass(
40669: p_accounting_class_code => 'REQUISITION'
40670: , p_ae_header_id => l_ae_header_id
40671: );
40672:
40672:
40673: --
40674: -- set rounding class
40675: --
40676: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
40677: 'REQUISITION';
40678:
40679: --
40680: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
40676: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
40677: 'REQUISITION';
40678:
40679: --
40680: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
40681: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
40682: --
40683: -- bulk performance
40684: --
40677: 'REQUISITION';
40678:
40679: --
40680: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
40681: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
40682: --
40683: -- bulk performance
40684: --
40685: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
40681: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
40682: --
40683: -- bulk performance
40684: --
40685: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
40686:
40687: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
40688: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
40689:
40683: -- bulk performance
40684: --
40685: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
40686:
40687: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
40688: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
40689:
40690: -- 4955764
40691: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
40687: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
40688: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
40689:
40690: -- 4955764
40691: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
40692: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
40693:
40694: -- 4458381 Public Sector Enh
40695: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
40691: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
40692: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
40693:
40694: -- 4458381 Public Sector Enh
40695: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
40696: --
40697: -- set accounting attributes for the line type
40698: --
40699: l_entered_amt_idx := 23;
40777: l_rec_acct_attrs.array_num_value(33) := p_source_78;
40778: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
40779: l_rec_acct_attrs.array_num_value(34) := p_source_78;
40780:
40781: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
40782: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
40783:
40784: ---------------------------------------------------------------------------------------------------------------
40785: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
40778: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
40779: l_rec_acct_attrs.array_num_value(34) := p_source_78;
40780:
40781: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
40782: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
40783:
40784: ---------------------------------------------------------------------------------------------------------------
40785: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
40786: ---------------------------------------------------------------------------------------------------------------
40781: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
40782: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
40783:
40784: ---------------------------------------------------------------------------------------------------------------
40785: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
40786: ---------------------------------------------------------------------------------------------------------------
40787: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
40788:
40789: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
40783:
40784: ---------------------------------------------------------------------------------------------------------------
40785: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
40786: ---------------------------------------------------------------------------------------------------------------
40787: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
40788:
40789: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
40790: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
40791:
40785: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
40786: ---------------------------------------------------------------------------------------------------------------
40787: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
40788:
40789: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
40790: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
40791:
40792: IF xla_accounting_cache_pkg.GetValueChar
40793: (p_source_code => 'LEDGER_CATEGORY_CODE'
40786: ---------------------------------------------------------------------------------------------------------------
40787: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
40788:
40789: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
40790: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
40791:
40792: IF xla_accounting_cache_pkg.GetValueChar
40793: (p_source_code => 'LEDGER_CATEGORY_CODE'
40794: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
40797: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
40798: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
40799: )
40800: THEN
40801: xla_ae_lines_pkg.BflowUpgEntry
40802: (p_business_method_code => l_bflow_method_code
40803: ,p_business_class_code => l_bflow_class_code
40804: ,p_balance_type => l_balance_type_code);
40805: ELSE
40814: --
40815: -- call description
40816: --
40817:
40818: xla_ae_lines_pkg.SetLineDescription(
40819: p_ae_header_id => l_ae_header_id
40820: ,p_description => Description_3 (
40821: p_application_id => p_application_id
40822: , p_ae_header_id => l_ae_header_id
40847: , x_value_type_code => l_adr_value_type_code
40848: , p_side => 'NA'
40849: );
40850:
40851: xla_ae_lines_pkg.set_ccid(
40852: p_code_combination_id => l_ccid
40853: , p_value_type_code => l_adr_value_type_code
40854: , p_transaction_coa_id => l_adr_transaction_coa_id
40855: , p_accounting_coa_id => l_adr_accounting_coa_id
40883: xla_accounting_err_pkg.build_message
40884: (p_appli_s_name => 'XLA'
40885: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
40886: ,p_token_1 => 'LINE_NUMBER'
40887: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
40888: ,p_token_2 => 'LINE_TYPE_NAME'
40889: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
40890: l_component_type
40891: ,l_component_code
40919: --
40920: --
40921: ------------------------------------------------------------------------------------------------
40922: -- 4219869 Business Flow
40923: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
40924: -- Prior Entry. Currently, the following code is always generated.
40925: ------------------------------------------------------------------------------------------------
40926: XLA_AE_LINES_PKG.ValidateCurrentLine;
40927:
40922: -- 4219869 Business Flow
40923: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
40924: -- Prior Entry. Currently, the following code is always generated.
40925: ------------------------------------------------------------------------------------------------
40926: XLA_AE_LINES_PKG.ValidateCurrentLine;
40927:
40928: ------------------------------------------------------------------------------------
40929: -- 4219869 Business Flow
40930: -- Populated credit and debit amounts -- Need to generate this within IF
40928: ------------------------------------------------------------------------------------
40929: -- 4219869 Business Flow
40930: -- Populated credit and debit amounts -- Need to generate this within IF
40931: ------------------------------------------------------------------------------------
40932: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
40933:
40934: ----------------------------------------------------------------------------------
40935: -- 4219869 Business Flow
40936: -- Update journal entry status -- Need to generate this within IF
40960: -- To allow MPA report to determine if it should generate report process
40961: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
40962: ------------------------------------------------------------------------------------------
40963:
40964: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
40965: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
40966:
40967: --
40968: -- Update the line information that should be overwritten
40961: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
40962: ------------------------------------------------------------------------------------------
40963:
40964: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
40965: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
40966:
40967: --
40968: -- Update the line information that should be overwritten
40969: --
40966:
40967: --
40968: -- Update the line information that should be overwritten
40969: --
40970: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
40971: p_header_num => 1);
40972: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
40973:
40974: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
40968: -- Update the line information that should be overwritten
40969: --
40970: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
40971: p_header_num => 1);
40972: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
40973:
40974: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
40975:
40976: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
40970: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
40971: p_header_num => 1);
40972: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
40973:
40974: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
40975:
40976: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
40977: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
40978: END IF;
40973:
40974: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
40975:
40976: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
40977: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
40978: END IF;
40979:
40980: --
40981: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
40980: --
40981: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
40982: --
40983: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
40984: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
40985: ELSE
40986: ---------------------------------------------------------------------------------------------------
40987: -- 4262811a Switch Sign
40988: ---------------------------------------------------------------------------------------------------
40985: ELSE
40986: ---------------------------------------------------------------------------------------------------
40987: -- 4262811a Switch Sign
40988: ---------------------------------------------------------------------------------------------------
40989: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
40990: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40991: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40992: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40993: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40986: ---------------------------------------------------------------------------------------------------
40987: -- 4262811a Switch Sign
40988: ---------------------------------------------------------------------------------------------------
40989: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
40990: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40991: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40992: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40993: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40994: -- 5132302
40987: -- 4262811a Switch Sign
40988: ---------------------------------------------------------------------------------------------------
40989: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
40990: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40991: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40992: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40993: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40994: -- 5132302
40995: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
40988: ---------------------------------------------------------------------------------------------------
40989: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
40990: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40991: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40992: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40993: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40994: -- 5132302
40995: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
40996: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40989: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
40990: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40991: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40992: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40993: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40994: -- 5132302
40995: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
40996: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40997:
40991: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40992: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40993: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40994: -- 5132302
40995: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
40996: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40997:
40998: END IF;
40999:
40992: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40993: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40994: -- 5132302
40995: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
40996: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40997:
40998: END IF;
40999:
41000: -- 4955764
40997:
40998: END IF;
40999:
41000: -- 4955764
41001: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
41002: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
41003:
41004:
41005: XLA_AE_LINES_PKG.ValidateCurrentLine;
41001: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
41002: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
41003:
41004:
41005: XLA_AE_LINES_PKG.ValidateCurrentLine;
41006: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
41007:
41008: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
41009: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
41002: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
41003:
41004:
41005: XLA_AE_LINES_PKG.ValidateCurrentLine;
41006: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
41007:
41008: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
41009: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
41010: ,p_balance_type_code => l_balance_type_code);
41151: --
41152: -- bulk performance
41153: --
41154: l_balance_type_code VARCHAR2(1);
41155: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
41156: l_log_module VARCHAR2(240);
41157:
41158: --
41159: -- Upgrade strategy
41256: ') = 'M'
41257: THEN
41258:
41259: --
41260: XLA_AE_LINES_PKG.SetNewLine;
41261:
41262: p_balance_type_code := l_balance_type_code;
41263: -- set the flag so later we will know whether the gain loss line needs to be created
41264:
41268:
41269: --
41270: -- bulk performance
41271: --
41272: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
41273: p_header_num => 0); -- 4262811
41274: --
41275: -- set accounting line options
41276: --
41273: p_header_num => 0); -- 4262811
41274: --
41275: -- set accounting line options
41276: --
41277: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
41278: p_natural_side_code => 'C'
41279: , p_gain_or_loss_flag => 'N'
41280: , p_gl_transfer_mode_code => 'S'
41281: , p_acct_entry_type_code => 'E'
41287: --
41288: --
41289: -- set accounting line type info
41290: --
41291: xla_ae_lines_pkg.SetAcctLineType
41292: (p_component_type => l_component_type
41293: ,p_event_type_code => l_event_type_code
41294: ,p_line_definition_owner_code => l_line_definition_owner_code
41295: ,p_line_definition_code => l_line_definition_code
41301: ,p_event_class_code => l_event_class_code);
41302: --
41303: -- set accounting class
41304: --
41305: xla_ae_lines_pkg.SetAcctClass(
41306: p_accounting_class_code => 'PURCHASE_ORDER'
41307: , p_ae_header_id => l_ae_header_id
41308: );
41309:
41309:
41310: --
41311: -- set rounding class
41312: --
41313: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
41314: 'PURCHASE_ORDER';
41315:
41316: --
41317: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
41313: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
41314: 'PURCHASE_ORDER';
41315:
41316: --
41317: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
41318: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
41319: --
41320: -- bulk performance
41321: --
41314: 'PURCHASE_ORDER';
41315:
41316: --
41317: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
41318: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
41319: --
41320: -- bulk performance
41321: --
41322: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
41318: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
41319: --
41320: -- bulk performance
41321: --
41322: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
41323:
41324: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
41325: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
41326:
41320: -- bulk performance
41321: --
41322: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
41323:
41324: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
41325: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
41326:
41327: -- 4955764
41328: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
41324: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
41325: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
41326:
41327: -- 4955764
41328: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
41329: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
41330:
41331: -- 4458381 Public Sector Enh
41332:
41408: l_rec_acct_attrs.array_num_value(30) := p_source_61;
41409: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
41410: l_rec_acct_attrs.array_num_value(31) := p_source_61;
41411:
41412: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
41413: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
41414:
41415: ---------------------------------------------------------------------------------------------------------------
41416: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
41409: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
41410: l_rec_acct_attrs.array_num_value(31) := p_source_61;
41411:
41412: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
41413: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
41414:
41415: ---------------------------------------------------------------------------------------------------------------
41416: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
41417: ---------------------------------------------------------------------------------------------------------------
41412: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
41413: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
41414:
41415: ---------------------------------------------------------------------------------------------------------------
41416: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
41417: ---------------------------------------------------------------------------------------------------------------
41418: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
41419:
41420: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41414:
41415: ---------------------------------------------------------------------------------------------------------------
41416: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
41417: ---------------------------------------------------------------------------------------------------------------
41418: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
41419:
41420: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41421: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41422:
41416: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
41417: ---------------------------------------------------------------------------------------------------------------
41418: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
41419:
41420: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41421: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41422:
41423: IF xla_accounting_cache_pkg.GetValueChar
41424: (p_source_code => 'LEDGER_CATEGORY_CODE'
41417: ---------------------------------------------------------------------------------------------------------------
41418: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
41419:
41420: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41421: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41422:
41423: IF xla_accounting_cache_pkg.GetValueChar
41424: (p_source_code => 'LEDGER_CATEGORY_CODE'
41425: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
41428: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
41429: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
41430: )
41431: THEN
41432: xla_ae_lines_pkg.BflowUpgEntry
41433: (p_business_method_code => l_bflow_method_code
41434: ,p_business_class_code => l_bflow_class_code
41435: ,p_balance_type => l_balance_type_code);
41436: ELSE
41434: ,p_business_class_code => l_bflow_class_code
41435: ,p_balance_type => l_balance_type_code);
41436: ELSE
41437: NULL;
41438: XLA_AE_LINES_PKG.business_flow_validation(
41439: p_business_method_code => l_bflow_method_code
41440: ,p_business_class_code => l_bflow_class_code
41441: ,p_inherit_description_flag => l_inherit_desc_flag);
41442: END IF;
41481: xla_accounting_err_pkg.build_message
41482: (p_appli_s_name => 'XLA'
41483: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
41484: ,p_token_1 => 'LINE_NUMBER'
41485: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
41486: ,p_token_2 => 'LINE_TYPE_NAME'
41487: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
41488: l_component_type
41489: ,l_component_code
41517: --
41518: --
41519: ------------------------------------------------------------------------------------------------
41520: -- 4219869 Business Flow
41521: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
41522: -- Prior Entry. Currently, the following code is always generated.
41523: ------------------------------------------------------------------------------------------------
41524: -- No ValidateCurrentLine for business flow method of Prior Entry
41525:
41526: ------------------------------------------------------------------------------------
41527: -- 4219869 Business Flow
41528: -- Populated credit and debit amounts -- Need to generate this within IF
41529: ------------------------------------------------------------------------------------
41530: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
41531:
41532: ----------------------------------------------------------------------------------
41533: -- 4219869 Business Flow
41534: -- Update journal entry status -- Need to generate this within IF
41558: -- To allow MPA report to determine if it should generate report process
41559: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
41560: ------------------------------------------------------------------------------------------
41561:
41562: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
41563: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
41564:
41565: --
41566: -- Update the line information that should be overwritten
41559: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
41560: ------------------------------------------------------------------------------------------
41561:
41562: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
41563: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
41564:
41565: --
41566: -- Update the line information that should be overwritten
41567: --
41564:
41565: --
41566: -- Update the line information that should be overwritten
41567: --
41568: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
41569: p_header_num => 1);
41570: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
41571:
41572: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
41566: -- Update the line information that should be overwritten
41567: --
41568: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
41569: p_header_num => 1);
41570: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
41571:
41572: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
41573:
41574: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
41568: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
41569: p_header_num => 1);
41570: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
41571:
41572: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
41573:
41574: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
41575: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
41576: END IF;
41571:
41572: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
41573:
41574: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
41575: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
41576: END IF;
41577:
41578: --
41579: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
41578: --
41579: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
41580: --
41581: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
41582: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
41583: ELSE
41584: ---------------------------------------------------------------------------------------------------
41585: -- 4262811a Switch Sign
41586: ---------------------------------------------------------------------------------------------------
41583: ELSE
41584: ---------------------------------------------------------------------------------------------------
41585: -- 4262811a Switch Sign
41586: ---------------------------------------------------------------------------------------------------
41587: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
41588: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41589: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41590: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41591: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41584: ---------------------------------------------------------------------------------------------------
41585: -- 4262811a Switch Sign
41586: ---------------------------------------------------------------------------------------------------
41587: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
41588: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41589: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41590: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41591: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41592: -- 5132302
41585: -- 4262811a Switch Sign
41586: ---------------------------------------------------------------------------------------------------
41587: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
41588: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41589: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41590: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41591: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41592: -- 5132302
41593: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
41586: ---------------------------------------------------------------------------------------------------
41587: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
41588: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41589: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41590: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41591: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41592: -- 5132302
41593: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
41594: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41587: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
41588: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41589: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41590: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41591: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41592: -- 5132302
41593: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
41594: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41595:
41589: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41590: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41591: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41592: -- 5132302
41593: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
41594: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41595:
41596: END IF;
41597:
41590: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41591: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41592: -- 5132302
41593: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
41594: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41595:
41596: END IF;
41597:
41598: -- 4955764
41595:
41596: END IF;
41597:
41598: -- 4955764
41599: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
41600: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
41601:
41602:
41603: XLA_AE_LINES_PKG.ValidateCurrentLine;
41599: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
41600: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
41601:
41602:
41603: XLA_AE_LINES_PKG.ValidateCurrentLine;
41604: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
41605:
41606: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
41607: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
41600: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
41601:
41602:
41603: XLA_AE_LINES_PKG.ValidateCurrentLine;
41604: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
41605:
41606: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
41607: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
41608: ,p_balance_type_code => l_balance_type_code);
41747: --
41748: -- bulk performance
41749: --
41750: l_balance_type_code VARCHAR2(1);
41751: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
41752: l_log_module VARCHAR2(240);
41753:
41754: --
41755: -- Upgrade strategy
41829: ') = 'M'
41830: THEN
41831:
41832: --
41833: XLA_AE_LINES_PKG.SetNewLine;
41834:
41835: p_balance_type_code := l_balance_type_code;
41836: -- set the flag so later we will know whether the gain loss line needs to be created
41837:
41841:
41842: --
41843: -- bulk performance
41844: --
41845: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
41846: p_header_num => 0); -- 4262811
41847: --
41848: -- set accounting line options
41849: --
41846: p_header_num => 0); -- 4262811
41847: --
41848: -- set accounting line options
41849: --
41850: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
41851: p_natural_side_code => 'D'
41852: , p_gain_or_loss_flag => 'N'
41853: , p_gl_transfer_mode_code => 'S'
41854: , p_acct_entry_type_code => 'E'
41860: --
41861: --
41862: -- set accounting line type info
41863: --
41864: xla_ae_lines_pkg.SetAcctLineType
41865: (p_component_type => l_component_type
41866: ,p_event_type_code => l_event_type_code
41867: ,p_line_definition_owner_code => l_line_definition_owner_code
41868: ,p_line_definition_code => l_line_definition_code
41874: ,p_event_class_code => l_event_class_code);
41875: --
41876: -- set accounting class
41877: --
41878: xla_ae_lines_pkg.SetAcctClass(
41879: p_accounting_class_code => 'PURCHASE_ORDER'
41880: , p_ae_header_id => l_ae_header_id
41881: );
41882:
41882:
41883: --
41884: -- set rounding class
41885: --
41886: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
41887: 'PURCHASE_ORDER';
41888:
41889: --
41890: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
41886: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
41887: 'PURCHASE_ORDER';
41888:
41889: --
41890: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
41891: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
41892: --
41893: -- bulk performance
41894: --
41887: 'PURCHASE_ORDER';
41888:
41889: --
41890: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
41891: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
41892: --
41893: -- bulk performance
41894: --
41895: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
41891: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
41892: --
41893: -- bulk performance
41894: --
41895: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
41896:
41897: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
41898: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
41899:
41893: -- bulk performance
41894: --
41895: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
41896:
41897: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
41898: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
41899:
41900: -- 4955764
41901: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
41897: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
41898: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
41899:
41900: -- 4955764
41901: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
41902: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
41903:
41904: -- 4458381 Public Sector Enh
41905:
41981: l_rec_acct_attrs.array_num_value(30) := p_source_61;
41982: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
41983: l_rec_acct_attrs.array_num_value(31) := p_source_61;
41984:
41985: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
41986: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
41987:
41988: ---------------------------------------------------------------------------------------------------------------
41989: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
41982: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
41983: l_rec_acct_attrs.array_num_value(31) := p_source_61;
41984:
41985: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
41986: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
41987:
41988: ---------------------------------------------------------------------------------------------------------------
41989: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
41990: ---------------------------------------------------------------------------------------------------------------
41985: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
41986: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
41987:
41988: ---------------------------------------------------------------------------------------------------------------
41989: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
41990: ---------------------------------------------------------------------------------------------------------------
41991: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
41992:
41993: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41987:
41988: ---------------------------------------------------------------------------------------------------------------
41989: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
41990: ---------------------------------------------------------------------------------------------------------------
41991: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
41992:
41993: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41994: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41995:
41989: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
41990: ---------------------------------------------------------------------------------------------------------------
41991: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
41992:
41993: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41994: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41995:
41996: IF xla_accounting_cache_pkg.GetValueChar
41997: (p_source_code => 'LEDGER_CATEGORY_CODE'
41990: ---------------------------------------------------------------------------------------------------------------
41991: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
41992:
41993: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41994: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41995:
41996: IF xla_accounting_cache_pkg.GetValueChar
41997: (p_source_code => 'LEDGER_CATEGORY_CODE'
41998: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
42001: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
42002: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
42003: )
42004: THEN
42005: xla_ae_lines_pkg.BflowUpgEntry
42006: (p_business_method_code => l_bflow_method_code
42007: ,p_business_class_code => l_bflow_class_code
42008: ,p_balance_type => l_balance_type_code);
42009: ELSE
42007: ,p_business_class_code => l_bflow_class_code
42008: ,p_balance_type => l_balance_type_code);
42009: ELSE
42010: NULL;
42011: XLA_AE_LINES_PKG.business_flow_validation(
42012: p_business_method_code => l_bflow_method_code
42013: ,p_business_class_code => l_bflow_class_code
42014: ,p_inherit_description_flag => l_inherit_desc_flag);
42015: END IF;
42054: xla_accounting_err_pkg.build_message
42055: (p_appli_s_name => 'XLA'
42056: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
42057: ,p_token_1 => 'LINE_NUMBER'
42058: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
42059: ,p_token_2 => 'LINE_TYPE_NAME'
42060: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
42061: l_component_type
42062: ,l_component_code
42090: --
42091: --
42092: ------------------------------------------------------------------------------------------------
42093: -- 4219869 Business Flow
42094: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
42095: -- Prior Entry. Currently, the following code is always generated.
42096: ------------------------------------------------------------------------------------------------
42097: -- No ValidateCurrentLine for business flow method of Prior Entry
42098:
42099: ------------------------------------------------------------------------------------
42100: -- 4219869 Business Flow
42101: -- Populated credit and debit amounts -- Need to generate this within IF
42102: ------------------------------------------------------------------------------------
42103: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
42104:
42105: ----------------------------------------------------------------------------------
42106: -- 4219869 Business Flow
42107: -- Update journal entry status -- Need to generate this within IF
42131: -- To allow MPA report to determine if it should generate report process
42132: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
42133: ------------------------------------------------------------------------------------------
42134:
42135: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
42136: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
42137:
42138: --
42139: -- Update the line information that should be overwritten
42132: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
42133: ------------------------------------------------------------------------------------------
42134:
42135: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
42136: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
42137:
42138: --
42139: -- Update the line information that should be overwritten
42140: --
42137:
42138: --
42139: -- Update the line information that should be overwritten
42140: --
42141: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
42142: p_header_num => 1);
42143: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
42144:
42145: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
42139: -- Update the line information that should be overwritten
42140: --
42141: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
42142: p_header_num => 1);
42143: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
42144:
42145: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
42146:
42147: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
42141: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
42142: p_header_num => 1);
42143: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
42144:
42145: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
42146:
42147: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
42148: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
42149: END IF;
42144:
42145: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
42146:
42147: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
42148: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
42149: END IF;
42150:
42151: --
42152: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
42151: --
42152: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
42153: --
42154: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
42155: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
42156: ELSE
42157: ---------------------------------------------------------------------------------------------------
42158: -- 4262811a Switch Sign
42159: ---------------------------------------------------------------------------------------------------
42156: ELSE
42157: ---------------------------------------------------------------------------------------------------
42158: -- 4262811a Switch Sign
42159: ---------------------------------------------------------------------------------------------------
42160: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
42161: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42162: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42163: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42164: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42157: ---------------------------------------------------------------------------------------------------
42158: -- 4262811a Switch Sign
42159: ---------------------------------------------------------------------------------------------------
42160: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
42161: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42162: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42163: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42164: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42165: -- 5132302
42158: -- 4262811a Switch Sign
42159: ---------------------------------------------------------------------------------------------------
42160: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
42161: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42162: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42163: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42164: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42165: -- 5132302
42166: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
42159: ---------------------------------------------------------------------------------------------------
42160: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
42161: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42162: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42163: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42164: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42165: -- 5132302
42166: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
42167: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42160: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
42161: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42162: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42163: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42164: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42165: -- 5132302
42166: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
42167: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42168:
42162: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42163: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42164: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42165: -- 5132302
42166: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
42167: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42168:
42169: END IF;
42170:
42163: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42164: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42165: -- 5132302
42166: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
42167: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42168:
42169: END IF;
42170:
42171: -- 4955764
42168:
42169: END IF;
42170:
42171: -- 4955764
42172: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
42173: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
42174:
42175:
42176: XLA_AE_LINES_PKG.ValidateCurrentLine;
42172: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
42173: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
42174:
42175:
42176: XLA_AE_LINES_PKG.ValidateCurrentLine;
42177: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
42178:
42179: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
42180: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
42173: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
42174:
42175:
42176: XLA_AE_LINES_PKG.ValidateCurrentLine;
42177: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
42178:
42179: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
42180: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
42181: ,p_balance_type_code => l_balance_type_code);
42322: --
42323: -- bulk performance
42324: --
42325: l_balance_type_code VARCHAR2(1);
42326: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
42327: l_log_module VARCHAR2(240);
42328:
42329: --
42330: -- Upgrade strategy
42427: ') = 'M'
42428: THEN
42429:
42430: --
42431: XLA_AE_LINES_PKG.SetNewLine;
42432:
42433: p_balance_type_code := l_balance_type_code;
42434: -- set the flag so later we will know whether the gain loss line needs to be created
42435:
42439:
42440: --
42441: -- bulk performance
42442: --
42443: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
42444: p_header_num => 0); -- 4262811
42445: --
42446: -- set accounting line options
42447: --
42444: p_header_num => 0); -- 4262811
42445: --
42446: -- set accounting line options
42447: --
42448: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
42449: p_natural_side_code => 'C'
42450: , p_gain_or_loss_flag => 'N'
42451: , p_gl_transfer_mode_code => 'S'
42452: , p_acct_entry_type_code => 'E'
42458: --
42459: --
42460: -- set accounting line type info
42461: --
42462: xla_ae_lines_pkg.SetAcctLineType
42463: (p_component_type => l_component_type
42464: ,p_event_type_code => l_event_type_code
42465: ,p_line_definition_owner_code => l_line_definition_owner_code
42466: ,p_line_definition_code => l_line_definition_code
42472: ,p_event_class_code => l_event_class_code);
42473: --
42474: -- set accounting class
42475: --
42476: xla_ae_lines_pkg.SetAcctClass(
42477: p_accounting_class_code => 'PURCHASE_ORDER'
42478: , p_ae_header_id => l_ae_header_id
42479: );
42480:
42480:
42481: --
42482: -- set rounding class
42483: --
42484: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
42485: 'PURCHASE_ORDER';
42486:
42487: --
42488: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
42484: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
42485: 'PURCHASE_ORDER';
42486:
42487: --
42488: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
42489: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
42490: --
42491: -- bulk performance
42492: --
42485: 'PURCHASE_ORDER';
42486:
42487: --
42488: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
42489: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
42490: --
42491: -- bulk performance
42492: --
42493: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
42489: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
42490: --
42491: -- bulk performance
42492: --
42493: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
42494:
42495: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
42496: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
42497:
42491: -- bulk performance
42492: --
42493: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
42494:
42495: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
42496: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
42497:
42498: -- 4955764
42499: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
42495: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
42496: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
42497:
42498: -- 4955764
42499: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
42500: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
42501:
42502: -- 4458381 Public Sector Enh
42503:
42579: l_rec_acct_attrs.array_num_value(30) := p_source_61;
42580: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
42581: l_rec_acct_attrs.array_num_value(31) := p_source_61;
42582:
42583: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
42584: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
42585:
42586: ---------------------------------------------------------------------------------------------------------------
42587: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
42580: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
42581: l_rec_acct_attrs.array_num_value(31) := p_source_61;
42582:
42583: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
42584: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
42585:
42586: ---------------------------------------------------------------------------------------------------------------
42587: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
42588: ---------------------------------------------------------------------------------------------------------------
42583: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
42584: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
42585:
42586: ---------------------------------------------------------------------------------------------------------------
42587: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
42588: ---------------------------------------------------------------------------------------------------------------
42589: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
42590:
42591: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
42585:
42586: ---------------------------------------------------------------------------------------------------------------
42587: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
42588: ---------------------------------------------------------------------------------------------------------------
42589: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
42590:
42591: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
42592: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
42593:
42587: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
42588: ---------------------------------------------------------------------------------------------------------------
42589: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
42590:
42591: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
42592: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
42593:
42594: IF xla_accounting_cache_pkg.GetValueChar
42595: (p_source_code => 'LEDGER_CATEGORY_CODE'
42588: ---------------------------------------------------------------------------------------------------------------
42589: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
42590:
42591: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
42592: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
42593:
42594: IF xla_accounting_cache_pkg.GetValueChar
42595: (p_source_code => 'LEDGER_CATEGORY_CODE'
42596: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
42599: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
42600: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
42601: )
42602: THEN
42603: xla_ae_lines_pkg.BflowUpgEntry
42604: (p_business_method_code => l_bflow_method_code
42605: ,p_business_class_code => l_bflow_class_code
42606: ,p_balance_type => l_balance_type_code);
42607: ELSE
42605: ,p_business_class_code => l_bflow_class_code
42606: ,p_balance_type => l_balance_type_code);
42607: ELSE
42608: NULL;
42609: XLA_AE_LINES_PKG.business_flow_validation(
42610: p_business_method_code => l_bflow_method_code
42611: ,p_business_class_code => l_bflow_class_code
42612: ,p_inherit_description_flag => l_inherit_desc_flag);
42613: END IF;
42652: xla_accounting_err_pkg.build_message
42653: (p_appli_s_name => 'XLA'
42654: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
42655: ,p_token_1 => 'LINE_NUMBER'
42656: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
42657: ,p_token_2 => 'LINE_TYPE_NAME'
42658: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
42659: l_component_type
42660: ,l_component_code
42688: --
42689: --
42690: ------------------------------------------------------------------------------------------------
42691: -- 4219869 Business Flow
42692: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
42693: -- Prior Entry. Currently, the following code is always generated.
42694: ------------------------------------------------------------------------------------------------
42695: -- No ValidateCurrentLine for business flow method of Prior Entry
42696:
42697: ------------------------------------------------------------------------------------
42698: -- 4219869 Business Flow
42699: -- Populated credit and debit amounts -- Need to generate this within IF
42700: ------------------------------------------------------------------------------------
42701: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
42702:
42703: ----------------------------------------------------------------------------------
42704: -- 4219869 Business Flow
42705: -- Update journal entry status -- Need to generate this within IF
42729: -- To allow MPA report to determine if it should generate report process
42730: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
42731: ------------------------------------------------------------------------------------------
42732:
42733: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
42734: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
42735:
42736: --
42737: -- Update the line information that should be overwritten
42730: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
42731: ------------------------------------------------------------------------------------------
42732:
42733: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
42734: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
42735:
42736: --
42737: -- Update the line information that should be overwritten
42738: --
42735:
42736: --
42737: -- Update the line information that should be overwritten
42738: --
42739: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
42740: p_header_num => 1);
42741: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
42742:
42743: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
42737: -- Update the line information that should be overwritten
42738: --
42739: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
42740: p_header_num => 1);
42741: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
42742:
42743: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
42744:
42745: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
42739: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
42740: p_header_num => 1);
42741: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
42742:
42743: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
42744:
42745: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
42746: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
42747: END IF;
42742:
42743: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
42744:
42745: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
42746: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
42747: END IF;
42748:
42749: --
42750: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
42749: --
42750: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
42751: --
42752: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
42753: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
42754: ELSE
42755: ---------------------------------------------------------------------------------------------------
42756: -- 4262811a Switch Sign
42757: ---------------------------------------------------------------------------------------------------
42754: ELSE
42755: ---------------------------------------------------------------------------------------------------
42756: -- 4262811a Switch Sign
42757: ---------------------------------------------------------------------------------------------------
42758: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
42759: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42760: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42761: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42762: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42755: ---------------------------------------------------------------------------------------------------
42756: -- 4262811a Switch Sign
42757: ---------------------------------------------------------------------------------------------------
42758: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
42759: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42760: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42761: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42762: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42763: -- 5132302
42756: -- 4262811a Switch Sign
42757: ---------------------------------------------------------------------------------------------------
42758: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
42759: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42760: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42761: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42762: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42763: -- 5132302
42764: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
42757: ---------------------------------------------------------------------------------------------------
42758: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
42759: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42760: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42761: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42762: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42763: -- 5132302
42764: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
42765: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42758: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
42759: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42760: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42761: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42762: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42763: -- 5132302
42764: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
42765: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42766:
42760: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42761: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42762: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42763: -- 5132302
42764: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
42765: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42766:
42767: END IF;
42768:
42761: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42762: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42763: -- 5132302
42764: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
42765: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42766:
42767: END IF;
42768:
42769: -- 4955764
42766:
42767: END IF;
42768:
42769: -- 4955764
42770: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
42771: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
42772:
42773:
42774: XLA_AE_LINES_PKG.ValidateCurrentLine;
42770: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
42771: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
42772:
42773:
42774: XLA_AE_LINES_PKG.ValidateCurrentLine;
42775: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
42776:
42777: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
42778: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
42771: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
42772:
42773:
42774: XLA_AE_LINES_PKG.ValidateCurrentLine;
42775: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
42776:
42777: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
42778: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
42779: ,p_balance_type_code => l_balance_type_code);
42918: --
42919: -- bulk performance
42920: --
42921: l_balance_type_code VARCHAR2(1);
42922: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
42923: l_log_module VARCHAR2(240);
42924:
42925: --
42926: -- Upgrade strategy
43000: ') = 'M'
43001: THEN
43002:
43003: --
43004: XLA_AE_LINES_PKG.SetNewLine;
43005:
43006: p_balance_type_code := l_balance_type_code;
43007: -- set the flag so later we will know whether the gain loss line needs to be created
43008:
43012:
43013: --
43014: -- bulk performance
43015: --
43016: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
43017: p_header_num => 0); -- 4262811
43018: --
43019: -- set accounting line options
43020: --
43017: p_header_num => 0); -- 4262811
43018: --
43019: -- set accounting line options
43020: --
43021: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
43022: p_natural_side_code => 'D'
43023: , p_gain_or_loss_flag => 'N'
43024: , p_gl_transfer_mode_code => 'S'
43025: , p_acct_entry_type_code => 'E'
43031: --
43032: --
43033: -- set accounting line type info
43034: --
43035: xla_ae_lines_pkg.SetAcctLineType
43036: (p_component_type => l_component_type
43037: ,p_event_type_code => l_event_type_code
43038: ,p_line_definition_owner_code => l_line_definition_owner_code
43039: ,p_line_definition_code => l_line_definition_code
43045: ,p_event_class_code => l_event_class_code);
43046: --
43047: -- set accounting class
43048: --
43049: xla_ae_lines_pkg.SetAcctClass(
43050: p_accounting_class_code => 'PURCHASE_ORDER'
43051: , p_ae_header_id => l_ae_header_id
43052: );
43053:
43053:
43054: --
43055: -- set rounding class
43056: --
43057: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
43058: 'PURCHASE_ORDER';
43059:
43060: --
43061: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
43057: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
43058: 'PURCHASE_ORDER';
43059:
43060: --
43061: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
43062: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
43063: --
43064: -- bulk performance
43065: --
43058: 'PURCHASE_ORDER';
43059:
43060: --
43061: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
43062: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
43063: --
43064: -- bulk performance
43065: --
43066: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
43062: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
43063: --
43064: -- bulk performance
43065: --
43066: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
43067:
43068: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
43069: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
43070:
43064: -- bulk performance
43065: --
43066: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
43067:
43068: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
43069: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
43070:
43071: -- 4955764
43072: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
43068: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
43069: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
43070:
43071: -- 4955764
43072: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
43073: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
43074:
43075: -- 4458381 Public Sector Enh
43076:
43152: l_rec_acct_attrs.array_num_value(30) := p_source_61;
43153: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
43154: l_rec_acct_attrs.array_num_value(31) := p_source_61;
43155:
43156: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
43157: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
43158:
43159: ---------------------------------------------------------------------------------------------------------------
43160: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
43153: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
43154: l_rec_acct_attrs.array_num_value(31) := p_source_61;
43155:
43156: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
43157: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
43158:
43159: ---------------------------------------------------------------------------------------------------------------
43160: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
43161: ---------------------------------------------------------------------------------------------------------------
43156: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
43157: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
43158:
43159: ---------------------------------------------------------------------------------------------------------------
43160: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
43161: ---------------------------------------------------------------------------------------------------------------
43162: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
43163:
43164: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43158:
43159: ---------------------------------------------------------------------------------------------------------------
43160: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
43161: ---------------------------------------------------------------------------------------------------------------
43162: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
43163:
43164: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43165: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43166:
43160: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
43161: ---------------------------------------------------------------------------------------------------------------
43162: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
43163:
43164: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43165: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43166:
43167: IF xla_accounting_cache_pkg.GetValueChar
43168: (p_source_code => 'LEDGER_CATEGORY_CODE'
43161: ---------------------------------------------------------------------------------------------------------------
43162: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
43163:
43164: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43165: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43166:
43167: IF xla_accounting_cache_pkg.GetValueChar
43168: (p_source_code => 'LEDGER_CATEGORY_CODE'
43169: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
43172: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
43173: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
43174: )
43175: THEN
43176: xla_ae_lines_pkg.BflowUpgEntry
43177: (p_business_method_code => l_bflow_method_code
43178: ,p_business_class_code => l_bflow_class_code
43179: ,p_balance_type => l_balance_type_code);
43180: ELSE
43178: ,p_business_class_code => l_bflow_class_code
43179: ,p_balance_type => l_balance_type_code);
43180: ELSE
43181: NULL;
43182: XLA_AE_LINES_PKG.business_flow_validation(
43183: p_business_method_code => l_bflow_method_code
43184: ,p_business_class_code => l_bflow_class_code
43185: ,p_inherit_description_flag => l_inherit_desc_flag);
43186: END IF;
43225: xla_accounting_err_pkg.build_message
43226: (p_appli_s_name => 'XLA'
43227: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
43228: ,p_token_1 => 'LINE_NUMBER'
43229: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
43230: ,p_token_2 => 'LINE_TYPE_NAME'
43231: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
43232: l_component_type
43233: ,l_component_code
43261: --
43262: --
43263: ------------------------------------------------------------------------------------------------
43264: -- 4219869 Business Flow
43265: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
43266: -- Prior Entry. Currently, the following code is always generated.
43267: ------------------------------------------------------------------------------------------------
43268: -- No ValidateCurrentLine for business flow method of Prior Entry
43269:
43270: ------------------------------------------------------------------------------------
43271: -- 4219869 Business Flow
43272: -- Populated credit and debit amounts -- Need to generate this within IF
43273: ------------------------------------------------------------------------------------
43274: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
43275:
43276: ----------------------------------------------------------------------------------
43277: -- 4219869 Business Flow
43278: -- Update journal entry status -- Need to generate this within IF
43302: -- To allow MPA report to determine if it should generate report process
43303: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
43304: ------------------------------------------------------------------------------------------
43305:
43306: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
43307: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
43308:
43309: --
43310: -- Update the line information that should be overwritten
43303: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
43304: ------------------------------------------------------------------------------------------
43305:
43306: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
43307: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
43308:
43309: --
43310: -- Update the line information that should be overwritten
43311: --
43308:
43309: --
43310: -- Update the line information that should be overwritten
43311: --
43312: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
43313: p_header_num => 1);
43314: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
43315:
43316: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
43310: -- Update the line information that should be overwritten
43311: --
43312: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
43313: p_header_num => 1);
43314: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
43315:
43316: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
43317:
43318: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
43312: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
43313: p_header_num => 1);
43314: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
43315:
43316: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
43317:
43318: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
43319: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
43320: END IF;
43315:
43316: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
43317:
43318: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
43319: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
43320: END IF;
43321:
43322: --
43323: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
43322: --
43323: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
43324: --
43325: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
43326: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
43327: ELSE
43328: ---------------------------------------------------------------------------------------------------
43329: -- 4262811a Switch Sign
43330: ---------------------------------------------------------------------------------------------------
43327: ELSE
43328: ---------------------------------------------------------------------------------------------------
43329: -- 4262811a Switch Sign
43330: ---------------------------------------------------------------------------------------------------
43331: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
43332: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43333: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43334: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43335: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43328: ---------------------------------------------------------------------------------------------------
43329: -- 4262811a Switch Sign
43330: ---------------------------------------------------------------------------------------------------
43331: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
43332: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43333: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43334: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43335: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43336: -- 5132302
43329: -- 4262811a Switch Sign
43330: ---------------------------------------------------------------------------------------------------
43331: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
43332: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43333: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43334: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43335: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43336: -- 5132302
43337: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
43330: ---------------------------------------------------------------------------------------------------
43331: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
43332: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43333: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43334: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43335: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43336: -- 5132302
43337: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
43338: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43331: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
43332: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43333: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43334: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43335: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43336: -- 5132302
43337: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
43338: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43339:
43333: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43334: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43335: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43336: -- 5132302
43337: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
43338: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43339:
43340: END IF;
43341:
43334: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43335: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43336: -- 5132302
43337: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
43338: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43339:
43340: END IF;
43341:
43342: -- 4955764
43339:
43340: END IF;
43341:
43342: -- 4955764
43343: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
43344: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
43345:
43346:
43347: XLA_AE_LINES_PKG.ValidateCurrentLine;
43343: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
43344: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
43345:
43346:
43347: XLA_AE_LINES_PKG.ValidateCurrentLine;
43348: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
43349:
43350: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
43351: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
43344: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
43345:
43346:
43347: XLA_AE_LINES_PKG.ValidateCurrentLine;
43348: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
43349:
43350: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
43351: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
43352: ,p_balance_type_code => l_balance_type_code);
43493: --
43494: -- bulk performance
43495: --
43496: l_balance_type_code VARCHAR2(1);
43497: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
43498: l_log_module VARCHAR2(240);
43499:
43500: --
43501: -- Upgrade strategy
43598: ') = 'M'
43599: THEN
43600:
43601: --
43602: XLA_AE_LINES_PKG.SetNewLine;
43603:
43604: p_balance_type_code := l_balance_type_code;
43605: -- set the flag so later we will know whether the gain loss line needs to be created
43606:
43610:
43611: --
43612: -- bulk performance
43613: --
43614: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
43615: p_header_num => 0); -- 4262811
43616: --
43617: -- set accounting line options
43618: --
43615: p_header_num => 0); -- 4262811
43616: --
43617: -- set accounting line options
43618: --
43619: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
43620: p_natural_side_code => 'C'
43621: , p_gain_or_loss_flag => 'N'
43622: , p_gl_transfer_mode_code => 'S'
43623: , p_acct_entry_type_code => 'E'
43629: --
43630: --
43631: -- set accounting line type info
43632: --
43633: xla_ae_lines_pkg.SetAcctLineType
43634: (p_component_type => l_component_type
43635: ,p_event_type_code => l_event_type_code
43636: ,p_line_definition_owner_code => l_line_definition_owner_code
43637: ,p_line_definition_code => l_line_definition_code
43643: ,p_event_class_code => l_event_class_code);
43644: --
43645: -- set accounting class
43646: --
43647: xla_ae_lines_pkg.SetAcctClass(
43648: p_accounting_class_code => 'REQUISITION'
43649: , p_ae_header_id => l_ae_header_id
43650: );
43651:
43651:
43652: --
43653: -- set rounding class
43654: --
43655: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
43656: 'REQUISITION';
43657:
43658: --
43659: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
43655: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
43656: 'REQUISITION';
43657:
43658: --
43659: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
43660: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
43661: --
43662: -- bulk performance
43663: --
43656: 'REQUISITION';
43657:
43658: --
43659: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
43660: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
43661: --
43662: -- bulk performance
43663: --
43664: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
43660: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
43661: --
43662: -- bulk performance
43663: --
43664: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
43665:
43666: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
43667: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
43668:
43662: -- bulk performance
43663: --
43664: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
43665:
43666: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
43667: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
43668:
43669: -- 4955764
43670: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
43666: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
43667: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
43668:
43669: -- 4955764
43670: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
43671: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
43672:
43673: -- 4458381 Public Sector Enh
43674:
43750: l_rec_acct_attrs.array_num_value(30) := p_source_78;
43751: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
43752: l_rec_acct_attrs.array_num_value(31) := p_source_78;
43753:
43754: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
43755: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
43756:
43757: ---------------------------------------------------------------------------------------------------------------
43758: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
43751: l_rec_acct_attrs.array_acct_attr_code(31) := 'UPG_DR_ENC_TYPE_ID';
43752: l_rec_acct_attrs.array_num_value(31) := p_source_78;
43753:
43754: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
43755: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
43756:
43757: ---------------------------------------------------------------------------------------------------------------
43758: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
43759: ---------------------------------------------------------------------------------------------------------------
43754: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
43755: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
43756:
43757: ---------------------------------------------------------------------------------------------------------------
43758: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
43759: ---------------------------------------------------------------------------------------------------------------
43760: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
43761:
43762: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43756:
43757: ---------------------------------------------------------------------------------------------------------------
43758: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
43759: ---------------------------------------------------------------------------------------------------------------
43760: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
43761:
43762: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43763: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43764:
43758: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
43759: ---------------------------------------------------------------------------------------------------------------
43760: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
43761:
43762: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43763: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43764:
43765: IF xla_accounting_cache_pkg.GetValueChar
43766: (p_source_code => 'LEDGER_CATEGORY_CODE'
43759: ---------------------------------------------------------------------------------------------------------------
43760: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
43761:
43762: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43763: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43764:
43765: IF xla_accounting_cache_pkg.GetValueChar
43766: (p_source_code => 'LEDGER_CATEGORY_CODE'
43767: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
43770: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
43771: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
43772: )
43773: THEN
43774: xla_ae_lines_pkg.BflowUpgEntry
43775: (p_business_method_code => l_bflow_method_code
43776: ,p_business_class_code => l_bflow_class_code
43777: ,p_balance_type => l_balance_type_code);
43778: ELSE
43776: ,p_business_class_code => l_bflow_class_code
43777: ,p_balance_type => l_balance_type_code);
43778: ELSE
43779: NULL;
43780: XLA_AE_LINES_PKG.business_flow_validation(
43781: p_business_method_code => l_bflow_method_code
43782: ,p_business_class_code => l_bflow_class_code
43783: ,p_inherit_description_flag => l_inherit_desc_flag);
43784: END IF;
43823: xla_accounting_err_pkg.build_message
43824: (p_appli_s_name => 'XLA'
43825: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
43826: ,p_token_1 => 'LINE_NUMBER'
43827: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
43828: ,p_token_2 => 'LINE_TYPE_NAME'
43829: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
43830: l_component_type
43831: ,l_component_code
43859: --
43860: --
43861: ------------------------------------------------------------------------------------------------
43862: -- 4219869 Business Flow
43863: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
43864: -- Prior Entry. Currently, the following code is always generated.
43865: ------------------------------------------------------------------------------------------------
43866: -- No ValidateCurrentLine for business flow method of Prior Entry
43867:
43868: ------------------------------------------------------------------------------------
43869: -- 4219869 Business Flow
43870: -- Populated credit and debit amounts -- Need to generate this within IF
43871: ------------------------------------------------------------------------------------
43872: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
43873:
43874: ----------------------------------------------------------------------------------
43875: -- 4219869 Business Flow
43876: -- Update journal entry status -- Need to generate this within IF
43900: -- To allow MPA report to determine if it should generate report process
43901: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
43902: ------------------------------------------------------------------------------------------
43903:
43904: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
43905: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
43906:
43907: --
43908: -- Update the line information that should be overwritten
43901: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
43902: ------------------------------------------------------------------------------------------
43903:
43904: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
43905: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
43906:
43907: --
43908: -- Update the line information that should be overwritten
43909: --
43906:
43907: --
43908: -- Update the line information that should be overwritten
43909: --
43910: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
43911: p_header_num => 1);
43912: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
43913:
43914: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
43908: -- Update the line information that should be overwritten
43909: --
43910: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
43911: p_header_num => 1);
43912: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
43913:
43914: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
43915:
43916: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
43910: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
43911: p_header_num => 1);
43912: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
43913:
43914: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
43915:
43916: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
43917: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
43918: END IF;
43913:
43914: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
43915:
43916: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
43917: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
43918: END IF;
43919:
43920: --
43921: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
43920: --
43921: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
43922: --
43923: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
43924: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
43925: ELSE
43926: ---------------------------------------------------------------------------------------------------
43927: -- 4262811a Switch Sign
43928: ---------------------------------------------------------------------------------------------------
43925: ELSE
43926: ---------------------------------------------------------------------------------------------------
43927: -- 4262811a Switch Sign
43928: ---------------------------------------------------------------------------------------------------
43929: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
43930: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43931: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43932: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43933: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43926: ---------------------------------------------------------------------------------------------------
43927: -- 4262811a Switch Sign
43928: ---------------------------------------------------------------------------------------------------
43929: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
43930: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43931: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43932: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43933: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43934: -- 5132302
43927: -- 4262811a Switch Sign
43928: ---------------------------------------------------------------------------------------------------
43929: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
43930: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43931: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43932: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43933: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43934: -- 5132302
43935: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
43928: ---------------------------------------------------------------------------------------------------
43929: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
43930: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43931: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43932: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43933: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43934: -- 5132302
43935: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
43936: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43929: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
43930: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43931: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43932: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43933: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43934: -- 5132302
43935: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
43936: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43937:
43931: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43932: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43933: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43934: -- 5132302
43935: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
43936: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43937:
43938: END IF;
43939:
43932: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43933: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43934: -- 5132302
43935: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
43936: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43937:
43938: END IF;
43939:
43940: -- 4955764
43937:
43938: END IF;
43939:
43940: -- 4955764
43941: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
43942: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
43943:
43944:
43945: XLA_AE_LINES_PKG.ValidateCurrentLine;
43941: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
43942: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
43943:
43944:
43945: XLA_AE_LINES_PKG.ValidateCurrentLine;
43946: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
43947:
43948: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
43949: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
43942: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
43943:
43944:
43945: XLA_AE_LINES_PKG.ValidateCurrentLine;
43946: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
43947:
43948: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
43949: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
43950: ,p_balance_type_code => l_balance_type_code);
44085: --
44086: -- bulk performance
44087: --
44088: l_balance_type_code VARCHAR2(1);
44089: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
44090: l_log_module VARCHAR2(240);
44091:
44092: --
44093: -- Upgrade strategy
44158: ') = 'REQ_CANCELLED'
44159: THEN
44160:
44161: --
44162: XLA_AE_LINES_PKG.SetNewLine;
44163:
44164: p_balance_type_code := l_balance_type_code;
44165: -- set the flag so later we will know whether the gain loss line needs to be created
44166:
44170:
44171: --
44172: -- bulk performance
44173: --
44174: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
44175: p_header_num => 0); -- 4262811
44176: --
44177: -- set accounting line options
44178: --
44175: p_header_num => 0); -- 4262811
44176: --
44177: -- set accounting line options
44178: --
44179: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
44180: p_natural_side_code => 'D'
44181: , p_gain_or_loss_flag => 'N'
44182: , p_gl_transfer_mode_code => 'S'
44183: , p_acct_entry_type_code => 'E'
44189: --
44190: --
44191: -- set accounting line type info
44192: --
44193: xla_ae_lines_pkg.SetAcctLineType
44194: (p_component_type => l_component_type
44195: ,p_event_type_code => l_event_type_code
44196: ,p_line_definition_owner_code => l_line_definition_owner_code
44197: ,p_line_definition_code => l_line_definition_code
44203: ,p_event_class_code => l_event_class_code);
44204: --
44205: -- set accounting class
44206: --
44207: xla_ae_lines_pkg.SetAcctClass(
44208: p_accounting_class_code => 'REQUISITION'
44209: , p_ae_header_id => l_ae_header_id
44210: );
44211:
44211:
44212: --
44213: -- set rounding class
44214: --
44215: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
44216: 'REQUISITION';
44217:
44218: --
44219: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
44215: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
44216: 'REQUISITION';
44217:
44218: --
44219: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
44220: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
44221: --
44222: -- bulk performance
44223: --
44216: 'REQUISITION';
44217:
44218: --
44219: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
44220: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
44221: --
44222: -- bulk performance
44223: --
44224: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
44220: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
44221: --
44222: -- bulk performance
44223: --
44224: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
44225:
44226: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
44227: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
44228:
44222: -- bulk performance
44223: --
44224: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
44225:
44226: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
44227: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
44228:
44229: -- 4955764
44230: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
44226: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
44227: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
44228:
44229: -- 4955764
44230: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
44231: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
44232:
44233: -- 4458381 Public Sector Enh
44234:
44306: l_rec_acct_attrs.array_num_value(28) := p_source_78;
44307: l_rec_acct_attrs.array_acct_attr_code(29) := 'UPG_DR_ENC_TYPE_ID';
44308: l_rec_acct_attrs.array_num_value(29) := p_source_78;
44309:
44310: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
44311: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
44312:
44313: ---------------------------------------------------------------------------------------------------------------
44314: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
44307: l_rec_acct_attrs.array_acct_attr_code(29) := 'UPG_DR_ENC_TYPE_ID';
44308: l_rec_acct_attrs.array_num_value(29) := p_source_78;
44309:
44310: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
44311: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
44312:
44313: ---------------------------------------------------------------------------------------------------------------
44314: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
44315: ---------------------------------------------------------------------------------------------------------------
44310: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
44311: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
44312:
44313: ---------------------------------------------------------------------------------------------------------------
44314: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
44315: ---------------------------------------------------------------------------------------------------------------
44316: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
44317:
44318: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
44312:
44313: ---------------------------------------------------------------------------------------------------------------
44314: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
44315: ---------------------------------------------------------------------------------------------------------------
44316: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
44317:
44318: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
44319: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
44320:
44314: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
44315: ---------------------------------------------------------------------------------------------------------------
44316: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
44317:
44318: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
44319: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
44320:
44321: IF xla_accounting_cache_pkg.GetValueChar
44322: (p_source_code => 'LEDGER_CATEGORY_CODE'
44315: ---------------------------------------------------------------------------------------------------------------
44316: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
44317:
44318: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
44319: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
44320:
44321: IF xla_accounting_cache_pkg.GetValueChar
44322: (p_source_code => 'LEDGER_CATEGORY_CODE'
44323: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
44326: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
44327: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
44328: )
44329: THEN
44330: xla_ae_lines_pkg.BflowUpgEntry
44331: (p_business_method_code => l_bflow_method_code
44332: ,p_business_class_code => l_bflow_class_code
44333: ,p_balance_type => l_balance_type_code);
44334: ELSE
44332: ,p_business_class_code => l_bflow_class_code
44333: ,p_balance_type => l_balance_type_code);
44334: ELSE
44335: NULL;
44336: XLA_AE_LINES_PKG.business_flow_validation(
44337: p_business_method_code => l_bflow_method_code
44338: ,p_business_class_code => l_bflow_class_code
44339: ,p_inherit_description_flag => l_inherit_desc_flag);
44340: END IF;
44379: xla_accounting_err_pkg.build_message
44380: (p_appli_s_name => 'XLA'
44381: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
44382: ,p_token_1 => 'LINE_NUMBER'
44383: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
44384: ,p_token_2 => 'LINE_TYPE_NAME'
44385: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
44386: l_component_type
44387: ,l_component_code
44415: --
44416: --
44417: ------------------------------------------------------------------------------------------------
44418: -- 4219869 Business Flow
44419: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
44420: -- Prior Entry. Currently, the following code is always generated.
44421: ------------------------------------------------------------------------------------------------
44422: -- No ValidateCurrentLine for business flow method of Prior Entry
44423:
44424: ------------------------------------------------------------------------------------
44425: -- 4219869 Business Flow
44426: -- Populated credit and debit amounts -- Need to generate this within IF
44427: ------------------------------------------------------------------------------------
44428: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
44429:
44430: ----------------------------------------------------------------------------------
44431: -- 4219869 Business Flow
44432: -- Update journal entry status -- Need to generate this within IF
44456: -- To allow MPA report to determine if it should generate report process
44457: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
44458: ------------------------------------------------------------------------------------------
44459:
44460: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
44461: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
44462:
44463: --
44464: -- Update the line information that should be overwritten
44457: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
44458: ------------------------------------------------------------------------------------------
44459:
44460: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
44461: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
44462:
44463: --
44464: -- Update the line information that should be overwritten
44465: --
44462:
44463: --
44464: -- Update the line information that should be overwritten
44465: --
44466: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
44467: p_header_num => 1);
44468: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
44469:
44470: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
44464: -- Update the line information that should be overwritten
44465: --
44466: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
44467: p_header_num => 1);
44468: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
44469:
44470: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
44471:
44472: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
44466: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
44467: p_header_num => 1);
44468: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
44469:
44470: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
44471:
44472: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
44473: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
44474: END IF;
44469:
44470: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
44471:
44472: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
44473: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
44474: END IF;
44475:
44476: --
44477: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
44476: --
44477: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
44478: --
44479: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
44480: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
44481: ELSE
44482: ---------------------------------------------------------------------------------------------------
44483: -- 4262811a Switch Sign
44484: ---------------------------------------------------------------------------------------------------
44481: ELSE
44482: ---------------------------------------------------------------------------------------------------
44483: -- 4262811a Switch Sign
44484: ---------------------------------------------------------------------------------------------------
44485: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
44486: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44487: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44488: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44489: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44482: ---------------------------------------------------------------------------------------------------
44483: -- 4262811a Switch Sign
44484: ---------------------------------------------------------------------------------------------------
44485: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
44486: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44487: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44488: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44489: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44490: -- 5132302
44483: -- 4262811a Switch Sign
44484: ---------------------------------------------------------------------------------------------------
44485: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
44486: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44487: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44488: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44489: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44490: -- 5132302
44491: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
44484: ---------------------------------------------------------------------------------------------------
44485: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
44486: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44487: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44488: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44489: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44490: -- 5132302
44491: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
44492: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44485: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
44486: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44487: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44488: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44489: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44490: -- 5132302
44491: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
44492: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44493:
44487: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44488: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44489: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44490: -- 5132302
44491: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
44492: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44493:
44494: END IF;
44495:
44488: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44489: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44490: -- 5132302
44491: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
44492: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44493:
44494: END IF;
44495:
44496: -- 4955764
44493:
44494: END IF;
44495:
44496: -- 4955764
44497: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
44498: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
44499:
44500:
44501: XLA_AE_LINES_PKG.ValidateCurrentLine;
44497: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
44498: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
44499:
44500:
44501: XLA_AE_LINES_PKG.ValidateCurrentLine;
44502: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
44503:
44504: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
44505: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
44498: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
44499:
44500:
44501: XLA_AE_LINES_PKG.ValidateCurrentLine;
44502: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
44503:
44504: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
44505: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
44506: ,p_balance_type_code => l_balance_type_code);
44676: --
44677: -- bulk performance
44678: --
44679: l_balance_type_code VARCHAR2(1);
44680: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
44681: l_log_module VARCHAR2(240);
44682:
44683: --
44684: -- Upgrade strategy
44780: ') = 'S'
44781: THEN
44782:
44783: --
44784: XLA_AE_LINES_PKG.SetNewLine;
44785:
44786: p_balance_type_code := l_balance_type_code;
44787: -- set the flag so later we will know whether the gain loss line needs to be created
44788:
44792:
44793: --
44794: -- bulk performance
44795: --
44796: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
44797: p_header_num => 0); -- 4262811
44798: --
44799: -- set accounting line options
44800: --
44797: p_header_num => 0); -- 4262811
44798: --
44799: -- set accounting line options
44800: --
44801: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
44802: p_natural_side_code => 'C'
44803: , p_gain_or_loss_flag => 'N'
44804: , p_gl_transfer_mode_code => 'S'
44805: , p_acct_entry_type_code => 'E'
44811: --
44812: --
44813: -- set accounting line type info
44814: --
44815: xla_ae_lines_pkg.SetAcctLineType
44816: (p_component_type => l_component_type
44817: ,p_event_type_code => l_event_type_code
44818: ,p_line_definition_owner_code => l_line_definition_owner_code
44819: ,p_line_definition_code => l_line_definition_code
44825: ,p_event_class_code => l_event_class_code);
44826: --
44827: -- set accounting class
44828: --
44829: xla_ae_lines_pkg.SetAcctClass(
44830: p_accounting_class_code => 'PO_PA_BURDENED'
44831: , p_ae_header_id => l_ae_header_id
44832: );
44833:
44833:
44834: --
44835: -- set rounding class
44836: --
44837: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
44838: 'PO_PA_BURDENED';
44839:
44840: --
44841: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
44837: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
44838: 'PO_PA_BURDENED';
44839:
44840: --
44841: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
44842: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
44843: --
44844: -- bulk performance
44845: --
44838: 'PO_PA_BURDENED';
44839:
44840: --
44841: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
44842: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
44843: --
44844: -- bulk performance
44845: --
44846: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
44842: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
44843: --
44844: -- bulk performance
44845: --
44846: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
44847:
44848: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
44849: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
44850:
44844: -- bulk performance
44845: --
44846: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
44847:
44848: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
44849: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
44850:
44851: -- 4955764
44852: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
44848: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
44849: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
44850:
44851: -- 4955764
44852: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
44853: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
44854:
44855: -- 4458381 Public Sector Enh
44856:
44928: l_rec_acct_attrs.array_num_value(33) := p_source_39;
44929: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
44930: l_rec_acct_attrs.array_num_value(34) := p_source_40;
44931:
44932: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
44933: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
44934:
44935: ---------------------------------------------------------------------------------------------------------------
44936: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
44929: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
44930: l_rec_acct_attrs.array_num_value(34) := p_source_40;
44931:
44932: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
44933: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
44934:
44935: ---------------------------------------------------------------------------------------------------------------
44936: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
44937: ---------------------------------------------------------------------------------------------------------------
44932: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
44933: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
44934:
44935: ---------------------------------------------------------------------------------------------------------------
44936: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
44937: ---------------------------------------------------------------------------------------------------------------
44938: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
44939:
44940: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
44934:
44935: ---------------------------------------------------------------------------------------------------------------
44936: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
44937: ---------------------------------------------------------------------------------------------------------------
44938: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
44939:
44940: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
44941: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
44942:
44936: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
44937: ---------------------------------------------------------------------------------------------------------------
44938: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
44939:
44940: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
44941: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
44942:
44943: IF xla_accounting_cache_pkg.GetValueChar
44944: (p_source_code => 'LEDGER_CATEGORY_CODE'
44937: ---------------------------------------------------------------------------------------------------------------
44938: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
44939:
44940: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
44941: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
44942:
44943: IF xla_accounting_cache_pkg.GetValueChar
44944: (p_source_code => 'LEDGER_CATEGORY_CODE'
44945: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
44948: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
44949: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
44950: )
44951: THEN
44952: xla_ae_lines_pkg.BflowUpgEntry
44953: (p_business_method_code => l_bflow_method_code
44954: ,p_business_class_code => l_bflow_class_code
44955: ,p_balance_type => l_balance_type_code);
44956: ELSE
44954: ,p_business_class_code => l_bflow_class_code
44955: ,p_balance_type => l_balance_type_code);
44956: ELSE
44957: NULL;
44958: XLA_AE_LINES_PKG.business_flow_validation(
44959: p_business_method_code => l_bflow_method_code
44960: ,p_business_class_code => l_bflow_class_code
44961: ,p_inherit_description_flag => l_inherit_desc_flag);
44962: END IF;
44968: --
44969: -- call description
44970: --
44971:
44972: xla_ae_lines_pkg.SetLineDescription(
44973: p_ae_header_id => l_ae_header_id
44974: ,p_description => Description_2 (
44975: p_application_id => p_application_id
44976: , p_ae_header_id => l_ae_header_id
45014: xla_accounting_err_pkg.build_message
45015: (p_appli_s_name => 'XLA'
45016: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
45017: ,p_token_1 => 'LINE_NUMBER'
45018: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
45019: ,p_token_2 => 'LINE_TYPE_NAME'
45020: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
45021: l_component_type
45022: ,l_component_code
45050: --
45051: --
45052: ------------------------------------------------------------------------------------------------
45053: -- 4219869 Business Flow
45054: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
45055: -- Prior Entry. Currently, the following code is always generated.
45056: ------------------------------------------------------------------------------------------------
45057: -- No ValidateCurrentLine for business flow method of Prior Entry
45058:
45059: ------------------------------------------------------------------------------------
45060: -- 4219869 Business Flow
45061: -- Populated credit and debit amounts -- Need to generate this within IF
45062: ------------------------------------------------------------------------------------
45063: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
45064:
45065: ----------------------------------------------------------------------------------
45066: -- 4219869 Business Flow
45067: -- Update journal entry status -- Need to generate this within IF
45091: -- To allow MPA report to determine if it should generate report process
45092: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
45093: ------------------------------------------------------------------------------------------
45094:
45095: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
45096: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
45097:
45098: --
45099: -- Update the line information that should be overwritten
45092: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
45093: ------------------------------------------------------------------------------------------
45094:
45095: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
45096: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
45097:
45098: --
45099: -- Update the line information that should be overwritten
45100: --
45097:
45098: --
45099: -- Update the line information that should be overwritten
45100: --
45101: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
45102: p_header_num => 1);
45103: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
45104:
45105: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
45099: -- Update the line information that should be overwritten
45100: --
45101: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
45102: p_header_num => 1);
45103: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
45104:
45105: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
45106:
45107: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
45101: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
45102: p_header_num => 1);
45103: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
45104:
45105: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
45106:
45107: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
45108: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
45109: END IF;
45104:
45105: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
45106:
45107: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
45108: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
45109: END IF;
45110:
45111: --
45112: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
45111: --
45112: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
45113: --
45114: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
45115: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
45116: ELSE
45117: ---------------------------------------------------------------------------------------------------
45118: -- 4262811a Switch Sign
45119: ---------------------------------------------------------------------------------------------------
45116: ELSE
45117: ---------------------------------------------------------------------------------------------------
45118: -- 4262811a Switch Sign
45119: ---------------------------------------------------------------------------------------------------
45120: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
45121: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45122: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45123: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45124: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45117: ---------------------------------------------------------------------------------------------------
45118: -- 4262811a Switch Sign
45119: ---------------------------------------------------------------------------------------------------
45120: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
45121: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45122: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45123: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45124: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45125: -- 5132302
45118: -- 4262811a Switch Sign
45119: ---------------------------------------------------------------------------------------------------
45120: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
45121: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45122: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45123: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45124: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45125: -- 5132302
45126: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
45119: ---------------------------------------------------------------------------------------------------
45120: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
45121: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45122: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45123: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45124: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45125: -- 5132302
45126: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
45127: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45120: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
45121: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45122: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45123: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45124: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45125: -- 5132302
45126: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
45127: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45128:
45122: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45123: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45124: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45125: -- 5132302
45126: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
45127: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45128:
45129: END IF;
45130:
45123: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45124: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45125: -- 5132302
45126: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
45127: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45128:
45129: END IF;
45130:
45131: -- 4955764
45128:
45129: END IF;
45130:
45131: -- 4955764
45132: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
45133: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
45134:
45135:
45136: XLA_AE_LINES_PKG.ValidateCurrentLine;
45132: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
45133: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
45134:
45135:
45136: XLA_AE_LINES_PKG.ValidateCurrentLine;
45137: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
45138:
45139: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
45140: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
45133: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
45134:
45135:
45136: XLA_AE_LINES_PKG.ValidateCurrentLine;
45137: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
45138:
45139: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
45140: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
45141: ,p_balance_type_code => l_balance_type_code);
45313: --
45314: -- bulk performance
45315: --
45316: l_balance_type_code VARCHAR2(1);
45317: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
45318: l_log_module VARCHAR2(240);
45319:
45320: --
45321: -- Upgrade strategy
45417: ') = 'S'
45418: THEN
45419:
45420: --
45421: XLA_AE_LINES_PKG.SetNewLine;
45422:
45423: p_balance_type_code := l_balance_type_code;
45424: -- set the flag so later we will know whether the gain loss line needs to be created
45425:
45429:
45430: --
45431: -- bulk performance
45432: --
45433: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
45434: p_header_num => 0); -- 4262811
45435: --
45436: -- set accounting line options
45437: --
45434: p_header_num => 0); -- 4262811
45435: --
45436: -- set accounting line options
45437: --
45438: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
45439: p_natural_side_code => 'C'
45440: , p_gain_or_loss_flag => 'N'
45441: , p_gl_transfer_mode_code => 'S'
45442: , p_acct_entry_type_code => 'E'
45448: --
45449: --
45450: -- set accounting line type info
45451: --
45452: xla_ae_lines_pkg.SetAcctLineType
45453: (p_component_type => l_component_type
45454: ,p_event_type_code => l_event_type_code
45455: ,p_line_definition_owner_code => l_line_definition_owner_code
45456: ,p_line_definition_code => l_line_definition_code
45462: ,p_event_class_code => l_event_class_code);
45463: --
45464: -- set accounting class
45465: --
45466: xla_ae_lines_pkg.SetAcctClass(
45467: p_accounting_class_code => 'PO_PA_BURDENED'
45468: , p_ae_header_id => l_ae_header_id
45469: );
45470:
45470:
45471: --
45472: -- set rounding class
45473: --
45474: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
45475: 'PO_PA_BURDENED';
45476:
45477: --
45478: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
45474: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
45475: 'PO_PA_BURDENED';
45476:
45477: --
45478: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
45479: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
45480: --
45481: -- bulk performance
45482: --
45475: 'PO_PA_BURDENED';
45476:
45477: --
45478: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
45479: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
45480: --
45481: -- bulk performance
45482: --
45483: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
45479: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
45480: --
45481: -- bulk performance
45482: --
45483: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
45484:
45485: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
45486: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
45487:
45481: -- bulk performance
45482: --
45483: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
45484:
45485: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
45486: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
45487:
45488: -- 4955764
45489: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
45485: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
45486: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
45487:
45488: -- 4955764
45489: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
45490: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
45491:
45492: -- 4458381 Public Sector Enh
45493:
45567: l_rec_acct_attrs.array_num_value(34) := p_source_39;
45568: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
45569: l_rec_acct_attrs.array_num_value(35) := p_source_40;
45570:
45571: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
45572: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
45573:
45574: ---------------------------------------------------------------------------------------------------------------
45575: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
45568: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
45569: l_rec_acct_attrs.array_num_value(35) := p_source_40;
45570:
45571: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
45572: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
45573:
45574: ---------------------------------------------------------------------------------------------------------------
45575: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
45576: ---------------------------------------------------------------------------------------------------------------
45571: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
45572: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
45573:
45574: ---------------------------------------------------------------------------------------------------------------
45575: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
45576: ---------------------------------------------------------------------------------------------------------------
45577: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
45578:
45579: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
45573:
45574: ---------------------------------------------------------------------------------------------------------------
45575: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
45576: ---------------------------------------------------------------------------------------------------------------
45577: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
45578:
45579: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
45580: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
45581:
45575: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
45576: ---------------------------------------------------------------------------------------------------------------
45577: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
45578:
45579: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
45580: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
45581:
45582: IF xla_accounting_cache_pkg.GetValueChar
45583: (p_source_code => 'LEDGER_CATEGORY_CODE'
45576: ---------------------------------------------------------------------------------------------------------------
45577: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
45578:
45579: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
45580: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
45581:
45582: IF xla_accounting_cache_pkg.GetValueChar
45583: (p_source_code => 'LEDGER_CATEGORY_CODE'
45584: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
45587: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
45588: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
45589: )
45590: THEN
45591: xla_ae_lines_pkg.BflowUpgEntry
45592: (p_business_method_code => l_bflow_method_code
45593: ,p_business_class_code => l_bflow_class_code
45594: ,p_balance_type => l_balance_type_code);
45595: ELSE
45593: ,p_business_class_code => l_bflow_class_code
45594: ,p_balance_type => l_balance_type_code);
45595: ELSE
45596: NULL;
45597: XLA_AE_LINES_PKG.business_flow_validation(
45598: p_business_method_code => l_bflow_method_code
45599: ,p_business_class_code => l_bflow_class_code
45600: ,p_inherit_description_flag => l_inherit_desc_flag);
45601: END IF;
45607: --
45608: -- call description
45609: --
45610:
45611: xla_ae_lines_pkg.SetLineDescription(
45612: p_ae_header_id => l_ae_header_id
45613: ,p_description => Description_2 (
45614: p_application_id => p_application_id
45615: , p_ae_header_id => l_ae_header_id
45653: xla_accounting_err_pkg.build_message
45654: (p_appli_s_name => 'XLA'
45655: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
45656: ,p_token_1 => 'LINE_NUMBER'
45657: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
45658: ,p_token_2 => 'LINE_TYPE_NAME'
45659: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
45660: l_component_type
45661: ,l_component_code
45689: --
45690: --
45691: ------------------------------------------------------------------------------------------------
45692: -- 4219869 Business Flow
45693: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
45694: -- Prior Entry. Currently, the following code is always generated.
45695: ------------------------------------------------------------------------------------------------
45696: -- No ValidateCurrentLine for business flow method of Prior Entry
45697:
45698: ------------------------------------------------------------------------------------
45699: -- 4219869 Business Flow
45700: -- Populated credit and debit amounts -- Need to generate this within IF
45701: ------------------------------------------------------------------------------------
45702: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
45703:
45704: ----------------------------------------------------------------------------------
45705: -- 4219869 Business Flow
45706: -- Update journal entry status -- Need to generate this within IF
45730: -- To allow MPA report to determine if it should generate report process
45731: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
45732: ------------------------------------------------------------------------------------------
45733:
45734: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
45735: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
45736:
45737: --
45738: -- Update the line information that should be overwritten
45731: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
45732: ------------------------------------------------------------------------------------------
45733:
45734: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
45735: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
45736:
45737: --
45738: -- Update the line information that should be overwritten
45739: --
45736:
45737: --
45738: -- Update the line information that should be overwritten
45739: --
45740: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
45741: p_header_num => 1);
45742: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
45743:
45744: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
45738: -- Update the line information that should be overwritten
45739: --
45740: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
45741: p_header_num => 1);
45742: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
45743:
45744: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
45745:
45746: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
45740: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
45741: p_header_num => 1);
45742: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
45743:
45744: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
45745:
45746: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
45747: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
45748: END IF;
45743:
45744: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
45745:
45746: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
45747: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
45748: END IF;
45749:
45750: --
45751: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
45750: --
45751: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
45752: --
45753: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
45754: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
45755: ELSE
45756: ---------------------------------------------------------------------------------------------------
45757: -- 4262811a Switch Sign
45758: ---------------------------------------------------------------------------------------------------
45755: ELSE
45756: ---------------------------------------------------------------------------------------------------
45757: -- 4262811a Switch Sign
45758: ---------------------------------------------------------------------------------------------------
45759: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
45760: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45761: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45762: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45763: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45756: ---------------------------------------------------------------------------------------------------
45757: -- 4262811a Switch Sign
45758: ---------------------------------------------------------------------------------------------------
45759: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
45760: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45761: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45762: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45763: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45764: -- 5132302
45757: -- 4262811a Switch Sign
45758: ---------------------------------------------------------------------------------------------------
45759: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
45760: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45761: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45762: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45763: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45764: -- 5132302
45765: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
45758: ---------------------------------------------------------------------------------------------------
45759: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
45760: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45761: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45762: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45763: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45764: -- 5132302
45765: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
45766: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45759: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
45760: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45761: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45762: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45763: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45764: -- 5132302
45765: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
45766: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45767:
45761: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45762: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45763: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45764: -- 5132302
45765: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
45766: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45767:
45768: END IF;
45769:
45762: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45763: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45764: -- 5132302
45765: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
45766: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45767:
45768: END IF;
45769:
45770: -- 4955764
45767:
45768: END IF;
45769:
45770: -- 4955764
45771: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
45772: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
45773:
45774:
45775: XLA_AE_LINES_PKG.ValidateCurrentLine;
45771: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
45772: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
45773:
45774:
45775: XLA_AE_LINES_PKG.ValidateCurrentLine;
45776: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
45777:
45778: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
45779: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
45772: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
45773:
45774:
45775: XLA_AE_LINES_PKG.ValidateCurrentLine;
45776: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
45777:
45778: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
45779: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
45780: ,p_balance_type_code => l_balance_type_code);
45952: --
45953: -- bulk performance
45954: --
45955: l_balance_type_code VARCHAR2(1);
45956: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
45957: l_log_module VARCHAR2(240);
45958:
45959: --
45960: -- Upgrade strategy
46063: ') = 'S'
46064: THEN
46065:
46066: --
46067: XLA_AE_LINES_PKG.SetNewLine;
46068:
46069: p_balance_type_code := l_balance_type_code;
46070: -- set the flag so later we will know whether the gain loss line needs to be created
46071:
46075:
46076: --
46077: -- bulk performance
46078: --
46079: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
46080: p_header_num => 0); -- 4262811
46081: --
46082: -- set accounting line options
46083: --
46080: p_header_num => 0); -- 4262811
46081: --
46082: -- set accounting line options
46083: --
46084: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
46085: p_natural_side_code => 'C'
46086: , p_gain_or_loss_flag => 'N'
46087: , p_gl_transfer_mode_code => 'S'
46088: , p_acct_entry_type_code => 'E'
46094: --
46095: --
46096: -- set accounting line type info
46097: --
46098: xla_ae_lines_pkg.SetAcctLineType
46099: (p_component_type => l_component_type
46100: ,p_event_type_code => l_event_type_code
46101: ,p_line_definition_owner_code => l_line_definition_owner_code
46102: ,p_line_definition_code => l_line_definition_code
46108: ,p_event_class_code => l_event_class_code);
46109: --
46110: -- set accounting class
46111: --
46112: xla_ae_lines_pkg.SetAcctClass(
46113: p_accounting_class_code => 'REQ_PA_BURDENED'
46114: , p_ae_header_id => l_ae_header_id
46115: );
46116:
46116:
46117: --
46118: -- set rounding class
46119: --
46120: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
46121: 'REQ_PA_BURDENED';
46122:
46123: --
46124: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
46120: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
46121: 'REQ_PA_BURDENED';
46122:
46123: --
46124: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
46125: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
46126: --
46127: -- bulk performance
46128: --
46121: 'REQ_PA_BURDENED';
46122:
46123: --
46124: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
46125: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
46126: --
46127: -- bulk performance
46128: --
46129: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
46125: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
46126: --
46127: -- bulk performance
46128: --
46129: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
46130:
46131: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
46132: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
46133:
46127: -- bulk performance
46128: --
46129: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
46130:
46131: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
46132: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
46133:
46134: -- 4955764
46135: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
46131: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
46132: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
46133:
46134: -- 4955764
46135: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
46136: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
46137:
46138: -- 4458381 Public Sector Enh
46139:
46213: l_rec_acct_attrs.array_num_value(34) := p_source_39;
46214: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
46215: l_rec_acct_attrs.array_num_value(35) := p_source_40;
46216:
46217: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
46218: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
46219:
46220: ---------------------------------------------------------------------------------------------------------------
46221: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
46214: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
46215: l_rec_acct_attrs.array_num_value(35) := p_source_40;
46216:
46217: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
46218: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
46219:
46220: ---------------------------------------------------------------------------------------------------------------
46221: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
46222: ---------------------------------------------------------------------------------------------------------------
46217: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
46218: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
46219:
46220: ---------------------------------------------------------------------------------------------------------------
46221: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
46222: ---------------------------------------------------------------------------------------------------------------
46223: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
46224:
46225: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
46219:
46220: ---------------------------------------------------------------------------------------------------------------
46221: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
46222: ---------------------------------------------------------------------------------------------------------------
46223: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
46224:
46225: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
46226: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
46227:
46221: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
46222: ---------------------------------------------------------------------------------------------------------------
46223: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
46224:
46225: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
46226: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
46227:
46228: IF xla_accounting_cache_pkg.GetValueChar
46229: (p_source_code => 'LEDGER_CATEGORY_CODE'
46222: ---------------------------------------------------------------------------------------------------------------
46223: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
46224:
46225: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
46226: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
46227:
46228: IF xla_accounting_cache_pkg.GetValueChar
46229: (p_source_code => 'LEDGER_CATEGORY_CODE'
46230: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
46233: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
46234: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
46235: )
46236: THEN
46237: xla_ae_lines_pkg.BflowUpgEntry
46238: (p_business_method_code => l_bflow_method_code
46239: ,p_business_class_code => l_bflow_class_code
46240: ,p_balance_type => l_balance_type_code);
46241: ELSE
46239: ,p_business_class_code => l_bflow_class_code
46240: ,p_balance_type => l_balance_type_code);
46241: ELSE
46242: NULL;
46243: XLA_AE_LINES_PKG.business_flow_validation(
46244: p_business_method_code => l_bflow_method_code
46245: ,p_business_class_code => l_bflow_class_code
46246: ,p_inherit_description_flag => l_inherit_desc_flag);
46247: END IF;
46253: --
46254: -- call description
46255: --
46256:
46257: xla_ae_lines_pkg.SetLineDescription(
46258: p_ae_header_id => l_ae_header_id
46259: ,p_description => Description_2 (
46260: p_application_id => p_application_id
46261: , p_ae_header_id => l_ae_header_id
46299: xla_accounting_err_pkg.build_message
46300: (p_appli_s_name => 'XLA'
46301: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
46302: ,p_token_1 => 'LINE_NUMBER'
46303: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
46304: ,p_token_2 => 'LINE_TYPE_NAME'
46305: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
46306: l_component_type
46307: ,l_component_code
46335: --
46336: --
46337: ------------------------------------------------------------------------------------------------
46338: -- 4219869 Business Flow
46339: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
46340: -- Prior Entry. Currently, the following code is always generated.
46341: ------------------------------------------------------------------------------------------------
46342: -- No ValidateCurrentLine for business flow method of Prior Entry
46343:
46344: ------------------------------------------------------------------------------------
46345: -- 4219869 Business Flow
46346: -- Populated credit and debit amounts -- Need to generate this within IF
46347: ------------------------------------------------------------------------------------
46348: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
46349:
46350: ----------------------------------------------------------------------------------
46351: -- 4219869 Business Flow
46352: -- Update journal entry status -- Need to generate this within IF
46376: -- To allow MPA report to determine if it should generate report process
46377: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
46378: ------------------------------------------------------------------------------------------
46379:
46380: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
46381: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
46382:
46383: --
46384: -- Update the line information that should be overwritten
46377: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
46378: ------------------------------------------------------------------------------------------
46379:
46380: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
46381: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
46382:
46383: --
46384: -- Update the line information that should be overwritten
46385: --
46382:
46383: --
46384: -- Update the line information that should be overwritten
46385: --
46386: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
46387: p_header_num => 1);
46388: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
46389:
46390: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
46384: -- Update the line information that should be overwritten
46385: --
46386: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
46387: p_header_num => 1);
46388: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
46389:
46390: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
46391:
46392: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
46386: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
46387: p_header_num => 1);
46388: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
46389:
46390: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
46391:
46392: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
46393: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
46394: END IF;
46389:
46390: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
46391:
46392: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
46393: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
46394: END IF;
46395:
46396: --
46397: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
46396: --
46397: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
46398: --
46399: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
46400: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
46401: ELSE
46402: ---------------------------------------------------------------------------------------------------
46403: -- 4262811a Switch Sign
46404: ---------------------------------------------------------------------------------------------------
46401: ELSE
46402: ---------------------------------------------------------------------------------------------------
46403: -- 4262811a Switch Sign
46404: ---------------------------------------------------------------------------------------------------
46405: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
46406: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46407: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46408: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46409: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46402: ---------------------------------------------------------------------------------------------------
46403: -- 4262811a Switch Sign
46404: ---------------------------------------------------------------------------------------------------
46405: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
46406: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46407: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46408: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46409: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46410: -- 5132302
46403: -- 4262811a Switch Sign
46404: ---------------------------------------------------------------------------------------------------
46405: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
46406: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46407: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46408: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46409: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46410: -- 5132302
46411: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
46404: ---------------------------------------------------------------------------------------------------
46405: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
46406: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46407: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46408: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46409: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46410: -- 5132302
46411: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
46412: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46405: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
46406: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46407: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46408: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46409: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46410: -- 5132302
46411: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
46412: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46413:
46407: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46408: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46409: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46410: -- 5132302
46411: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
46412: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46413:
46414: END IF;
46415:
46408: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46409: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46410: -- 5132302
46411: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
46412: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46413:
46414: END IF;
46415:
46416: -- 4955764
46413:
46414: END IF;
46415:
46416: -- 4955764
46417: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
46418: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
46419:
46420:
46421: XLA_AE_LINES_PKG.ValidateCurrentLine;
46417: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
46418: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
46419:
46420:
46421: XLA_AE_LINES_PKG.ValidateCurrentLine;
46422: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
46423:
46424: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
46425: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
46418: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
46419:
46420:
46421: XLA_AE_LINES_PKG.ValidateCurrentLine;
46422: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
46423:
46424: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
46425: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
46426: ,p_balance_type_code => l_balance_type_code);
46596: --
46597: -- bulk performance
46598: --
46599: l_balance_type_code VARCHAR2(1);
46600: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
46601: l_log_module VARCHAR2(240);
46602:
46603: --
46604: -- Upgrade strategy
46698: ') = 'D'
46699: THEN
46700:
46701: --
46702: XLA_AE_LINES_PKG.SetNewLine;
46703:
46704: p_balance_type_code := l_balance_type_code;
46705: -- set the flag so later we will know whether the gain loss line needs to be created
46706:
46710:
46711: --
46712: -- bulk performance
46713: --
46714: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
46715: p_header_num => 0); -- 4262811
46716: --
46717: -- set accounting line options
46718: --
46715: p_header_num => 0); -- 4262811
46716: --
46717: -- set accounting line options
46718: --
46719: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
46720: p_natural_side_code => 'C'
46721: , p_gain_or_loss_flag => 'N'
46722: , p_gl_transfer_mode_code => 'S'
46723: , p_acct_entry_type_code => 'E'
46729: --
46730: --
46731: -- set accounting line type info
46732: --
46733: xla_ae_lines_pkg.SetAcctLineType
46734: (p_component_type => l_component_type
46735: ,p_event_type_code => l_event_type_code
46736: ,p_line_definition_owner_code => l_line_definition_owner_code
46737: ,p_line_definition_code => l_line_definition_code
46743: ,p_event_class_code => l_event_class_code);
46744: --
46745: -- set accounting class
46746: --
46747: xla_ae_lines_pkg.SetAcctClass(
46748: p_accounting_class_code => 'PO_PA_BURDEN'
46749: , p_ae_header_id => l_ae_header_id
46750: );
46751:
46751:
46752: --
46753: -- set rounding class
46754: --
46755: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
46756: 'PO_PA_BURDEN';
46757:
46758: --
46759: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
46755: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
46756: 'PO_PA_BURDEN';
46757:
46758: --
46759: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
46760: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
46761: --
46762: -- bulk performance
46763: --
46756: 'PO_PA_BURDEN';
46757:
46758: --
46759: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
46760: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
46761: --
46762: -- bulk performance
46763: --
46764: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
46760: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
46761: --
46762: -- bulk performance
46763: --
46764: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
46765:
46766: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
46767: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
46768:
46762: -- bulk performance
46763: --
46764: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
46765:
46766: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
46767: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
46768:
46769: -- 4955764
46770: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
46766: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
46767: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
46768:
46769: -- 4955764
46770: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
46771: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
46772:
46773: -- 4458381 Public Sector Enh
46774:
46846: l_rec_acct_attrs.array_num_value(33) := p_source_39;
46847: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
46848: l_rec_acct_attrs.array_num_value(34) := p_source_40;
46849:
46850: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
46851: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
46852:
46853: ---------------------------------------------------------------------------------------------------------------
46854: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
46847: l_rec_acct_attrs.array_acct_attr_code(34) := 'UPG_DR_ENC_TYPE_ID';
46848: l_rec_acct_attrs.array_num_value(34) := p_source_40;
46849:
46850: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
46851: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
46852:
46853: ---------------------------------------------------------------------------------------------------------------
46854: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
46855: ---------------------------------------------------------------------------------------------------------------
46850: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
46851: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
46852:
46853: ---------------------------------------------------------------------------------------------------------------
46854: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
46855: ---------------------------------------------------------------------------------------------------------------
46856: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
46857:
46858: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
46852:
46853: ---------------------------------------------------------------------------------------------------------------
46854: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
46855: ---------------------------------------------------------------------------------------------------------------
46856: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
46857:
46858: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
46859: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
46860:
46854: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
46855: ---------------------------------------------------------------------------------------------------------------
46856: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
46857:
46858: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
46859: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
46860:
46861: IF xla_accounting_cache_pkg.GetValueChar
46862: (p_source_code => 'LEDGER_CATEGORY_CODE'
46855: ---------------------------------------------------------------------------------------------------------------
46856: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
46857:
46858: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
46859: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
46860:
46861: IF xla_accounting_cache_pkg.GetValueChar
46862: (p_source_code => 'LEDGER_CATEGORY_CODE'
46863: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
46866: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
46867: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
46868: )
46869: THEN
46870: xla_ae_lines_pkg.BflowUpgEntry
46871: (p_business_method_code => l_bflow_method_code
46872: ,p_business_class_code => l_bflow_class_code
46873: ,p_balance_type => l_balance_type_code);
46874: ELSE
46872: ,p_business_class_code => l_bflow_class_code
46873: ,p_balance_type => l_balance_type_code);
46874: ELSE
46875: NULL;
46876: XLA_AE_LINES_PKG.business_flow_validation(
46877: p_business_method_code => l_bflow_method_code
46878: ,p_business_class_code => l_bflow_class_code
46879: ,p_inherit_description_flag => l_inherit_desc_flag);
46880: END IF;
46886: --
46887: -- call description
46888: --
46889:
46890: xla_ae_lines_pkg.SetLineDescription(
46891: p_ae_header_id => l_ae_header_id
46892: ,p_description => Description_2 (
46893: p_application_id => p_application_id
46894: , p_ae_header_id => l_ae_header_id
46932: xla_accounting_err_pkg.build_message
46933: (p_appli_s_name => 'XLA'
46934: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
46935: ,p_token_1 => 'LINE_NUMBER'
46936: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
46937: ,p_token_2 => 'LINE_TYPE_NAME'
46938: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
46939: l_component_type
46940: ,l_component_code
46968: --
46969: --
46970: ------------------------------------------------------------------------------------------------
46971: -- 4219869 Business Flow
46972: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
46973: -- Prior Entry. Currently, the following code is always generated.
46974: ------------------------------------------------------------------------------------------------
46975: -- No ValidateCurrentLine for business flow method of Prior Entry
46976:
46977: ------------------------------------------------------------------------------------
46978: -- 4219869 Business Flow
46979: -- Populated credit and debit amounts -- Need to generate this within IF
46980: ------------------------------------------------------------------------------------
46981: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
46982:
46983: ----------------------------------------------------------------------------------
46984: -- 4219869 Business Flow
46985: -- Update journal entry status -- Need to generate this within IF
47009: -- To allow MPA report to determine if it should generate report process
47010: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
47011: ------------------------------------------------------------------------------------------
47012:
47013: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
47014: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
47015:
47016: --
47017: -- Update the line information that should be overwritten
47010: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
47011: ------------------------------------------------------------------------------------------
47012:
47013: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
47014: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
47015:
47016: --
47017: -- Update the line information that should be overwritten
47018: --
47015:
47016: --
47017: -- Update the line information that should be overwritten
47018: --
47019: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
47020: p_header_num => 1);
47021: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
47022:
47023: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
47017: -- Update the line information that should be overwritten
47018: --
47019: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
47020: p_header_num => 1);
47021: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
47022:
47023: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
47024:
47025: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
47019: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
47020: p_header_num => 1);
47021: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
47022:
47023: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
47024:
47025: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
47026: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
47027: END IF;
47022:
47023: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
47024:
47025: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
47026: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
47027: END IF;
47028:
47029: --
47030: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
47029: --
47030: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
47031: --
47032: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
47033: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
47034: ELSE
47035: ---------------------------------------------------------------------------------------------------
47036: -- 4262811a Switch Sign
47037: ---------------------------------------------------------------------------------------------------
47034: ELSE
47035: ---------------------------------------------------------------------------------------------------
47036: -- 4262811a Switch Sign
47037: ---------------------------------------------------------------------------------------------------
47038: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
47039: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47040: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47041: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47042: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47035: ---------------------------------------------------------------------------------------------------
47036: -- 4262811a Switch Sign
47037: ---------------------------------------------------------------------------------------------------
47038: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
47039: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47040: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47041: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47042: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47043: -- 5132302
47036: -- 4262811a Switch Sign
47037: ---------------------------------------------------------------------------------------------------
47038: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
47039: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47040: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47041: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47042: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47043: -- 5132302
47044: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
47037: ---------------------------------------------------------------------------------------------------
47038: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
47039: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47040: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47041: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47042: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47043: -- 5132302
47044: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
47045: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47038: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
47039: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47040: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47041: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47042: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47043: -- 5132302
47044: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
47045: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47046:
47040: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47041: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47042: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47043: -- 5132302
47044: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
47045: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47046:
47047: END IF;
47048:
47041: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47042: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47043: -- 5132302
47044: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
47045: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47046:
47047: END IF;
47048:
47049: -- 4955764
47046:
47047: END IF;
47048:
47049: -- 4955764
47050: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
47051: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
47052:
47053:
47054: XLA_AE_LINES_PKG.ValidateCurrentLine;
47050: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
47051: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
47052:
47053:
47054: XLA_AE_LINES_PKG.ValidateCurrentLine;
47055: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
47056:
47057: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
47058: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
47051: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
47052:
47053:
47054: XLA_AE_LINES_PKG.ValidateCurrentLine;
47055: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
47056:
47057: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
47058: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
47059: ,p_balance_type_code => l_balance_type_code);
47231: --
47232: -- bulk performance
47233: --
47234: l_balance_type_code VARCHAR2(1);
47235: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
47236: l_log_module VARCHAR2(240);
47237:
47238: --
47239: -- Upgrade strategy
47333: ') = 'D'
47334: THEN
47335:
47336: --
47337: XLA_AE_LINES_PKG.SetNewLine;
47338:
47339: p_balance_type_code := l_balance_type_code;
47340: -- set the flag so later we will know whether the gain loss line needs to be created
47341:
47345:
47346: --
47347: -- bulk performance
47348: --
47349: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
47350: p_header_num => 0); -- 4262811
47351: --
47352: -- set accounting line options
47353: --
47350: p_header_num => 0); -- 4262811
47351: --
47352: -- set accounting line options
47353: --
47354: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
47355: p_natural_side_code => 'C'
47356: , p_gain_or_loss_flag => 'N'
47357: , p_gl_transfer_mode_code => 'S'
47358: , p_acct_entry_type_code => 'E'
47364: --
47365: --
47366: -- set accounting line type info
47367: --
47368: xla_ae_lines_pkg.SetAcctLineType
47369: (p_component_type => l_component_type
47370: ,p_event_type_code => l_event_type_code
47371: ,p_line_definition_owner_code => l_line_definition_owner_code
47372: ,p_line_definition_code => l_line_definition_code
47378: ,p_event_class_code => l_event_class_code);
47379: --
47380: -- set accounting class
47381: --
47382: xla_ae_lines_pkg.SetAcctClass(
47383: p_accounting_class_code => 'PO_PA_BURDEN'
47384: , p_ae_header_id => l_ae_header_id
47385: );
47386:
47386:
47387: --
47388: -- set rounding class
47389: --
47390: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
47391: 'PO_PA_BURDEN';
47392:
47393: --
47394: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
47390: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
47391: 'PO_PA_BURDEN';
47392:
47393: --
47394: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
47395: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
47396: --
47397: -- bulk performance
47398: --
47391: 'PO_PA_BURDEN';
47392:
47393: --
47394: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
47395: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
47396: --
47397: -- bulk performance
47398: --
47399: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
47395: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
47396: --
47397: -- bulk performance
47398: --
47399: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
47400:
47401: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
47402: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
47403:
47397: -- bulk performance
47398: --
47399: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
47400:
47401: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
47402: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
47403:
47404: -- 4955764
47405: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
47401: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
47402: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
47403:
47404: -- 4955764
47405: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
47406: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
47407:
47408: -- 4458381 Public Sector Enh
47409:
47483: l_rec_acct_attrs.array_num_value(34) := p_source_39;
47484: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
47485: l_rec_acct_attrs.array_num_value(35) := p_source_40;
47486:
47487: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
47488: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
47489:
47490: ---------------------------------------------------------------------------------------------------------------
47491: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
47484: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
47485: l_rec_acct_attrs.array_num_value(35) := p_source_40;
47486:
47487: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
47488: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
47489:
47490: ---------------------------------------------------------------------------------------------------------------
47491: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
47492: ---------------------------------------------------------------------------------------------------------------
47487: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
47488: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
47489:
47490: ---------------------------------------------------------------------------------------------------------------
47491: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
47492: ---------------------------------------------------------------------------------------------------------------
47493: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
47494:
47495: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
47489:
47490: ---------------------------------------------------------------------------------------------------------------
47491: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
47492: ---------------------------------------------------------------------------------------------------------------
47493: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
47494:
47495: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
47496: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
47497:
47491: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
47492: ---------------------------------------------------------------------------------------------------------------
47493: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
47494:
47495: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
47496: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
47497:
47498: IF xla_accounting_cache_pkg.GetValueChar
47499: (p_source_code => 'LEDGER_CATEGORY_CODE'
47492: ---------------------------------------------------------------------------------------------------------------
47493: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
47494:
47495: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
47496: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
47497:
47498: IF xla_accounting_cache_pkg.GetValueChar
47499: (p_source_code => 'LEDGER_CATEGORY_CODE'
47500: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
47503: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
47504: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
47505: )
47506: THEN
47507: xla_ae_lines_pkg.BflowUpgEntry
47508: (p_business_method_code => l_bflow_method_code
47509: ,p_business_class_code => l_bflow_class_code
47510: ,p_balance_type => l_balance_type_code);
47511: ELSE
47509: ,p_business_class_code => l_bflow_class_code
47510: ,p_balance_type => l_balance_type_code);
47511: ELSE
47512: NULL;
47513: XLA_AE_LINES_PKG.business_flow_validation(
47514: p_business_method_code => l_bflow_method_code
47515: ,p_business_class_code => l_bflow_class_code
47516: ,p_inherit_description_flag => l_inherit_desc_flag);
47517: END IF;
47523: --
47524: -- call description
47525: --
47526:
47527: xla_ae_lines_pkg.SetLineDescription(
47528: p_ae_header_id => l_ae_header_id
47529: ,p_description => Description_2 (
47530: p_application_id => p_application_id
47531: , p_ae_header_id => l_ae_header_id
47569: xla_accounting_err_pkg.build_message
47570: (p_appli_s_name => 'XLA'
47571: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
47572: ,p_token_1 => 'LINE_NUMBER'
47573: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
47574: ,p_token_2 => 'LINE_TYPE_NAME'
47575: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
47576: l_component_type
47577: ,l_component_code
47605: --
47606: --
47607: ------------------------------------------------------------------------------------------------
47608: -- 4219869 Business Flow
47609: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
47610: -- Prior Entry. Currently, the following code is always generated.
47611: ------------------------------------------------------------------------------------------------
47612: -- No ValidateCurrentLine for business flow method of Prior Entry
47613:
47614: ------------------------------------------------------------------------------------
47615: -- 4219869 Business Flow
47616: -- Populated credit and debit amounts -- Need to generate this within IF
47617: ------------------------------------------------------------------------------------
47618: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
47619:
47620: ----------------------------------------------------------------------------------
47621: -- 4219869 Business Flow
47622: -- Update journal entry status -- Need to generate this within IF
47646: -- To allow MPA report to determine if it should generate report process
47647: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
47648: ------------------------------------------------------------------------------------------
47649:
47650: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
47651: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
47652:
47653: --
47654: -- Update the line information that should be overwritten
47647: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
47648: ------------------------------------------------------------------------------------------
47649:
47650: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
47651: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
47652:
47653: --
47654: -- Update the line information that should be overwritten
47655: --
47652:
47653: --
47654: -- Update the line information that should be overwritten
47655: --
47656: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
47657: p_header_num => 1);
47658: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
47659:
47660: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
47654: -- Update the line information that should be overwritten
47655: --
47656: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
47657: p_header_num => 1);
47658: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
47659:
47660: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
47661:
47662: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
47656: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
47657: p_header_num => 1);
47658: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
47659:
47660: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
47661:
47662: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
47663: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
47664: END IF;
47659:
47660: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
47661:
47662: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
47663: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
47664: END IF;
47665:
47666: --
47667: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
47666: --
47667: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
47668: --
47669: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
47670: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
47671: ELSE
47672: ---------------------------------------------------------------------------------------------------
47673: -- 4262811a Switch Sign
47674: ---------------------------------------------------------------------------------------------------
47671: ELSE
47672: ---------------------------------------------------------------------------------------------------
47673: -- 4262811a Switch Sign
47674: ---------------------------------------------------------------------------------------------------
47675: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
47676: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47677: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47678: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47679: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47672: ---------------------------------------------------------------------------------------------------
47673: -- 4262811a Switch Sign
47674: ---------------------------------------------------------------------------------------------------
47675: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
47676: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47677: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47678: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47679: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47680: -- 5132302
47673: -- 4262811a Switch Sign
47674: ---------------------------------------------------------------------------------------------------
47675: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
47676: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47677: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47678: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47679: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47680: -- 5132302
47681: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
47674: ---------------------------------------------------------------------------------------------------
47675: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
47676: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47677: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47678: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47679: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47680: -- 5132302
47681: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
47682: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47675: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
47676: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47677: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47678: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47679: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47680: -- 5132302
47681: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
47682: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47683:
47677: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47678: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47679: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47680: -- 5132302
47681: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
47682: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47683:
47684: END IF;
47685:
47678: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47679: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47680: -- 5132302
47681: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
47682: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47683:
47684: END IF;
47685:
47686: -- 4955764
47683:
47684: END IF;
47685:
47686: -- 4955764
47687: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
47688: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
47689:
47690:
47691: XLA_AE_LINES_PKG.ValidateCurrentLine;
47687: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
47688: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
47689:
47690:
47691: XLA_AE_LINES_PKG.ValidateCurrentLine;
47692: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
47693:
47694: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
47695: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
47688: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
47689:
47690:
47691: XLA_AE_LINES_PKG.ValidateCurrentLine;
47692: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
47693:
47694: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
47695: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
47696: ,p_balance_type_code => l_balance_type_code);
47868: --
47869: -- bulk performance
47870: --
47871: l_balance_type_code VARCHAR2(1);
47872: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
47873: l_log_module VARCHAR2(240);
47874:
47875: --
47876: -- Upgrade strategy
47977: ') = 'D'
47978: THEN
47979:
47980: --
47981: XLA_AE_LINES_PKG.SetNewLine;
47982:
47983: p_balance_type_code := l_balance_type_code;
47984: -- set the flag so later we will know whether the gain loss line needs to be created
47985:
47989:
47990: --
47991: -- bulk performance
47992: --
47993: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
47994: p_header_num => 0); -- 4262811
47995: --
47996: -- set accounting line options
47997: --
47994: p_header_num => 0); -- 4262811
47995: --
47996: -- set accounting line options
47997: --
47998: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
47999: p_natural_side_code => 'C'
48000: , p_gain_or_loss_flag => 'N'
48001: , p_gl_transfer_mode_code => 'S'
48002: , p_acct_entry_type_code => 'E'
48008: --
48009: --
48010: -- set accounting line type info
48011: --
48012: xla_ae_lines_pkg.SetAcctLineType
48013: (p_component_type => l_component_type
48014: ,p_event_type_code => l_event_type_code
48015: ,p_line_definition_owner_code => l_line_definition_owner_code
48016: ,p_line_definition_code => l_line_definition_code
48022: ,p_event_class_code => l_event_class_code);
48023: --
48024: -- set accounting class
48025: --
48026: xla_ae_lines_pkg.SetAcctClass(
48027: p_accounting_class_code => 'REQ_PA_BURDEN'
48028: , p_ae_header_id => l_ae_header_id
48029: );
48030:
48030:
48031: --
48032: -- set rounding class
48033: --
48034: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
48035: 'REQ_PA_BURDEN';
48036:
48037: --
48038: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
48034: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
48035: 'REQ_PA_BURDEN';
48036:
48037: --
48038: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
48039: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
48040: --
48041: -- bulk performance
48042: --
48035: 'REQ_PA_BURDEN';
48036:
48037: --
48038: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
48039: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
48040: --
48041: -- bulk performance
48042: --
48043: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
48039: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
48040: --
48041: -- bulk performance
48042: --
48043: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
48044:
48045: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
48046: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
48047:
48041: -- bulk performance
48042: --
48043: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
48044:
48045: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
48046: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
48047:
48048: -- 4955764
48049: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
48045: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
48046: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
48047:
48048: -- 4955764
48049: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
48050: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
48051:
48052: -- 4458381 Public Sector Enh
48053:
48127: l_rec_acct_attrs.array_num_value(34) := p_source_39;
48128: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
48129: l_rec_acct_attrs.array_num_value(35) := p_source_40;
48130:
48131: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
48132: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
48133:
48134: ---------------------------------------------------------------------------------------------------------------
48135: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
48128: l_rec_acct_attrs.array_acct_attr_code(35) := 'UPG_DR_ENC_TYPE_ID';
48129: l_rec_acct_attrs.array_num_value(35) := p_source_40;
48130:
48131: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
48132: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
48133:
48134: ---------------------------------------------------------------------------------------------------------------
48135: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
48136: ---------------------------------------------------------------------------------------------------------------
48131: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
48132: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
48133:
48134: ---------------------------------------------------------------------------------------------------------------
48135: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
48136: ---------------------------------------------------------------------------------------------------------------
48137: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
48138:
48139: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
48133:
48134: ---------------------------------------------------------------------------------------------------------------
48135: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
48136: ---------------------------------------------------------------------------------------------------------------
48137: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
48138:
48139: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
48140: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
48141:
48135: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
48136: ---------------------------------------------------------------------------------------------------------------
48137: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
48138:
48139: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
48140: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
48141:
48142: IF xla_accounting_cache_pkg.GetValueChar
48143: (p_source_code => 'LEDGER_CATEGORY_CODE'
48136: ---------------------------------------------------------------------------------------------------------------
48137: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
48138:
48139: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
48140: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
48141:
48142: IF xla_accounting_cache_pkg.GetValueChar
48143: (p_source_code => 'LEDGER_CATEGORY_CODE'
48144: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
48147: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
48148: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
48149: )
48150: THEN
48151: xla_ae_lines_pkg.BflowUpgEntry
48152: (p_business_method_code => l_bflow_method_code
48153: ,p_business_class_code => l_bflow_class_code
48154: ,p_balance_type => l_balance_type_code);
48155: ELSE
48153: ,p_business_class_code => l_bflow_class_code
48154: ,p_balance_type => l_balance_type_code);
48155: ELSE
48156: NULL;
48157: XLA_AE_LINES_PKG.business_flow_validation(
48158: p_business_method_code => l_bflow_method_code
48159: ,p_business_class_code => l_bflow_class_code
48160: ,p_inherit_description_flag => l_inherit_desc_flag);
48161: END IF;
48167: --
48168: -- call description
48169: --
48170:
48171: xla_ae_lines_pkg.SetLineDescription(
48172: p_ae_header_id => l_ae_header_id
48173: ,p_description => Description_2 (
48174: p_application_id => p_application_id
48175: , p_ae_header_id => l_ae_header_id
48213: xla_accounting_err_pkg.build_message
48214: (p_appli_s_name => 'XLA'
48215: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
48216: ,p_token_1 => 'LINE_NUMBER'
48217: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
48218: ,p_token_2 => 'LINE_TYPE_NAME'
48219: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
48220: l_component_type
48221: ,l_component_code
48249: --
48250: --
48251: ------------------------------------------------------------------------------------------------
48252: -- 4219869 Business Flow
48253: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
48254: -- Prior Entry. Currently, the following code is always generated.
48255: ------------------------------------------------------------------------------------------------
48256: -- No ValidateCurrentLine for business flow method of Prior Entry
48257:
48258: ------------------------------------------------------------------------------------
48259: -- 4219869 Business Flow
48260: -- Populated credit and debit amounts -- Need to generate this within IF
48261: ------------------------------------------------------------------------------------
48262: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
48263:
48264: ----------------------------------------------------------------------------------
48265: -- 4219869 Business Flow
48266: -- Update journal entry status -- Need to generate this within IF
48290: -- To allow MPA report to determine if it should generate report process
48291: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
48292: ------------------------------------------------------------------------------------------
48293:
48294: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
48295: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
48296:
48297: --
48298: -- Update the line information that should be overwritten
48291: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
48292: ------------------------------------------------------------------------------------------
48293:
48294: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
48295: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
48296:
48297: --
48298: -- Update the line information that should be overwritten
48299: --
48296:
48297: --
48298: -- Update the line information that should be overwritten
48299: --
48300: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
48301: p_header_num => 1);
48302: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
48303:
48304: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
48298: -- Update the line information that should be overwritten
48299: --
48300: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
48301: p_header_num => 1);
48302: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
48303:
48304: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
48305:
48306: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
48300: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
48301: p_header_num => 1);
48302: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
48303:
48304: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
48305:
48306: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
48307: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
48308: END IF;
48303:
48304: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
48305:
48306: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
48307: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
48308: END IF;
48309:
48310: --
48311: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
48310: --
48311: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
48312: --
48313: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
48314: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
48315: ELSE
48316: ---------------------------------------------------------------------------------------------------
48317: -- 4262811a Switch Sign
48318: ---------------------------------------------------------------------------------------------------
48315: ELSE
48316: ---------------------------------------------------------------------------------------------------
48317: -- 4262811a Switch Sign
48318: ---------------------------------------------------------------------------------------------------
48319: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
48320: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48321: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48322: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48323: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48316: ---------------------------------------------------------------------------------------------------
48317: -- 4262811a Switch Sign
48318: ---------------------------------------------------------------------------------------------------
48319: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
48320: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48321: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48322: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48323: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48324: -- 5132302
48317: -- 4262811a Switch Sign
48318: ---------------------------------------------------------------------------------------------------
48319: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
48320: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48321: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48322: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48323: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48324: -- 5132302
48325: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
48318: ---------------------------------------------------------------------------------------------------
48319: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
48320: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48321: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48322: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48323: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48324: -- 5132302
48325: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
48326: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48319: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
48320: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48321: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48322: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48323: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48324: -- 5132302
48325: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
48326: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48327:
48321: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48322: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48323: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48324: -- 5132302
48325: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
48326: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48327:
48328: END IF;
48329:
48322: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48323: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48324: -- 5132302
48325: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
48326: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48327:
48328: END IF;
48329:
48330: -- 4955764
48327:
48328: END IF;
48329:
48330: -- 4955764
48331: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
48332: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
48333:
48334:
48335: XLA_AE_LINES_PKG.ValidateCurrentLine;
48331: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
48332: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
48333:
48334:
48335: XLA_AE_LINES_PKG.ValidateCurrentLine;
48336: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
48337:
48338: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
48339: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
48332: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
48333:
48334:
48335: XLA_AE_LINES_PKG.ValidateCurrentLine;
48336: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
48337:
48338: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
48339: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
48340: ,p_balance_type_code => l_balance_type_code);
48940: l_first_event_id NUMBER;
48941: l_last_event_id NUMBER;
48942:
48943: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
48944: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
48945: --
48946: --
48947: l_result BOOLEAN := TRUE;
48948: l_rows NUMBER := 1000;
49291: EXIT WHEN l_array_entity_id.COUNT = 0;
49292:
49293: -- initialize arrays
49294: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
49295: XLA_AE_LINES_PKG.g_rec_lines := NULL;
49296:
49297: --
49298: -- Bug 4458708
49299: --
49296:
49297: --
49298: -- Bug 4458708
49299: --
49300: XLA_AE_LINES_PKG.g_LineNumber := 0;
49301:
49302:
49303: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
49304: g_last_hdr_idx := l_array_event_id.LAST;
49422: --
49423: -- following sets the accounting attributes needed to reverse
49424: -- accounting for a distributeion
49425: --
49426: xla_ae_lines_pkg.SetTrxReversalAttrs
49427: (p_event_id => l_event_id
49428: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
49429: ,p_trx_reversal_source => l_trx_reversal_source);
49430:
49454: --
49455: -- insert dummy rows into lines gt table that were created due to
49456: -- transaction reversals
49457: --
49458: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
49459: l_result := XLA_AE_LINES_PKG.InsertLines;
49460: END IF;
49461:
49462: --
49455: -- insert dummy rows into lines gt table that were created due to
49456: -- transaction reversals
49457: --
49458: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
49459: l_result := XLA_AE_LINES_PKG.InsertLines;
49460: END IF;
49461:
49462: --
49463: -- reset the temp_line_num for each set of events fetched from header
49463: -- reset the temp_line_num for each set of events fetched from header
49464: -- cursor rather than doing it for each new event in line cursor
49465: -- Bug 3939231
49466: --
49467: xla_ae_lines_pkg.g_temp_line_num := 0;
49468:
49469:
49470:
49471: --
49568: END IF;
49569: --
49570: EXIT WHEN l_array_entity_id.count = 0;
49571:
49572: XLA_AE_LINES_PKG.g_rec_lines := null;
49573:
49574: --
49575: -- Bug 4458708
49576: --
49573:
49574: --
49575: -- Bug 4458708
49576: --
49577: XLA_AE_LINES_PKG.g_LineNumber := 0;
49578: --
49579: --
49580:
49581: FOR Idx IN 1..l_array_event_id.count LOOP
49645:
49646:
49647:
49648: --
49649: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
49650:
49651: l_acct_reversal_source := SUBSTR(l_array_source_16(Idx), 1,30);
49652:
49653: IF l_continue_with_lines THEN
49721: l_rec_rev_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
49722: l_rec_rev_acct_attrs.array_num_value(21) := l_array_source_40(Idx);
49723:
49724:
49725: xla_ae_lines_pkg.SetAcctReversalAttrs
49726: (p_event_id => l_event_id
49727: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
49728: ,p_calculate_acctd_flag => l_calculate_acctd_flag
49729: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
50769:
50770: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
50771: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
50772: AND (l_actual_flag = 'A')) THEN
50773: XLA_AE_LINES_PKG.CreateGainOrLossLines(
50774: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
50775: ,p_application_id => p_application_id
50776: ,p_amb_context_code => 'DEFAULT'
50777: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
50802: END IF;
50803: END IF;
50804:
50805: END LOOP;
50806: l_result := XLA_AE_LINES_PKG.InsertLines ;
50807: end loop;
50808: close line_cur;
50809:
50810:
51331: l_first_event_id NUMBER;
51332: l_last_event_id NUMBER;
51333:
51334: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
51335: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
51336: --
51337: --
51338: l_result BOOLEAN := TRUE;
51339: l_rows NUMBER := 1000;
51627: EXIT WHEN l_array_entity_id.COUNT = 0;
51628:
51629: -- initialize arrays
51630: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
51631: XLA_AE_LINES_PKG.g_rec_lines := NULL;
51632:
51633: --
51634: -- Bug 4458708
51635: --
51632:
51633: --
51634: -- Bug 4458708
51635: --
51636: XLA_AE_LINES_PKG.g_LineNumber := 0;
51637:
51638:
51639: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
51640: g_last_hdr_idx := l_array_event_id.LAST;
51774: --
51775: -- following sets the accounting attributes needed to reverse
51776: -- accounting for a distributeion
51777: --
51778: xla_ae_lines_pkg.SetTrxReversalAttrs
51779: (p_event_id => l_event_id
51780: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
51781: ,p_trx_reversal_source => l_trx_reversal_source);
51782:
51806: --
51807: -- insert dummy rows into lines gt table that were created due to
51808: -- transaction reversals
51809: --
51810: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
51811: l_result := XLA_AE_LINES_PKG.InsertLines;
51812: END IF;
51813:
51814: --
51807: -- insert dummy rows into lines gt table that were created due to
51808: -- transaction reversals
51809: --
51810: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
51811: l_result := XLA_AE_LINES_PKG.InsertLines;
51812: END IF;
51813:
51814: --
51815: -- reset the temp_line_num for each set of events fetched from header
51815: -- reset the temp_line_num for each set of events fetched from header
51816: -- cursor rather than doing it for each new event in line cursor
51817: -- Bug 3939231
51818: --
51819: xla_ae_lines_pkg.g_temp_line_num := 0;
51820:
51821:
51822:
51823: --
51898: END IF;
51899: --
51900: EXIT WHEN l_array_entity_id.count = 0;
51901:
51902: XLA_AE_LINES_PKG.g_rec_lines := null;
51903:
51904: --
51905: -- Bug 4458708
51906: --
51903:
51904: --
51905: -- Bug 4458708
51906: --
51907: XLA_AE_LINES_PKG.g_LineNumber := 0;
51908: --
51909: --
51910:
51911: FOR Idx IN 1..l_array_event_id.count LOOP
51975:
51976:
51977:
51978: --
51979: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
51980:
51981: l_acct_reversal_source := SUBSTR(l_array_source_16(Idx), 1,30);
51982:
51983: IF l_continue_with_lines THEN
52043: l_rec_rev_acct_attrs.array_acct_attr_code(17) := 'UPG_DR_ENC_TYPE_ID';
52044: l_rec_rev_acct_attrs.array_num_value(17) := l_array_source_61(Idx);
52045:
52046:
52047: xla_ae_lines_pkg.SetAcctReversalAttrs
52048: (p_event_id => l_event_id
52049: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
52050: ,p_calculate_acctd_flag => l_calculate_acctd_flag
52051: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
52562:
52563: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
52564: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
52565: AND (l_actual_flag = 'A')) THEN
52566: XLA_AE_LINES_PKG.CreateGainOrLossLines(
52567: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
52568: ,p_application_id => p_application_id
52569: ,p_amb_context_code => 'DEFAULT'
52570: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
52595: END IF;
52596: END IF;
52597:
52598: END LOOP;
52599: l_result := XLA_AE_LINES_PKG.InsertLines ;
52600: end loop;
52601: close line_cur;
52602:
52603:
53120: l_first_event_id NUMBER;
53121: l_last_event_id NUMBER;
53122:
53123: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
53124: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
53125: --
53126: --
53127: l_result BOOLEAN := TRUE;
53128: l_rows NUMBER := 1000;
53415: EXIT WHEN l_array_entity_id.COUNT = 0;
53416:
53417: -- initialize arrays
53418: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
53419: XLA_AE_LINES_PKG.g_rec_lines := NULL;
53420:
53421: --
53422: -- Bug 4458708
53423: --
53420:
53421: --
53422: -- Bug 4458708
53423: --
53424: XLA_AE_LINES_PKG.g_LineNumber := 0;
53425:
53426:
53427: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
53428: g_last_hdr_idx := l_array_event_id.LAST;
53564: --
53565: -- following sets the accounting attributes needed to reverse
53566: -- accounting for a distributeion
53567: --
53568: xla_ae_lines_pkg.SetTrxReversalAttrs
53569: (p_event_id => l_event_id
53570: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
53571: ,p_trx_reversal_source => l_trx_reversal_source);
53572:
53596: --
53597: -- insert dummy rows into lines gt table that were created due to
53598: -- transaction reversals
53599: --
53600: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
53601: l_result := XLA_AE_LINES_PKG.InsertLines;
53602: END IF;
53603:
53604: --
53597: -- insert dummy rows into lines gt table that were created due to
53598: -- transaction reversals
53599: --
53600: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
53601: l_result := XLA_AE_LINES_PKG.InsertLines;
53602: END IF;
53603:
53604: --
53605: -- reset the temp_line_num for each set of events fetched from header
53605: -- reset the temp_line_num for each set of events fetched from header
53606: -- cursor rather than doing it for each new event in line cursor
53607: -- Bug 3939231
53608: --
53609: xla_ae_lines_pkg.g_temp_line_num := 0;
53610:
53611:
53612:
53613: --
53686: END IF;
53687: --
53688: EXIT WHEN l_array_entity_id.count = 0;
53689:
53690: XLA_AE_LINES_PKG.g_rec_lines := null;
53691:
53692: --
53693: -- Bug 4458708
53694: --
53691:
53692: --
53693: -- Bug 4458708
53694: --
53695: XLA_AE_LINES_PKG.g_LineNumber := 0;
53696: --
53697: --
53698:
53699: FOR Idx IN 1..l_array_event_id.count LOOP
53763:
53764:
53765:
53766: --
53767: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
53768:
53769: l_acct_reversal_source := SUBSTR(l_array_source_16(Idx), 1,30);
53770:
53771: IF l_continue_with_lines THEN
53831: l_rec_rev_acct_attrs.array_acct_attr_code(17) := 'UPG_DR_ENC_TYPE_ID';
53832: l_rec_rev_acct_attrs.array_num_value(17) := l_array_source_61(Idx);
53833:
53834:
53835: xla_ae_lines_pkg.SetAcctReversalAttrs
53836: (p_event_id => l_event_id
53837: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
53838: ,p_calculate_acctd_flag => l_calculate_acctd_flag
53839: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
54221:
54222: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
54223: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
54224: AND (l_actual_flag = 'A')) THEN
54225: XLA_AE_LINES_PKG.CreateGainOrLossLines(
54226: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
54227: ,p_application_id => p_application_id
54228: ,p_amb_context_code => 'DEFAULT'
54229: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
54254: END IF;
54255: END IF;
54256:
54257: END LOOP;
54258: l_result := XLA_AE_LINES_PKG.InsertLines ;
54259: end loop;
54260: close line_cur;
54261:
54262:
54884: l_first_event_id NUMBER;
54885: l_last_event_id NUMBER;
54886:
54887: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
54888: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
54889: --
54890: --
54891: l_result BOOLEAN := TRUE;
54892: l_rows NUMBER := 1000;
55235: EXIT WHEN l_array_entity_id.COUNT = 0;
55236:
55237: -- initialize arrays
55238: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
55239: XLA_AE_LINES_PKG.g_rec_lines := NULL;
55240:
55241: --
55242: -- Bug 4458708
55243: --
55240:
55241: --
55242: -- Bug 4458708
55243: --
55244: XLA_AE_LINES_PKG.g_LineNumber := 0;
55245:
55246:
55247: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
55248: g_last_hdr_idx := l_array_event_id.LAST;
55366: --
55367: -- following sets the accounting attributes needed to reverse
55368: -- accounting for a distributeion
55369: --
55370: xla_ae_lines_pkg.SetTrxReversalAttrs
55371: (p_event_id => l_event_id
55372: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
55373: ,p_trx_reversal_source => l_trx_reversal_source);
55374:
55398: --
55399: -- insert dummy rows into lines gt table that were created due to
55400: -- transaction reversals
55401: --
55402: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
55403: l_result := XLA_AE_LINES_PKG.InsertLines;
55404: END IF;
55405:
55406: --
55399: -- insert dummy rows into lines gt table that were created due to
55400: -- transaction reversals
55401: --
55402: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
55403: l_result := XLA_AE_LINES_PKG.InsertLines;
55404: END IF;
55405:
55406: --
55407: -- reset the temp_line_num for each set of events fetched from header
55407: -- reset the temp_line_num for each set of events fetched from header
55408: -- cursor rather than doing it for each new event in line cursor
55409: -- Bug 3939231
55410: --
55411: xla_ae_lines_pkg.g_temp_line_num := 0;
55412:
55413:
55414:
55415: --
55512: END IF;
55513: --
55514: EXIT WHEN l_array_entity_id.count = 0;
55515:
55516: XLA_AE_LINES_PKG.g_rec_lines := null;
55517:
55518: --
55519: -- Bug 4458708
55520: --
55517:
55518: --
55519: -- Bug 4458708
55520: --
55521: XLA_AE_LINES_PKG.g_LineNumber := 0;
55522: --
55523: --
55524:
55525: FOR Idx IN 1..l_array_event_id.count LOOP
55589:
55590:
55591:
55592: --
55593: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
55594:
55595: l_acct_reversal_source := SUBSTR(l_array_source_16(Idx), 1,30);
55596:
55597: IF l_continue_with_lines THEN
55665: l_rec_rev_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
55666: l_rec_rev_acct_attrs.array_num_value(21) := l_array_source_40(Idx);
55667:
55668:
55669: xla_ae_lines_pkg.SetAcctReversalAttrs
55670: (p_event_id => l_event_id
55671: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
55672: ,p_calculate_acctd_flag => l_calculate_acctd_flag
55673: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
56823:
56824: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
56825: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
56826: AND (l_actual_flag = 'A')) THEN
56827: XLA_AE_LINES_PKG.CreateGainOrLossLines(
56828: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
56829: ,p_application_id => p_application_id
56830: ,p_amb_context_code => 'DEFAULT'
56831: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
56856: END IF;
56857: END IF;
56858:
56859: END LOOP;
56860: l_result := XLA_AE_LINES_PKG.InsertLines ;
56861: end loop;
56862: close line_cur;
56863:
56864:
57365: l_first_event_id NUMBER;
57366: l_last_event_id NUMBER;
57367:
57368: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
57369: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
57370: --
57371: --
57372: l_result BOOLEAN := TRUE;
57373: l_rows NUMBER := 1000;
57649: EXIT WHEN l_array_entity_id.COUNT = 0;
57650:
57651: -- initialize arrays
57652: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
57653: XLA_AE_LINES_PKG.g_rec_lines := NULL;
57654:
57655: --
57656: -- Bug 4458708
57657: --
57654:
57655: --
57656: -- Bug 4458708
57657: --
57658: XLA_AE_LINES_PKG.g_LineNumber := 0;
57659:
57660:
57661: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
57662: g_last_hdr_idx := l_array_event_id.LAST;
57796: --
57797: -- following sets the accounting attributes needed to reverse
57798: -- accounting for a distributeion
57799: --
57800: xla_ae_lines_pkg.SetTrxReversalAttrs
57801: (p_event_id => l_event_id
57802: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
57803: ,p_trx_reversal_source => l_trx_reversal_source);
57804:
57828: --
57829: -- insert dummy rows into lines gt table that were created due to
57830: -- transaction reversals
57831: --
57832: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
57833: l_result := XLA_AE_LINES_PKG.InsertLines;
57834: END IF;
57835:
57836: --
57829: -- insert dummy rows into lines gt table that were created due to
57830: -- transaction reversals
57831: --
57832: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
57833: l_result := XLA_AE_LINES_PKG.InsertLines;
57834: END IF;
57835:
57836: --
57837: -- reset the temp_line_num for each set of events fetched from header
57837: -- reset the temp_line_num for each set of events fetched from header
57838: -- cursor rather than doing it for each new event in line cursor
57839: -- Bug 3939231
57840: --
57841: xla_ae_lines_pkg.g_temp_line_num := 0;
57842:
57843:
57844:
57845: --
57916: END IF;
57917: --
57918: EXIT WHEN l_array_entity_id.count = 0;
57919:
57920: XLA_AE_LINES_PKG.g_rec_lines := null;
57921:
57922: --
57923: -- Bug 4458708
57924: --
57921:
57922: --
57923: -- Bug 4458708
57924: --
57925: XLA_AE_LINES_PKG.g_LineNumber := 0;
57926: --
57927: --
57928:
57929: FOR Idx IN 1..l_array_event_id.count LOOP
57993:
57994:
57995:
57996: --
57997: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
57998:
57999: l_acct_reversal_source := SUBSTR(l_array_source_16(Idx), 1,30);
58000:
58001: IF l_continue_with_lines THEN
58061: l_rec_rev_acct_attrs.array_acct_attr_code(17) := 'UPG_DR_ENC_TYPE_ID';
58062: l_rec_rev_acct_attrs.array_num_value(17) := l_array_source_78(Idx);
58063:
58064:
58065: xla_ae_lines_pkg.SetAcctReversalAttrs
58066: (p_event_id => l_event_id
58067: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
58068: ,p_calculate_acctd_flag => l_calculate_acctd_flag
58069: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
58188:
58189: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
58190: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
58191: AND (l_actual_flag = 'A')) THEN
58192: XLA_AE_LINES_PKG.CreateGainOrLossLines(
58193: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
58194: ,p_application_id => p_application_id
58195: ,p_amb_context_code => 'DEFAULT'
58196: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
58221: END IF;
58222: END IF;
58223:
58224: END LOOP;
58225: l_result := XLA_AE_LINES_PKG.InsertLines ;
58226: end loop;
58227: close line_cur;
58228:
58229:
58821: l_first_event_id NUMBER;
58822: l_last_event_id NUMBER;
58823:
58824: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
58825: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
58826: --
58827: --
58828: l_result BOOLEAN := TRUE;
58829: l_rows NUMBER := 1000;
59154: EXIT WHEN l_array_entity_id.COUNT = 0;
59155:
59156: -- initialize arrays
59157: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
59158: XLA_AE_LINES_PKG.g_rec_lines := NULL;
59159:
59160: --
59161: -- Bug 4458708
59162: --
59159:
59160: --
59161: -- Bug 4458708
59162: --
59163: XLA_AE_LINES_PKG.g_LineNumber := 0;
59164:
59165:
59166: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
59167: g_last_hdr_idx := l_array_event_id.LAST;
59285: --
59286: -- following sets the accounting attributes needed to reverse
59287: -- accounting for a distributeion
59288: --
59289: xla_ae_lines_pkg.SetTrxReversalAttrs
59290: (p_event_id => l_event_id
59291: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
59292: ,p_trx_reversal_source => l_trx_reversal_source);
59293:
59317: --
59318: -- insert dummy rows into lines gt table that were created due to
59319: -- transaction reversals
59320: --
59321: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
59322: l_result := XLA_AE_LINES_PKG.InsertLines;
59323: END IF;
59324:
59325: --
59318: -- insert dummy rows into lines gt table that were created due to
59319: -- transaction reversals
59320: --
59321: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
59322: l_result := XLA_AE_LINES_PKG.InsertLines;
59323: END IF;
59324:
59325: --
59326: -- reset the temp_line_num for each set of events fetched from header
59326: -- reset the temp_line_num for each set of events fetched from header
59327: -- cursor rather than doing it for each new event in line cursor
59328: -- Bug 3939231
59329: --
59330: xla_ae_lines_pkg.g_temp_line_num := 0;
59331:
59332:
59333:
59334: --
59425: END IF;
59426: --
59427: EXIT WHEN l_array_entity_id.count = 0;
59428:
59429: XLA_AE_LINES_PKG.g_rec_lines := null;
59430:
59431: --
59432: -- Bug 4458708
59433: --
59430:
59431: --
59432: -- Bug 4458708
59433: --
59434: XLA_AE_LINES_PKG.g_LineNumber := 0;
59435: --
59436: --
59437:
59438: FOR Idx IN 1..l_array_event_id.count LOOP
59502:
59503:
59504:
59505: --
59506: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
59507:
59508: l_acct_reversal_source := SUBSTR(l_array_source_16(Idx), 1,30);
59509:
59510: IF l_continue_with_lines THEN
59578: l_rec_rev_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
59579: l_rec_rev_acct_attrs.array_num_value(21) := l_array_source_40(Idx);
59580:
59581:
59582: xla_ae_lines_pkg.SetAcctReversalAttrs
59583: (p_event_id => l_event_id
59584: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
59585: ,p_calculate_acctd_flag => l_calculate_acctd_flag
59586: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
60006:
60007: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
60008: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
60009: AND (l_actual_flag = 'A')) THEN
60010: XLA_AE_LINES_PKG.CreateGainOrLossLines(
60011: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
60012: ,p_application_id => p_application_id
60013: ,p_amb_context_code => 'DEFAULT'
60014: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
60039: END IF;
60040: END IF;
60041:
60042: END LOOP;
60043: l_result := XLA_AE_LINES_PKG.InsertLines ;
60044: end loop;
60045: close line_cur;
60046:
60047:
60139:
60140: --
60141: -- initialize array of lines with NULL
60142: --
60143: xla_ae_lines_pkg.SetNullLine;
60144:
60145: --
60146: -- initialize header extract count -- Bug 4865292
60147: --