[Home] [Help]
567: --
568: -- bulk performance
569: --
570: l_balance_type_code VARCHAR2(1);
571: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
572: l_log_module VARCHAR2(240);
573:
574: --
575: -- Upgrade strategy
634: IF NVL(p_source_7,9E125) = 15
635: THEN
636:
637: --
638: XLA_AE_LINES_PKG.SetNewLine;
639:
640: p_balance_type_code := l_balance_type_code;
641: -- set the flag so later we will know whether the gain loss line needs to be created
642:
646:
647: --
648: -- bulk performance
649: --
650: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
651: p_header_num => 0); -- 4262811
652: --
653: -- set accounting line options
654: --
651: p_header_num => 0); -- 4262811
652: --
653: -- set accounting line options
654: --
655: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
656: p_natural_side_code => 'D'
657: , p_gain_or_loss_flag => 'N'
658: , p_gl_transfer_mode_code => 'S'
659: , p_acct_entry_type_code => 'E'
665: --
666: --
667: -- set accounting line type info
668: --
669: xla_ae_lines_pkg.SetAcctLineType
670: (p_component_type => l_component_type
671: ,p_event_type_code => l_event_type_code
672: ,p_line_definition_owner_code => l_line_definition_owner_code
673: ,p_line_definition_code => l_line_definition_code
679: ,p_event_class_code => l_event_class_code);
680: --
681: -- set accounting class
682: --
683: xla_ae_lines_pkg.SetAcctClass(
684: p_accounting_class_code => 'REQUISITION'
685: , p_ae_header_id => l_ae_header_id
686: );
687:
687:
688: --
689: -- set rounding class
690: --
691: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
692: 'REQUISITION';
693:
694: --
695: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
691: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
692: 'REQUISITION';
693:
694: --
695: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
696: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
697: --
698: -- bulk performance
699: --
692: 'REQUISITION';
693:
694: --
695: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
696: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
697: --
698: -- bulk performance
699: --
700: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
696: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
697: --
698: -- bulk performance
699: --
700: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
701:
702: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
703: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
704:
698: -- bulk performance
699: --
700: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
701:
702: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
703: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
704:
705: -- 4955764
706: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
702: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
703: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
704:
705: -- 4955764
706: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
707: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
708:
709: -- 4458381 Public Sector Enh
710: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
706: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
707: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
708:
709: -- 4458381 Public Sector Enh
710: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
711: --
712: -- set accounting attributes for the line type
713: --
714: l_entered_amt_idx := 3;
730: l_rec_acct_attrs.array_char_value(7) := p_source_14;
731: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
732: l_rec_acct_attrs.array_num_value(8) := p_source_15;
733:
734: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
735: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
736:
737: ---------------------------------------------------------------------------------------------------------------
738: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
731: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
732: l_rec_acct_attrs.array_num_value(8) := p_source_15;
733:
734: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
735: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
736:
737: ---------------------------------------------------------------------------------------------------------------
738: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
739: ---------------------------------------------------------------------------------------------------------------
734: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
735: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
736:
737: ---------------------------------------------------------------------------------------------------------------
738: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
739: ---------------------------------------------------------------------------------------------------------------
740: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
741:
742: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
736:
737: ---------------------------------------------------------------------------------------------------------------
738: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
739: ---------------------------------------------------------------------------------------------------------------
740: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
741:
742: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
743: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
744:
738: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
739: ---------------------------------------------------------------------------------------------------------------
740: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
741:
742: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
743: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
744:
745: IF xla_accounting_cache_pkg.GetValueChar
746: (p_source_code => 'LEDGER_CATEGORY_CODE'
739: ---------------------------------------------------------------------------------------------------------------
740: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
741:
742: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
743: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
744:
745: IF xla_accounting_cache_pkg.GetValueChar
746: (p_source_code => 'LEDGER_CATEGORY_CODE'
747: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
750: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
751: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
752: )
753: THEN
754: xla_ae_lines_pkg.BflowUpgEntry
755: (p_business_method_code => l_bflow_method_code
756: ,p_business_class_code => l_bflow_class_code
757: ,p_balance_type => l_balance_type_code);
758: ELSE
790: , x_value_type_code => l_adr_value_type_code
791: , p_side => 'NA'
792: );
793:
794: xla_ae_lines_pkg.set_ccid(
795: p_code_combination_id => l_ccid
796: , p_value_type_code => l_adr_value_type_code
797: , p_transaction_coa_id => l_adr_transaction_coa_id
798: , p_accounting_coa_id => l_adr_accounting_coa_id
826: xla_accounting_err_pkg.build_message
827: (p_appli_s_name => 'XLA'
828: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
829: ,p_token_1 => 'LINE_NUMBER'
830: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
831: ,p_token_2 => 'LINE_TYPE_NAME'
832: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
833: l_component_type
834: ,l_component_code
862: --
863: --
864: ------------------------------------------------------------------------------------------------
865: -- 4219869 Business Flow
866: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
867: -- Prior Entry. Currently, the following code is always generated.
868: ------------------------------------------------------------------------------------------------
869: XLA_AE_LINES_PKG.ValidateCurrentLine;
870:
865: -- 4219869 Business Flow
866: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
867: -- Prior Entry. Currently, the following code is always generated.
868: ------------------------------------------------------------------------------------------------
869: XLA_AE_LINES_PKG.ValidateCurrentLine;
870:
871: ------------------------------------------------------------------------------------
872: -- 4219869 Business Flow
873: -- Populated credit and debit amounts -- Need to generate this within IF
871: ------------------------------------------------------------------------------------
872: -- 4219869 Business Flow
873: -- Populated credit and debit amounts -- Need to generate this within IF
874: ------------------------------------------------------------------------------------
875: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
876:
877: ----------------------------------------------------------------------------------
878: -- 4219869 Business Flow
879: -- Update journal entry status -- Need to generate this within IF
903: -- To allow MPA report to determine if it should generate report process
904: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
905: ------------------------------------------------------------------------------------------
906:
907: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
908: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
909: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
910: -- call ADRs
911: -- Bug 4922099
904: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
905: ------------------------------------------------------------------------------------------
906:
907: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
908: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
909: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
910: -- call ADRs
911: -- Bug 4922099
912: --
928: , x_value_type_code => l_adr_value_type_code
929: , p_side => 'NA'
930: );
931:
932: xla_ae_lines_pkg.set_ccid(
933: p_code_combination_id => l_ccid
934: , p_value_type_code => l_adr_value_type_code
935: , p_transaction_coa_id => l_adr_transaction_coa_id
936: , p_accounting_coa_id => l_adr_accounting_coa_id
951:
952: --
953: -- Update the line information that should be overwritten
954: --
955: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
956: p_header_num => 1);
957: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
958:
959: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
953: -- Update the line information that should be overwritten
954: --
955: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
956: p_header_num => 1);
957: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
958:
959: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
960:
961: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
955: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
956: p_header_num => 1);
957: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
958:
959: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
960:
961: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
962: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
963: END IF;
958:
959: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
960:
961: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
962: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
963: END IF;
964:
965: --
966: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
965: --
966: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
967: --
968: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
969: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
970: ELSE
971: ---------------------------------------------------------------------------------------------------
972: -- 4262811a Switch Sign
973: ---------------------------------------------------------------------------------------------------
970: ELSE
971: ---------------------------------------------------------------------------------------------------
972: -- 4262811a Switch Sign
973: ---------------------------------------------------------------------------------------------------
974: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
975: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
976: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
977: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
978: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
971: ---------------------------------------------------------------------------------------------------
972: -- 4262811a Switch Sign
973: ---------------------------------------------------------------------------------------------------
974: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
975: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
976: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
977: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
978: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
979: -- 5132302
972: -- 4262811a Switch Sign
973: ---------------------------------------------------------------------------------------------------
974: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
975: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
976: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
977: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
978: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
979: -- 5132302
980: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
973: ---------------------------------------------------------------------------------------------------
974: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
975: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
976: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
977: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
978: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
979: -- 5132302
980: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
981: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
974: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
975: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
976: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
977: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
978: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
979: -- 5132302
980: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
981: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
982:
976: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
977: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
978: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
979: -- 5132302
980: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
981: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
982:
983: END IF;
984:
977: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
978: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
979: -- 5132302
980: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
981: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
982:
983: END IF;
984:
985: -- 4955764
982:
983: END IF;
984:
985: -- 4955764
986: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
987: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
988:
989:
990: XLA_AE_LINES_PKG.ValidateCurrentLine;
986: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
987: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
988:
989:
990: XLA_AE_LINES_PKG.ValidateCurrentLine;
991: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
992:
993: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
994: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
987: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
988:
989:
990: XLA_AE_LINES_PKG.ValidateCurrentLine;
991: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
992:
993: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
994: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
995: ,p_balance_type_code => l_balance_type_code);
1121: --
1122: -- bulk performance
1123: --
1124: l_balance_type_code VARCHAR2(1);
1125: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
1126: l_log_module VARCHAR2(240);
1127:
1128: --
1129: -- Upgrade strategy
1188: IF NVL(p_source_7,9E125) = 15
1189: THEN
1190:
1191: --
1192: XLA_AE_LINES_PKG.SetNewLine;
1193:
1194: p_balance_type_code := l_balance_type_code;
1195: -- set the flag so later we will know whether the gain loss line needs to be created
1196:
1200:
1201: --
1202: -- bulk performance
1203: --
1204: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
1205: p_header_num => 0); -- 4262811
1206: --
1207: -- set accounting line options
1208: --
1205: p_header_num => 0); -- 4262811
1206: --
1207: -- set accounting line options
1208: --
1209: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
1210: p_natural_side_code => 'D'
1211: , p_gain_or_loss_flag => 'N'
1212: , p_gl_transfer_mode_code => 'S'
1213: , p_acct_entry_type_code => 'E'
1219: --
1220: --
1221: -- set accounting line type info
1222: --
1223: xla_ae_lines_pkg.SetAcctLineType
1224: (p_component_type => l_component_type
1225: ,p_event_type_code => l_event_type_code
1226: ,p_line_definition_owner_code => l_line_definition_owner_code
1227: ,p_line_definition_code => l_line_definition_code
1233: ,p_event_class_code => l_event_class_code);
1234: --
1235: -- set accounting class
1236: --
1237: xla_ae_lines_pkg.SetAcctClass(
1238: p_accounting_class_code => 'REQUISITION'
1239: , p_ae_header_id => l_ae_header_id
1240: );
1241:
1241:
1242: --
1243: -- set rounding class
1244: --
1245: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
1246: 'REQUISITION';
1247:
1248: --
1249: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
1245: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
1246: 'REQUISITION';
1247:
1248: --
1249: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
1250: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
1251: --
1252: -- bulk performance
1253: --
1246: 'REQUISITION';
1247:
1248: --
1249: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
1250: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
1251: --
1252: -- bulk performance
1253: --
1254: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
1250: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
1251: --
1252: -- bulk performance
1253: --
1254: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
1255:
1256: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
1257: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
1258:
1252: -- bulk performance
1253: --
1254: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
1255:
1256: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
1257: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
1258:
1259: -- 4955764
1260: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
1256: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
1257: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
1258:
1259: -- 4955764
1260: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
1261: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
1262:
1263: -- 4458381 Public Sector Enh
1264: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
1260: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
1261: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
1262:
1263: -- 4458381 Public Sector Enh
1264: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
1265: --
1266: -- set accounting attributes for the line type
1267: --
1268: l_entered_amt_idx := 3;
1284: l_rec_acct_attrs.array_char_value(7) := p_source_14;
1285: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
1286: l_rec_acct_attrs.array_num_value(8) := p_source_15;
1287:
1288: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
1289: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
1290:
1291: ---------------------------------------------------------------------------------------------------------------
1292: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1285: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
1286: l_rec_acct_attrs.array_num_value(8) := p_source_15;
1287:
1288: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
1289: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
1290:
1291: ---------------------------------------------------------------------------------------------------------------
1292: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1293: ---------------------------------------------------------------------------------------------------------------
1288: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
1289: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
1290:
1291: ---------------------------------------------------------------------------------------------------------------
1292: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1293: ---------------------------------------------------------------------------------------------------------------
1294: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
1295:
1296: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1290:
1291: ---------------------------------------------------------------------------------------------------------------
1292: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1293: ---------------------------------------------------------------------------------------------------------------
1294: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
1295:
1296: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1297: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1298:
1292: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1293: ---------------------------------------------------------------------------------------------------------------
1294: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
1295:
1296: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1297: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1298:
1299: IF xla_accounting_cache_pkg.GetValueChar
1300: (p_source_code => 'LEDGER_CATEGORY_CODE'
1293: ---------------------------------------------------------------------------------------------------------------
1294: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
1295:
1296: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1297: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1298:
1299: IF xla_accounting_cache_pkg.GetValueChar
1300: (p_source_code => 'LEDGER_CATEGORY_CODE'
1301: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
1304: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
1305: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
1306: )
1307: THEN
1308: xla_ae_lines_pkg.BflowUpgEntry
1309: (p_business_method_code => l_bflow_method_code
1310: ,p_business_class_code => l_bflow_class_code
1311: ,p_balance_type => l_balance_type_code);
1312: ELSE
1344: , x_value_type_code => l_adr_value_type_code
1345: , p_side => 'NA'
1346: );
1347:
1348: xla_ae_lines_pkg.set_ccid(
1349: p_code_combination_id => l_ccid
1350: , p_value_type_code => l_adr_value_type_code
1351: , p_transaction_coa_id => l_adr_transaction_coa_id
1352: , p_accounting_coa_id => l_adr_accounting_coa_id
1380: xla_accounting_err_pkg.build_message
1381: (p_appli_s_name => 'XLA'
1382: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
1383: ,p_token_1 => 'LINE_NUMBER'
1384: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
1385: ,p_token_2 => 'LINE_TYPE_NAME'
1386: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
1387: l_component_type
1388: ,l_component_code
1416: --
1417: --
1418: ------------------------------------------------------------------------------------------------
1419: -- 4219869 Business Flow
1420: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
1421: -- Prior Entry. Currently, the following code is always generated.
1422: ------------------------------------------------------------------------------------------------
1423: XLA_AE_LINES_PKG.ValidateCurrentLine;
1424:
1419: -- 4219869 Business Flow
1420: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
1421: -- Prior Entry. Currently, the following code is always generated.
1422: ------------------------------------------------------------------------------------------------
1423: XLA_AE_LINES_PKG.ValidateCurrentLine;
1424:
1425: ------------------------------------------------------------------------------------
1426: -- 4219869 Business Flow
1427: -- Populated credit and debit amounts -- Need to generate this within IF
1425: ------------------------------------------------------------------------------------
1426: -- 4219869 Business Flow
1427: -- Populated credit and debit amounts -- Need to generate this within IF
1428: ------------------------------------------------------------------------------------
1429: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
1430:
1431: ----------------------------------------------------------------------------------
1432: -- 4219869 Business Flow
1433: -- Update journal entry status -- Need to generate this within IF
1457: -- To allow MPA report to determine if it should generate report process
1458: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
1459: ------------------------------------------------------------------------------------------
1460:
1461: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
1462: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
1463: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
1464: -- call ADRs
1465: -- Bug 4922099
1458: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
1459: ------------------------------------------------------------------------------------------
1460:
1461: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
1462: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
1463: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
1464: -- call ADRs
1465: -- Bug 4922099
1466: --
1482: , x_value_type_code => l_adr_value_type_code
1483: , p_side => 'NA'
1484: );
1485:
1486: xla_ae_lines_pkg.set_ccid(
1487: p_code_combination_id => l_ccid
1488: , p_value_type_code => l_adr_value_type_code
1489: , p_transaction_coa_id => l_adr_transaction_coa_id
1490: , p_accounting_coa_id => l_adr_accounting_coa_id
1505:
1506: --
1507: -- Update the line information that should be overwritten
1508: --
1509: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
1510: p_header_num => 1);
1511: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
1512:
1513: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
1507: -- Update the line information that should be overwritten
1508: --
1509: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
1510: p_header_num => 1);
1511: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
1512:
1513: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
1514:
1515: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
1509: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
1510: p_header_num => 1);
1511: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
1512:
1513: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
1514:
1515: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
1516: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
1517: END IF;
1512:
1513: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
1514:
1515: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
1516: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
1517: END IF;
1518:
1519: --
1520: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
1519: --
1520: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
1521: --
1522: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
1523: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
1524: ELSE
1525: ---------------------------------------------------------------------------------------------------
1526: -- 4262811a Switch Sign
1527: ---------------------------------------------------------------------------------------------------
1524: ELSE
1525: ---------------------------------------------------------------------------------------------------
1526: -- 4262811a Switch Sign
1527: ---------------------------------------------------------------------------------------------------
1528: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
1529: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1530: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1531: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1532: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1525: ---------------------------------------------------------------------------------------------------
1526: -- 4262811a Switch Sign
1527: ---------------------------------------------------------------------------------------------------
1528: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
1529: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1530: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1531: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1532: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1533: -- 5132302
1526: -- 4262811a Switch Sign
1527: ---------------------------------------------------------------------------------------------------
1528: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
1529: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1530: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1531: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1532: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1533: -- 5132302
1534: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
1527: ---------------------------------------------------------------------------------------------------
1528: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
1529: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1530: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1531: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1532: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1533: -- 5132302
1534: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
1535: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1528: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
1529: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1530: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1531: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1532: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1533: -- 5132302
1534: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
1535: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1536:
1530: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1531: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1532: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1533: -- 5132302
1534: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
1535: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1536:
1537: END IF;
1538:
1531: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1532: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1533: -- 5132302
1534: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
1535: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1536:
1537: END IF;
1538:
1539: -- 4955764
1536:
1537: END IF;
1538:
1539: -- 4955764
1540: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
1541: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
1542:
1543:
1544: XLA_AE_LINES_PKG.ValidateCurrentLine;
1540: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
1541: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
1542:
1543:
1544: XLA_AE_LINES_PKG.ValidateCurrentLine;
1545: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
1546:
1547: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
1548: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
1541: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
1542:
1543:
1544: XLA_AE_LINES_PKG.ValidateCurrentLine;
1545: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
1546:
1547: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
1548: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
1549: ,p_balance_type_code => l_balance_type_code);
1675: --
1676: -- bulk performance
1677: --
1678: l_balance_type_code VARCHAR2(1);
1679: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
1680: l_log_module VARCHAR2(240);
1681:
1682: --
1683: -- Upgrade strategy
1742: IF NVL(p_source_7,9E125) = 15
1743: THEN
1744:
1745: --
1746: XLA_AE_LINES_PKG.SetNewLine;
1747:
1748: p_balance_type_code := l_balance_type_code;
1749: -- set the flag so later we will know whether the gain loss line needs to be created
1750:
1754:
1755: --
1756: -- bulk performance
1757: --
1758: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
1759: p_header_num => 0); -- 4262811
1760: --
1761: -- set accounting line options
1762: --
1759: p_header_num => 0); -- 4262811
1760: --
1761: -- set accounting line options
1762: --
1763: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
1764: p_natural_side_code => 'D'
1765: , p_gain_or_loss_flag => 'N'
1766: , p_gl_transfer_mode_code => 'S'
1767: , p_acct_entry_type_code => 'E'
1773: --
1774: --
1775: -- set accounting line type info
1776: --
1777: xla_ae_lines_pkg.SetAcctLineType
1778: (p_component_type => l_component_type
1779: ,p_event_type_code => l_event_type_code
1780: ,p_line_definition_owner_code => l_line_definition_owner_code
1781: ,p_line_definition_code => l_line_definition_code
1787: ,p_event_class_code => l_event_class_code);
1788: --
1789: -- set accounting class
1790: --
1791: xla_ae_lines_pkg.SetAcctClass(
1792: p_accounting_class_code => 'REQUISITION'
1793: , p_ae_header_id => l_ae_header_id
1794: );
1795:
1795:
1796: --
1797: -- set rounding class
1798: --
1799: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
1800: 'REQUISITION';
1801:
1802: --
1803: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
1799: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
1800: 'REQUISITION';
1801:
1802: --
1803: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
1804: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
1805: --
1806: -- bulk performance
1807: --
1800: 'REQUISITION';
1801:
1802: --
1803: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
1804: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
1805: --
1806: -- bulk performance
1807: --
1808: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
1804: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
1805: --
1806: -- bulk performance
1807: --
1808: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
1809:
1810: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
1811: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
1812:
1806: -- bulk performance
1807: --
1808: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
1809:
1810: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
1811: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
1812:
1813: -- 4955764
1814: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
1810: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
1811: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
1812:
1813: -- 4955764
1814: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
1815: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
1816:
1817: -- 4458381 Public Sector Enh
1818: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
1814: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
1815: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
1816:
1817: -- 4458381 Public Sector Enh
1818: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
1819: --
1820: -- set accounting attributes for the line type
1821: --
1822: l_entered_amt_idx := 3;
1838: l_rec_acct_attrs.array_char_value(7) := p_source_14;
1839: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
1840: l_rec_acct_attrs.array_num_value(8) := p_source_15;
1841:
1842: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
1843: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
1844:
1845: ---------------------------------------------------------------------------------------------------------------
1846: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1839: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
1840: l_rec_acct_attrs.array_num_value(8) := p_source_15;
1841:
1842: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
1843: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
1844:
1845: ---------------------------------------------------------------------------------------------------------------
1846: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1847: ---------------------------------------------------------------------------------------------------------------
1842: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
1843: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
1844:
1845: ---------------------------------------------------------------------------------------------------------------
1846: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1847: ---------------------------------------------------------------------------------------------------------------
1848: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
1849:
1850: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1844:
1845: ---------------------------------------------------------------------------------------------------------------
1846: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1847: ---------------------------------------------------------------------------------------------------------------
1848: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
1849:
1850: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1851: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1852:
1846: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1847: ---------------------------------------------------------------------------------------------------------------
1848: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
1849:
1850: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1851: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1852:
1853: IF xla_accounting_cache_pkg.GetValueChar
1854: (p_source_code => 'LEDGER_CATEGORY_CODE'
1847: ---------------------------------------------------------------------------------------------------------------
1848: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
1849:
1850: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1851: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1852:
1853: IF xla_accounting_cache_pkg.GetValueChar
1854: (p_source_code => 'LEDGER_CATEGORY_CODE'
1855: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
1858: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
1859: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
1860: )
1861: THEN
1862: xla_ae_lines_pkg.BflowUpgEntry
1863: (p_business_method_code => l_bflow_method_code
1864: ,p_business_class_code => l_bflow_class_code
1865: ,p_balance_type => l_balance_type_code);
1866: ELSE
1898: , x_value_type_code => l_adr_value_type_code
1899: , p_side => 'NA'
1900: );
1901:
1902: xla_ae_lines_pkg.set_ccid(
1903: p_code_combination_id => l_ccid
1904: , p_value_type_code => l_adr_value_type_code
1905: , p_transaction_coa_id => l_adr_transaction_coa_id
1906: , p_accounting_coa_id => l_adr_accounting_coa_id
1934: xla_accounting_err_pkg.build_message
1935: (p_appli_s_name => 'XLA'
1936: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
1937: ,p_token_1 => 'LINE_NUMBER'
1938: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
1939: ,p_token_2 => 'LINE_TYPE_NAME'
1940: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
1941: l_component_type
1942: ,l_component_code
1970: --
1971: --
1972: ------------------------------------------------------------------------------------------------
1973: -- 4219869 Business Flow
1974: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
1975: -- Prior Entry. Currently, the following code is always generated.
1976: ------------------------------------------------------------------------------------------------
1977: XLA_AE_LINES_PKG.ValidateCurrentLine;
1978:
1973: -- 4219869 Business Flow
1974: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
1975: -- Prior Entry. Currently, the following code is always generated.
1976: ------------------------------------------------------------------------------------------------
1977: XLA_AE_LINES_PKG.ValidateCurrentLine;
1978:
1979: ------------------------------------------------------------------------------------
1980: -- 4219869 Business Flow
1981: -- Populated credit and debit amounts -- Need to generate this within IF
1979: ------------------------------------------------------------------------------------
1980: -- 4219869 Business Flow
1981: -- Populated credit and debit amounts -- Need to generate this within IF
1982: ------------------------------------------------------------------------------------
1983: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
1984:
1985: ----------------------------------------------------------------------------------
1986: -- 4219869 Business Flow
1987: -- Update journal entry status -- Need to generate this within IF
2011: -- To allow MPA report to determine if it should generate report process
2012: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
2013: ------------------------------------------------------------------------------------------
2014:
2015: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
2016: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
2017: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
2018: -- call ADRs
2019: -- Bug 4922099
2012: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
2013: ------------------------------------------------------------------------------------------
2014:
2015: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
2016: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
2017: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
2018: -- call ADRs
2019: -- Bug 4922099
2020: --
2036: , x_value_type_code => l_adr_value_type_code
2037: , p_side => 'NA'
2038: );
2039:
2040: xla_ae_lines_pkg.set_ccid(
2041: p_code_combination_id => l_ccid
2042: , p_value_type_code => l_adr_value_type_code
2043: , p_transaction_coa_id => l_adr_transaction_coa_id
2044: , p_accounting_coa_id => l_adr_accounting_coa_id
2059:
2060: --
2061: -- Update the line information that should be overwritten
2062: --
2063: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
2064: p_header_num => 1);
2065: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
2066:
2067: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
2061: -- Update the line information that should be overwritten
2062: --
2063: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
2064: p_header_num => 1);
2065: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
2066:
2067: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
2068:
2069: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
2063: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
2064: p_header_num => 1);
2065: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
2066:
2067: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
2068:
2069: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
2070: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
2071: END IF;
2066:
2067: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
2068:
2069: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
2070: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
2071: END IF;
2072:
2073: --
2074: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
2073: --
2074: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
2075: --
2076: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
2077: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
2078: ELSE
2079: ---------------------------------------------------------------------------------------------------
2080: -- 4262811a Switch Sign
2081: ---------------------------------------------------------------------------------------------------
2078: ELSE
2079: ---------------------------------------------------------------------------------------------------
2080: -- 4262811a Switch Sign
2081: ---------------------------------------------------------------------------------------------------
2082: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2083: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2084: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2085: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2086: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2079: ---------------------------------------------------------------------------------------------------
2080: -- 4262811a Switch Sign
2081: ---------------------------------------------------------------------------------------------------
2082: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2083: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2084: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2085: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2086: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2087: -- 5132302
2080: -- 4262811a Switch Sign
2081: ---------------------------------------------------------------------------------------------------
2082: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2083: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2084: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2085: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2086: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2087: -- 5132302
2088: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2081: ---------------------------------------------------------------------------------------------------
2082: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2083: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2084: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2085: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2086: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2087: -- 5132302
2088: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2089: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2082: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2083: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2084: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2085: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2086: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2087: -- 5132302
2088: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2089: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2090:
2084: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2085: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2086: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2087: -- 5132302
2088: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2089: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2090:
2091: END IF;
2092:
2085: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2086: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2087: -- 5132302
2088: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2089: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2090:
2091: END IF;
2092:
2093: -- 4955764
2090:
2091: END IF;
2092:
2093: -- 4955764
2094: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
2095: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
2096:
2097:
2098: XLA_AE_LINES_PKG.ValidateCurrentLine;
2094: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
2095: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
2096:
2097:
2098: XLA_AE_LINES_PKG.ValidateCurrentLine;
2099: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
2100:
2101: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
2102: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
2095: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
2096:
2097:
2098: XLA_AE_LINES_PKG.ValidateCurrentLine;
2099: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
2100:
2101: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
2102: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
2103: ,p_balance_type_code => l_balance_type_code);
2229: --
2230: -- bulk performance
2231: --
2232: l_balance_type_code VARCHAR2(1);
2233: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
2234: l_log_module VARCHAR2(240);
2235:
2236: --
2237: -- Upgrade strategy
2296: IF NVL(p_source_7,9E125) = 15
2297: THEN
2298:
2299: --
2300: XLA_AE_LINES_PKG.SetNewLine;
2301:
2302: p_balance_type_code := l_balance_type_code;
2303: -- set the flag so later we will know whether the gain loss line needs to be created
2304:
2308:
2309: --
2310: -- bulk performance
2311: --
2312: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
2313: p_header_num => 0); -- 4262811
2314: --
2315: -- set accounting line options
2316: --
2313: p_header_num => 0); -- 4262811
2314: --
2315: -- set accounting line options
2316: --
2317: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
2318: p_natural_side_code => 'D'
2319: , p_gain_or_loss_flag => 'N'
2320: , p_gl_transfer_mode_code => 'S'
2321: , p_acct_entry_type_code => 'E'
2327: --
2328: --
2329: -- set accounting line type info
2330: --
2331: xla_ae_lines_pkg.SetAcctLineType
2332: (p_component_type => l_component_type
2333: ,p_event_type_code => l_event_type_code
2334: ,p_line_definition_owner_code => l_line_definition_owner_code
2335: ,p_line_definition_code => l_line_definition_code
2341: ,p_event_class_code => l_event_class_code);
2342: --
2343: -- set accounting class
2344: --
2345: xla_ae_lines_pkg.SetAcctClass(
2346: p_accounting_class_code => 'REQUISITION'
2347: , p_ae_header_id => l_ae_header_id
2348: );
2349:
2349:
2350: --
2351: -- set rounding class
2352: --
2353: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
2354: 'REQUISITION';
2355:
2356: --
2357: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
2353: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
2354: 'REQUISITION';
2355:
2356: --
2357: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
2358: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
2359: --
2360: -- bulk performance
2361: --
2354: 'REQUISITION';
2355:
2356: --
2357: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
2358: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
2359: --
2360: -- bulk performance
2361: --
2362: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
2358: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
2359: --
2360: -- bulk performance
2361: --
2362: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
2363:
2364: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
2365: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
2366:
2360: -- bulk performance
2361: --
2362: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
2363:
2364: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
2365: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
2366:
2367: -- 4955764
2368: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
2364: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
2365: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
2366:
2367: -- 4955764
2368: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
2369: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
2370:
2371: -- 4458381 Public Sector Enh
2372: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
2368: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
2369: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
2370:
2371: -- 4458381 Public Sector Enh
2372: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
2373: --
2374: -- set accounting attributes for the line type
2375: --
2376: l_entered_amt_idx := 3;
2392: l_rec_acct_attrs.array_char_value(7) := p_source_14;
2393: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
2394: l_rec_acct_attrs.array_num_value(8) := p_source_15;
2395:
2396: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
2397: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
2398:
2399: ---------------------------------------------------------------------------------------------------------------
2400: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2393: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
2394: l_rec_acct_attrs.array_num_value(8) := p_source_15;
2395:
2396: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
2397: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
2398:
2399: ---------------------------------------------------------------------------------------------------------------
2400: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2401: ---------------------------------------------------------------------------------------------------------------
2396: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
2397: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
2398:
2399: ---------------------------------------------------------------------------------------------------------------
2400: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2401: ---------------------------------------------------------------------------------------------------------------
2402: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
2403:
2404: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2398:
2399: ---------------------------------------------------------------------------------------------------------------
2400: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2401: ---------------------------------------------------------------------------------------------------------------
2402: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
2403:
2404: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2405: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2406:
2400: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2401: ---------------------------------------------------------------------------------------------------------------
2402: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
2403:
2404: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2405: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2406:
2407: IF xla_accounting_cache_pkg.GetValueChar
2408: (p_source_code => 'LEDGER_CATEGORY_CODE'
2401: ---------------------------------------------------------------------------------------------------------------
2402: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
2403:
2404: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2405: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2406:
2407: IF xla_accounting_cache_pkg.GetValueChar
2408: (p_source_code => 'LEDGER_CATEGORY_CODE'
2409: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
2412: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
2413: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
2414: )
2415: THEN
2416: xla_ae_lines_pkg.BflowUpgEntry
2417: (p_business_method_code => l_bflow_method_code
2418: ,p_business_class_code => l_bflow_class_code
2419: ,p_balance_type => l_balance_type_code);
2420: ELSE
2452: , x_value_type_code => l_adr_value_type_code
2453: , p_side => 'NA'
2454: );
2455:
2456: xla_ae_lines_pkg.set_ccid(
2457: p_code_combination_id => l_ccid
2458: , p_value_type_code => l_adr_value_type_code
2459: , p_transaction_coa_id => l_adr_transaction_coa_id
2460: , p_accounting_coa_id => l_adr_accounting_coa_id
2488: xla_accounting_err_pkg.build_message
2489: (p_appli_s_name => 'XLA'
2490: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
2491: ,p_token_1 => 'LINE_NUMBER'
2492: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
2493: ,p_token_2 => 'LINE_TYPE_NAME'
2494: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
2495: l_component_type
2496: ,l_component_code
2524: --
2525: --
2526: ------------------------------------------------------------------------------------------------
2527: -- 4219869 Business Flow
2528: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
2529: -- Prior Entry. Currently, the following code is always generated.
2530: ------------------------------------------------------------------------------------------------
2531: XLA_AE_LINES_PKG.ValidateCurrentLine;
2532:
2527: -- 4219869 Business Flow
2528: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
2529: -- Prior Entry. Currently, the following code is always generated.
2530: ------------------------------------------------------------------------------------------------
2531: XLA_AE_LINES_PKG.ValidateCurrentLine;
2532:
2533: ------------------------------------------------------------------------------------
2534: -- 4219869 Business Flow
2535: -- Populated credit and debit amounts -- Need to generate this within IF
2533: ------------------------------------------------------------------------------------
2534: -- 4219869 Business Flow
2535: -- Populated credit and debit amounts -- Need to generate this within IF
2536: ------------------------------------------------------------------------------------
2537: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
2538:
2539: ----------------------------------------------------------------------------------
2540: -- 4219869 Business Flow
2541: -- Update journal entry status -- Need to generate this within IF
2565: -- To allow MPA report to determine if it should generate report process
2566: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
2567: ------------------------------------------------------------------------------------------
2568:
2569: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
2570: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
2571: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
2572: -- call ADRs
2573: -- Bug 4922099
2566: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
2567: ------------------------------------------------------------------------------------------
2568:
2569: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
2570: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
2571: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
2572: -- call ADRs
2573: -- Bug 4922099
2574: --
2590: , x_value_type_code => l_adr_value_type_code
2591: , p_side => 'NA'
2592: );
2593:
2594: xla_ae_lines_pkg.set_ccid(
2595: p_code_combination_id => l_ccid
2596: , p_value_type_code => l_adr_value_type_code
2597: , p_transaction_coa_id => l_adr_transaction_coa_id
2598: , p_accounting_coa_id => l_adr_accounting_coa_id
2613:
2614: --
2615: -- Update the line information that should be overwritten
2616: --
2617: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
2618: p_header_num => 1);
2619: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
2620:
2621: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
2615: -- Update the line information that should be overwritten
2616: --
2617: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
2618: p_header_num => 1);
2619: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
2620:
2621: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
2622:
2623: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
2617: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
2618: p_header_num => 1);
2619: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
2620:
2621: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
2622:
2623: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
2624: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
2625: END IF;
2620:
2621: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
2622:
2623: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
2624: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
2625: END IF;
2626:
2627: --
2628: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
2627: --
2628: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
2629: --
2630: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
2631: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
2632: ELSE
2633: ---------------------------------------------------------------------------------------------------
2634: -- 4262811a Switch Sign
2635: ---------------------------------------------------------------------------------------------------
2632: ELSE
2633: ---------------------------------------------------------------------------------------------------
2634: -- 4262811a Switch Sign
2635: ---------------------------------------------------------------------------------------------------
2636: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2637: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2638: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2639: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2640: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2633: ---------------------------------------------------------------------------------------------------
2634: -- 4262811a Switch Sign
2635: ---------------------------------------------------------------------------------------------------
2636: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2637: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2638: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2639: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2640: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2641: -- 5132302
2634: -- 4262811a Switch Sign
2635: ---------------------------------------------------------------------------------------------------
2636: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2637: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2638: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2639: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2640: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2641: -- 5132302
2642: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2635: ---------------------------------------------------------------------------------------------------
2636: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2637: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2638: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2639: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2640: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2641: -- 5132302
2642: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2643: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2636: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2637: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2638: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2639: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2640: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2641: -- 5132302
2642: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2643: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2644:
2638: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2639: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2640: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2641: -- 5132302
2642: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2643: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2644:
2645: END IF;
2646:
2639: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2640: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2641: -- 5132302
2642: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2643: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2644:
2645: END IF;
2646:
2647: -- 4955764
2644:
2645: END IF;
2646:
2647: -- 4955764
2648: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
2649: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
2650:
2651:
2652: XLA_AE_LINES_PKG.ValidateCurrentLine;
2648: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
2649: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
2650:
2651:
2652: XLA_AE_LINES_PKG.ValidateCurrentLine;
2653: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
2654:
2655: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
2656: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
2649: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
2650:
2651:
2652: XLA_AE_LINES_PKG.ValidateCurrentLine;
2653: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
2654:
2655: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
2656: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
2657: ,p_balance_type_code => l_balance_type_code);
2793: --
2794: -- bulk performance
2795: --
2796: l_balance_type_code VARCHAR2(1);
2797: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
2798: l_log_module VARCHAR2(240);
2799:
2800: --
2801: -- Upgrade strategy
2870: ') = 'RET_RI_INV'
2871: THEN
2872:
2873: --
2874: XLA_AE_LINES_PKG.SetNewLine;
2875:
2876: p_balance_type_code := l_balance_type_code;
2877: -- set the flag so later we will know whether the gain loss line needs to be created
2878:
2882:
2883: --
2884: -- bulk performance
2885: --
2886: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
2887: p_header_num => 0); -- 4262811
2888: --
2889: -- set accounting line options
2890: --
2887: p_header_num => 0); -- 4262811
2888: --
2889: -- set accounting line options
2890: --
2891: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
2892: p_natural_side_code => 'D'
2893: , p_gain_or_loss_flag => 'N'
2894: , p_gl_transfer_mode_code => 'S'
2895: , p_acct_entry_type_code => 'E'
2901: --
2902: --
2903: -- set accounting line type info
2904: --
2905: xla_ae_lines_pkg.SetAcctLineType
2906: (p_component_type => l_component_type
2907: ,p_event_type_code => l_event_type_code
2908: ,p_line_definition_owner_code => l_line_definition_owner_code
2909: ,p_line_definition_code => l_line_definition_code
2915: ,p_event_class_code => l_event_class_code);
2916: --
2917: -- set accounting class
2918: --
2919: xla_ae_lines_pkg.SetAcctClass(
2920: p_accounting_class_code => 'PURCHASE_ORDER'
2921: , p_ae_header_id => l_ae_header_id
2922: );
2923:
2923:
2924: --
2925: -- set rounding class
2926: --
2927: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
2928: 'PURCHASE_ORDER';
2929:
2930: --
2931: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
2927: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
2928: 'PURCHASE_ORDER';
2929:
2930: --
2931: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
2932: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
2933: --
2934: -- bulk performance
2935: --
2928: 'PURCHASE_ORDER';
2929:
2930: --
2931: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
2932: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
2933: --
2934: -- bulk performance
2935: --
2936: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
2932: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
2933: --
2934: -- bulk performance
2935: --
2936: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
2937:
2938: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
2939: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
2940:
2934: -- bulk performance
2935: --
2936: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
2937:
2938: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
2939: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
2940:
2941: -- 4955764
2942: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
2938: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
2939: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
2940:
2941: -- 4955764
2942: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
2943: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
2944:
2945: -- 4458381 Public Sector Enh
2946:
2992: l_rec_acct_attrs.array_num_value(20) := p_source_28;
2993: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
2994: l_rec_acct_attrs.array_num_value(21) := p_source_28;
2995:
2996: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
2997: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
2998:
2999: ---------------------------------------------------------------------------------------------------------------
3000: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2993: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
2994: l_rec_acct_attrs.array_num_value(21) := p_source_28;
2995:
2996: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
2997: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
2998:
2999: ---------------------------------------------------------------------------------------------------------------
3000: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3001: ---------------------------------------------------------------------------------------------------------------
2996: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
2997: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
2998:
2999: ---------------------------------------------------------------------------------------------------------------
3000: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3001: ---------------------------------------------------------------------------------------------------------------
3002: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
3003:
3004: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2998:
2999: ---------------------------------------------------------------------------------------------------------------
3000: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3001: ---------------------------------------------------------------------------------------------------------------
3002: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
3003:
3004: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3005: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3006:
3000: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3001: ---------------------------------------------------------------------------------------------------------------
3002: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
3003:
3004: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3005: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3006:
3007: IF xla_accounting_cache_pkg.GetValueChar
3008: (p_source_code => 'LEDGER_CATEGORY_CODE'
3001: ---------------------------------------------------------------------------------------------------------------
3002: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
3003:
3004: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3005: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3006:
3007: IF xla_accounting_cache_pkg.GetValueChar
3008: (p_source_code => 'LEDGER_CATEGORY_CODE'
3009: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
3012: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
3013: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
3014: )
3015: THEN
3016: xla_ae_lines_pkg.BflowUpgEntry
3017: (p_business_method_code => l_bflow_method_code
3018: ,p_business_class_code => l_bflow_class_code
3019: ,p_balance_type => l_balance_type_code);
3020: ELSE
3018: ,p_business_class_code => l_bflow_class_code
3019: ,p_balance_type => l_balance_type_code);
3020: ELSE
3021: NULL;
3022: XLA_AE_LINES_PKG.business_flow_validation(
3023: p_business_method_code => l_bflow_method_code
3024: ,p_business_class_code => l_bflow_class_code
3025: ,p_inherit_description_flag => l_inherit_desc_flag);
3026: END IF;
3065: xla_accounting_err_pkg.build_message
3066: (p_appli_s_name => 'XLA'
3067: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
3068: ,p_token_1 => 'LINE_NUMBER'
3069: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
3070: ,p_token_2 => 'LINE_TYPE_NAME'
3071: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
3072: l_component_type
3073: ,l_component_code
3101: --
3102: --
3103: ------------------------------------------------------------------------------------------------
3104: -- 4219869 Business Flow
3105: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
3106: -- Prior Entry. Currently, the following code is always generated.
3107: ------------------------------------------------------------------------------------------------
3108: -- No ValidateCurrentLine for business flow method of Prior Entry
3109:
3110: ------------------------------------------------------------------------------------
3111: -- 4219869 Business Flow
3112: -- Populated credit and debit amounts -- Need to generate this within IF
3113: ------------------------------------------------------------------------------------
3114: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
3115:
3116: ----------------------------------------------------------------------------------
3117: -- 4219869 Business Flow
3118: -- Update journal entry status -- Need to generate this within IF
3142: -- To allow MPA report to determine if it should generate report process
3143: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
3144: ------------------------------------------------------------------------------------------
3145:
3146: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
3147: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
3148: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
3149: -- call ADRs
3150: -- Bug 4922099
3143: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
3144: ------------------------------------------------------------------------------------------
3145:
3146: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
3147: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
3148: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
3149: -- call ADRs
3150: -- Bug 4922099
3151: --
3164:
3165: --
3166: -- Update the line information that should be overwritten
3167: --
3168: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
3169: p_header_num => 1);
3170: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
3171:
3172: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
3166: -- Update the line information that should be overwritten
3167: --
3168: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
3169: p_header_num => 1);
3170: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
3171:
3172: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
3173:
3174: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
3168: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
3169: p_header_num => 1);
3170: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
3171:
3172: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
3173:
3174: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
3175: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
3176: END IF;
3171:
3172: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
3173:
3174: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
3175: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
3176: END IF;
3177:
3178: --
3179: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
3178: --
3179: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
3180: --
3181: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
3182: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
3183: ELSE
3184: ---------------------------------------------------------------------------------------------------
3185: -- 4262811a Switch Sign
3186: ---------------------------------------------------------------------------------------------------
3183: ELSE
3184: ---------------------------------------------------------------------------------------------------
3185: -- 4262811a Switch Sign
3186: ---------------------------------------------------------------------------------------------------
3187: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3188: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3189: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3190: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3191: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3184: ---------------------------------------------------------------------------------------------------
3185: -- 4262811a Switch Sign
3186: ---------------------------------------------------------------------------------------------------
3187: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3188: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3189: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3190: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3191: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3192: -- 5132302
3185: -- 4262811a Switch Sign
3186: ---------------------------------------------------------------------------------------------------
3187: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3188: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3189: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3190: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3191: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3192: -- 5132302
3193: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3186: ---------------------------------------------------------------------------------------------------
3187: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3188: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3189: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3190: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3191: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3192: -- 5132302
3193: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3194: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3187: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3188: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3189: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3190: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3191: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3192: -- 5132302
3193: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3194: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3195:
3189: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3190: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3191: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3192: -- 5132302
3193: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3194: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3195:
3196: END IF;
3197:
3190: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3191: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3192: -- 5132302
3193: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3194: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3195:
3196: END IF;
3197:
3198: -- 4955764
3195:
3196: END IF;
3197:
3198: -- 4955764
3199: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
3200: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
3201:
3202:
3203: XLA_AE_LINES_PKG.ValidateCurrentLine;
3199: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
3200: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
3201:
3202:
3203: XLA_AE_LINES_PKG.ValidateCurrentLine;
3204: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
3205:
3206: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
3207: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
3200: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
3201:
3202:
3203: XLA_AE_LINES_PKG.ValidateCurrentLine;
3204: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
3205:
3206: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
3207: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
3208: ,p_balance_type_code => l_balance_type_code);
3344: --
3345: -- bulk performance
3346: --
3347: l_balance_type_code VARCHAR2(1);
3348: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
3349: l_log_module VARCHAR2(240);
3350:
3351: --
3352: -- Upgrade strategy
3421: ') = 'RET_RI_INV'
3422: THEN
3423:
3424: --
3425: XLA_AE_LINES_PKG.SetNewLine;
3426:
3427: p_balance_type_code := l_balance_type_code;
3428: -- set the flag so later we will know whether the gain loss line needs to be created
3429:
3433:
3434: --
3435: -- bulk performance
3436: --
3437: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
3438: p_header_num => 0); -- 4262811
3439: --
3440: -- set accounting line options
3441: --
3438: p_header_num => 0); -- 4262811
3439: --
3440: -- set accounting line options
3441: --
3442: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
3443: p_natural_side_code => 'D'
3444: , p_gain_or_loss_flag => 'N'
3445: , p_gl_transfer_mode_code => 'S'
3446: , p_acct_entry_type_code => 'E'
3452: --
3453: --
3454: -- set accounting line type info
3455: --
3456: xla_ae_lines_pkg.SetAcctLineType
3457: (p_component_type => l_component_type
3458: ,p_event_type_code => l_event_type_code
3459: ,p_line_definition_owner_code => l_line_definition_owner_code
3460: ,p_line_definition_code => l_line_definition_code
3466: ,p_event_class_code => l_event_class_code);
3467: --
3468: -- set accounting class
3469: --
3470: xla_ae_lines_pkg.SetAcctClass(
3471: p_accounting_class_code => 'PURCHASE_ORDER'
3472: , p_ae_header_id => l_ae_header_id
3473: );
3474:
3474:
3475: --
3476: -- set rounding class
3477: --
3478: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
3479: 'PURCHASE_ORDER';
3480:
3481: --
3482: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
3478: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
3479: 'PURCHASE_ORDER';
3480:
3481: --
3482: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
3483: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
3484: --
3485: -- bulk performance
3486: --
3479: 'PURCHASE_ORDER';
3480:
3481: --
3482: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
3483: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
3484: --
3485: -- bulk performance
3486: --
3487: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
3483: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
3484: --
3485: -- bulk performance
3486: --
3487: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
3488:
3489: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
3490: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
3491:
3485: -- bulk performance
3486: --
3487: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
3488:
3489: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
3490: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
3491:
3492: -- 4955764
3493: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
3489: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
3490: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
3491:
3492: -- 4955764
3493: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
3494: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
3495:
3496: -- 4458381 Public Sector Enh
3497:
3543: l_rec_acct_attrs.array_num_value(20) := p_source_28;
3544: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
3545: l_rec_acct_attrs.array_num_value(21) := p_source_28;
3546:
3547: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
3548: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
3549:
3550: ---------------------------------------------------------------------------------------------------------------
3551: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3544: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
3545: l_rec_acct_attrs.array_num_value(21) := p_source_28;
3546:
3547: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
3548: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
3549:
3550: ---------------------------------------------------------------------------------------------------------------
3551: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3552: ---------------------------------------------------------------------------------------------------------------
3547: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
3548: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
3549:
3550: ---------------------------------------------------------------------------------------------------------------
3551: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3552: ---------------------------------------------------------------------------------------------------------------
3553: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
3554:
3555: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3549:
3550: ---------------------------------------------------------------------------------------------------------------
3551: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3552: ---------------------------------------------------------------------------------------------------------------
3553: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
3554:
3555: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3556: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3557:
3551: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3552: ---------------------------------------------------------------------------------------------------------------
3553: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
3554:
3555: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3556: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3557:
3558: IF xla_accounting_cache_pkg.GetValueChar
3559: (p_source_code => 'LEDGER_CATEGORY_CODE'
3552: ---------------------------------------------------------------------------------------------------------------
3553: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
3554:
3555: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3556: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3557:
3558: IF xla_accounting_cache_pkg.GetValueChar
3559: (p_source_code => 'LEDGER_CATEGORY_CODE'
3560: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
3563: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
3564: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
3565: )
3566: THEN
3567: xla_ae_lines_pkg.BflowUpgEntry
3568: (p_business_method_code => l_bflow_method_code
3569: ,p_business_class_code => l_bflow_class_code
3570: ,p_balance_type => l_balance_type_code);
3571: ELSE
3569: ,p_business_class_code => l_bflow_class_code
3570: ,p_balance_type => l_balance_type_code);
3571: ELSE
3572: NULL;
3573: XLA_AE_LINES_PKG.business_flow_validation(
3574: p_business_method_code => l_bflow_method_code
3575: ,p_business_class_code => l_bflow_class_code
3576: ,p_inherit_description_flag => l_inherit_desc_flag);
3577: END IF;
3616: xla_accounting_err_pkg.build_message
3617: (p_appli_s_name => 'XLA'
3618: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
3619: ,p_token_1 => 'LINE_NUMBER'
3620: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
3621: ,p_token_2 => 'LINE_TYPE_NAME'
3622: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
3623: l_component_type
3624: ,l_component_code
3652: --
3653: --
3654: ------------------------------------------------------------------------------------------------
3655: -- 4219869 Business Flow
3656: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
3657: -- Prior Entry. Currently, the following code is always generated.
3658: ------------------------------------------------------------------------------------------------
3659: -- No ValidateCurrentLine for business flow method of Prior Entry
3660:
3661: ------------------------------------------------------------------------------------
3662: -- 4219869 Business Flow
3663: -- Populated credit and debit amounts -- Need to generate this within IF
3664: ------------------------------------------------------------------------------------
3665: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
3666:
3667: ----------------------------------------------------------------------------------
3668: -- 4219869 Business Flow
3669: -- Update journal entry status -- Need to generate this within IF
3693: -- To allow MPA report to determine if it should generate report process
3694: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
3695: ------------------------------------------------------------------------------------------
3696:
3697: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
3698: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
3699: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
3700: -- call ADRs
3701: -- Bug 4922099
3694: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
3695: ------------------------------------------------------------------------------------------
3696:
3697: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
3698: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
3699: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
3700: -- call ADRs
3701: -- Bug 4922099
3702: --
3715:
3716: --
3717: -- Update the line information that should be overwritten
3718: --
3719: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
3720: p_header_num => 1);
3721: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
3722:
3723: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
3717: -- Update the line information that should be overwritten
3718: --
3719: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
3720: p_header_num => 1);
3721: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
3722:
3723: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
3724:
3725: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
3719: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
3720: p_header_num => 1);
3721: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
3722:
3723: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
3724:
3725: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
3726: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
3727: END IF;
3722:
3723: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
3724:
3725: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
3726: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
3727: END IF;
3728:
3729: --
3730: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
3729: --
3730: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
3731: --
3732: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
3733: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
3734: ELSE
3735: ---------------------------------------------------------------------------------------------------
3736: -- 4262811a Switch Sign
3737: ---------------------------------------------------------------------------------------------------
3734: ELSE
3735: ---------------------------------------------------------------------------------------------------
3736: -- 4262811a Switch Sign
3737: ---------------------------------------------------------------------------------------------------
3738: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3739: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3740: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3741: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3742: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3735: ---------------------------------------------------------------------------------------------------
3736: -- 4262811a Switch Sign
3737: ---------------------------------------------------------------------------------------------------
3738: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3739: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3740: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3741: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3742: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3743: -- 5132302
3736: -- 4262811a Switch Sign
3737: ---------------------------------------------------------------------------------------------------
3738: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3739: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3740: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3741: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3742: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3743: -- 5132302
3744: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3737: ---------------------------------------------------------------------------------------------------
3738: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3739: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3740: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3741: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3742: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3743: -- 5132302
3744: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3745: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3738: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3739: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3740: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3741: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3742: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3743: -- 5132302
3744: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3745: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3746:
3740: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3741: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3742: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3743: -- 5132302
3744: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3745: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3746:
3747: END IF;
3748:
3741: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3742: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3743: -- 5132302
3744: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3745: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3746:
3747: END IF;
3748:
3749: -- 4955764
3746:
3747: END IF;
3748:
3749: -- 4955764
3750: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
3751: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
3752:
3753:
3754: XLA_AE_LINES_PKG.ValidateCurrentLine;
3750: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
3751: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
3752:
3753:
3754: XLA_AE_LINES_PKG.ValidateCurrentLine;
3755: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
3756:
3757: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
3758: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
3751: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
3752:
3753:
3754: XLA_AE_LINES_PKG.ValidateCurrentLine;
3755: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
3756:
3757: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
3758: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
3759: ,p_balance_type_code => l_balance_type_code);
3895: --
3896: -- bulk performance
3897: --
3898: l_balance_type_code VARCHAR2(1);
3899: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
3900: l_log_module VARCHAR2(240);
3901:
3902: --
3903: -- Upgrade strategy
3972: ') = 'RET_RI_INV'
3973: THEN
3974:
3975: --
3976: XLA_AE_LINES_PKG.SetNewLine;
3977:
3978: p_balance_type_code := l_balance_type_code;
3979: -- set the flag so later we will know whether the gain loss line needs to be created
3980:
3984:
3985: --
3986: -- bulk performance
3987: --
3988: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
3989: p_header_num => 0); -- 4262811
3990: --
3991: -- set accounting line options
3992: --
3989: p_header_num => 0); -- 4262811
3990: --
3991: -- set accounting line options
3992: --
3993: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
3994: p_natural_side_code => 'D'
3995: , p_gain_or_loss_flag => 'N'
3996: , p_gl_transfer_mode_code => 'S'
3997: , p_acct_entry_type_code => 'E'
4003: --
4004: --
4005: -- set accounting line type info
4006: --
4007: xla_ae_lines_pkg.SetAcctLineType
4008: (p_component_type => l_component_type
4009: ,p_event_type_code => l_event_type_code
4010: ,p_line_definition_owner_code => l_line_definition_owner_code
4011: ,p_line_definition_code => l_line_definition_code
4017: ,p_event_class_code => l_event_class_code);
4018: --
4019: -- set accounting class
4020: --
4021: xla_ae_lines_pkg.SetAcctClass(
4022: p_accounting_class_code => 'PURCHASE_ORDER'
4023: , p_ae_header_id => l_ae_header_id
4024: );
4025:
4025:
4026: --
4027: -- set rounding class
4028: --
4029: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
4030: 'PURCHASE_ORDER';
4031:
4032: --
4033: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
4029: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
4030: 'PURCHASE_ORDER';
4031:
4032: --
4033: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
4034: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
4035: --
4036: -- bulk performance
4037: --
4030: 'PURCHASE_ORDER';
4031:
4032: --
4033: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
4034: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
4035: --
4036: -- bulk performance
4037: --
4038: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
4034: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
4035: --
4036: -- bulk performance
4037: --
4038: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
4039:
4040: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
4041: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
4042:
4036: -- bulk performance
4037: --
4038: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
4039:
4040: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
4041: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
4042:
4043: -- 4955764
4044: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4040: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
4041: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
4042:
4043: -- 4955764
4044: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4045: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
4046:
4047: -- 4458381 Public Sector Enh
4048:
4094: l_rec_acct_attrs.array_num_value(20) := p_source_28;
4095: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
4096: l_rec_acct_attrs.array_num_value(21) := p_source_28;
4097:
4098: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4099: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4100:
4101: ---------------------------------------------------------------------------------------------------------------
4102: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4095: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
4096: l_rec_acct_attrs.array_num_value(21) := p_source_28;
4097:
4098: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4099: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4100:
4101: ---------------------------------------------------------------------------------------------------------------
4102: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4103: ---------------------------------------------------------------------------------------------------------------
4098: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4099: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4100:
4101: ---------------------------------------------------------------------------------------------------------------
4102: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4103: ---------------------------------------------------------------------------------------------------------------
4104: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4105:
4106: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4100:
4101: ---------------------------------------------------------------------------------------------------------------
4102: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4103: ---------------------------------------------------------------------------------------------------------------
4104: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4105:
4106: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4107: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4108:
4102: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4103: ---------------------------------------------------------------------------------------------------------------
4104: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4105:
4106: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4107: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4108:
4109: IF xla_accounting_cache_pkg.GetValueChar
4110: (p_source_code => 'LEDGER_CATEGORY_CODE'
4103: ---------------------------------------------------------------------------------------------------------------
4104: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4105:
4106: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4107: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4108:
4109: IF xla_accounting_cache_pkg.GetValueChar
4110: (p_source_code => 'LEDGER_CATEGORY_CODE'
4111: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
4114: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
4115: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
4116: )
4117: THEN
4118: xla_ae_lines_pkg.BflowUpgEntry
4119: (p_business_method_code => l_bflow_method_code
4120: ,p_business_class_code => l_bflow_class_code
4121: ,p_balance_type => l_balance_type_code);
4122: ELSE
4120: ,p_business_class_code => l_bflow_class_code
4121: ,p_balance_type => l_balance_type_code);
4122: ELSE
4123: NULL;
4124: XLA_AE_LINES_PKG.business_flow_validation(
4125: p_business_method_code => l_bflow_method_code
4126: ,p_business_class_code => l_bflow_class_code
4127: ,p_inherit_description_flag => l_inherit_desc_flag);
4128: END IF;
4167: xla_accounting_err_pkg.build_message
4168: (p_appli_s_name => 'XLA'
4169: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
4170: ,p_token_1 => 'LINE_NUMBER'
4171: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
4172: ,p_token_2 => 'LINE_TYPE_NAME'
4173: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
4174: l_component_type
4175: ,l_component_code
4203: --
4204: --
4205: ------------------------------------------------------------------------------------------------
4206: -- 4219869 Business Flow
4207: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
4208: -- Prior Entry. Currently, the following code is always generated.
4209: ------------------------------------------------------------------------------------------------
4210: -- No ValidateCurrentLine for business flow method of Prior Entry
4211:
4212: ------------------------------------------------------------------------------------
4213: -- 4219869 Business Flow
4214: -- Populated credit and debit amounts -- Need to generate this within IF
4215: ------------------------------------------------------------------------------------
4216: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
4217:
4218: ----------------------------------------------------------------------------------
4219: -- 4219869 Business Flow
4220: -- Update journal entry status -- Need to generate this within IF
4244: -- To allow MPA report to determine if it should generate report process
4245: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
4246: ------------------------------------------------------------------------------------------
4247:
4248: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
4249: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
4250: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
4251: -- call ADRs
4252: -- Bug 4922099
4245: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
4246: ------------------------------------------------------------------------------------------
4247:
4248: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
4249: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
4250: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
4251: -- call ADRs
4252: -- Bug 4922099
4253: --
4266:
4267: --
4268: -- Update the line information that should be overwritten
4269: --
4270: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4271: p_header_num => 1);
4272: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4273:
4274: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4268: -- Update the line information that should be overwritten
4269: --
4270: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4271: p_header_num => 1);
4272: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4273:
4274: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4275:
4276: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4270: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4271: p_header_num => 1);
4272: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4273:
4274: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4275:
4276: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4277: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
4278: END IF;
4273:
4274: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4275:
4276: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4277: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
4278: END IF;
4279:
4280: --
4281: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
4280: --
4281: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
4282: --
4283: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
4284: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
4285: ELSE
4286: ---------------------------------------------------------------------------------------------------
4287: -- 4262811a Switch Sign
4288: ---------------------------------------------------------------------------------------------------
4285: ELSE
4286: ---------------------------------------------------------------------------------------------------
4287: -- 4262811a Switch Sign
4288: ---------------------------------------------------------------------------------------------------
4289: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4290: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4291: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4292: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4293: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4286: ---------------------------------------------------------------------------------------------------
4287: -- 4262811a Switch Sign
4288: ---------------------------------------------------------------------------------------------------
4289: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4290: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4291: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4292: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4293: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4294: -- 5132302
4287: -- 4262811a Switch Sign
4288: ---------------------------------------------------------------------------------------------------
4289: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4290: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4291: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4292: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4293: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4294: -- 5132302
4295: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4288: ---------------------------------------------------------------------------------------------------
4289: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4290: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4291: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4292: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4293: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4294: -- 5132302
4295: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4296: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4289: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4290: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4291: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4292: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4293: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4294: -- 5132302
4295: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4296: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4297:
4291: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4292: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4293: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4294: -- 5132302
4295: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4296: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4297:
4298: END IF;
4299:
4292: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4293: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4294: -- 5132302
4295: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4296: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4297:
4298: END IF;
4299:
4300: -- 4955764
4297:
4298: END IF;
4299:
4300: -- 4955764
4301: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4302: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4303:
4304:
4305: XLA_AE_LINES_PKG.ValidateCurrentLine;
4301: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4302: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4303:
4304:
4305: XLA_AE_LINES_PKG.ValidateCurrentLine;
4306: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
4307:
4308: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
4309: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
4302: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4303:
4304:
4305: XLA_AE_LINES_PKG.ValidateCurrentLine;
4306: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
4307:
4308: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
4309: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
4310: ,p_balance_type_code => l_balance_type_code);
4446: --
4447: -- bulk performance
4448: --
4449: l_balance_type_code VARCHAR2(1);
4450: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
4451: l_log_module VARCHAR2(240);
4452:
4453: --
4454: -- Upgrade strategy
4523: ') = 'RET_RI_INV'
4524: THEN
4525:
4526: --
4527: XLA_AE_LINES_PKG.SetNewLine;
4528:
4529: p_balance_type_code := l_balance_type_code;
4530: -- set the flag so later we will know whether the gain loss line needs to be created
4531:
4535:
4536: --
4537: -- bulk performance
4538: --
4539: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
4540: p_header_num => 0); -- 4262811
4541: --
4542: -- set accounting line options
4543: --
4540: p_header_num => 0); -- 4262811
4541: --
4542: -- set accounting line options
4543: --
4544: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
4545: p_natural_side_code => 'D'
4546: , p_gain_or_loss_flag => 'N'
4547: , p_gl_transfer_mode_code => 'S'
4548: , p_acct_entry_type_code => 'E'
4554: --
4555: --
4556: -- set accounting line type info
4557: --
4558: xla_ae_lines_pkg.SetAcctLineType
4559: (p_component_type => l_component_type
4560: ,p_event_type_code => l_event_type_code
4561: ,p_line_definition_owner_code => l_line_definition_owner_code
4562: ,p_line_definition_code => l_line_definition_code
4568: ,p_event_class_code => l_event_class_code);
4569: --
4570: -- set accounting class
4571: --
4572: xla_ae_lines_pkg.SetAcctClass(
4573: p_accounting_class_code => 'PURCHASE_ORDER'
4574: , p_ae_header_id => l_ae_header_id
4575: );
4576:
4576:
4577: --
4578: -- set rounding class
4579: --
4580: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
4581: 'PURCHASE_ORDER';
4582:
4583: --
4584: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
4580: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
4581: 'PURCHASE_ORDER';
4582:
4583: --
4584: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
4585: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
4586: --
4587: -- bulk performance
4588: --
4581: 'PURCHASE_ORDER';
4582:
4583: --
4584: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
4585: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
4586: --
4587: -- bulk performance
4588: --
4589: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
4585: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
4586: --
4587: -- bulk performance
4588: --
4589: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
4590:
4591: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
4592: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
4593:
4587: -- bulk performance
4588: --
4589: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
4590:
4591: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
4592: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
4593:
4594: -- 4955764
4595: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4591: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
4592: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
4593:
4594: -- 4955764
4595: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4596: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
4597:
4598: -- 4458381 Public Sector Enh
4599:
4645: l_rec_acct_attrs.array_num_value(20) := p_source_28;
4646: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
4647: l_rec_acct_attrs.array_num_value(21) := p_source_28;
4648:
4649: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4650: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4651:
4652: ---------------------------------------------------------------------------------------------------------------
4653: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4646: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
4647: l_rec_acct_attrs.array_num_value(21) := p_source_28;
4648:
4649: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4650: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4651:
4652: ---------------------------------------------------------------------------------------------------------------
4653: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4654: ---------------------------------------------------------------------------------------------------------------
4649: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4650: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4651:
4652: ---------------------------------------------------------------------------------------------------------------
4653: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4654: ---------------------------------------------------------------------------------------------------------------
4655: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4656:
4657: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4651:
4652: ---------------------------------------------------------------------------------------------------------------
4653: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4654: ---------------------------------------------------------------------------------------------------------------
4655: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4656:
4657: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4658: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4659:
4653: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4654: ---------------------------------------------------------------------------------------------------------------
4655: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4656:
4657: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4658: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4659:
4660: IF xla_accounting_cache_pkg.GetValueChar
4661: (p_source_code => 'LEDGER_CATEGORY_CODE'
4654: ---------------------------------------------------------------------------------------------------------------
4655: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4656:
4657: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4658: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4659:
4660: IF xla_accounting_cache_pkg.GetValueChar
4661: (p_source_code => 'LEDGER_CATEGORY_CODE'
4662: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
4665: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
4666: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
4667: )
4668: THEN
4669: xla_ae_lines_pkg.BflowUpgEntry
4670: (p_business_method_code => l_bflow_method_code
4671: ,p_business_class_code => l_bflow_class_code
4672: ,p_balance_type => l_balance_type_code);
4673: ELSE
4671: ,p_business_class_code => l_bflow_class_code
4672: ,p_balance_type => l_balance_type_code);
4673: ELSE
4674: NULL;
4675: XLA_AE_LINES_PKG.business_flow_validation(
4676: p_business_method_code => l_bflow_method_code
4677: ,p_business_class_code => l_bflow_class_code
4678: ,p_inherit_description_flag => l_inherit_desc_flag);
4679: END IF;
4718: xla_accounting_err_pkg.build_message
4719: (p_appli_s_name => 'XLA'
4720: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
4721: ,p_token_1 => 'LINE_NUMBER'
4722: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
4723: ,p_token_2 => 'LINE_TYPE_NAME'
4724: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
4725: l_component_type
4726: ,l_component_code
4754: --
4755: --
4756: ------------------------------------------------------------------------------------------------
4757: -- 4219869 Business Flow
4758: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
4759: -- Prior Entry. Currently, the following code is always generated.
4760: ------------------------------------------------------------------------------------------------
4761: -- No ValidateCurrentLine for business flow method of Prior Entry
4762:
4763: ------------------------------------------------------------------------------------
4764: -- 4219869 Business Flow
4765: -- Populated credit and debit amounts -- Need to generate this within IF
4766: ------------------------------------------------------------------------------------
4767: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
4768:
4769: ----------------------------------------------------------------------------------
4770: -- 4219869 Business Flow
4771: -- Update journal entry status -- Need to generate this within IF
4795: -- To allow MPA report to determine if it should generate report process
4796: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
4797: ------------------------------------------------------------------------------------------
4798:
4799: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
4800: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
4801: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
4802: -- call ADRs
4803: -- Bug 4922099
4796: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
4797: ------------------------------------------------------------------------------------------
4798:
4799: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
4800: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
4801: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
4802: -- call ADRs
4803: -- Bug 4922099
4804: --
4817:
4818: --
4819: -- Update the line information that should be overwritten
4820: --
4821: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4822: p_header_num => 1);
4823: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4824:
4825: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4819: -- Update the line information that should be overwritten
4820: --
4821: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4822: p_header_num => 1);
4823: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4824:
4825: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4826:
4827: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4821: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4822: p_header_num => 1);
4823: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4824:
4825: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4826:
4827: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4828: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
4829: END IF;
4824:
4825: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4826:
4827: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4828: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
4829: END IF;
4830:
4831: --
4832: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
4831: --
4832: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
4833: --
4834: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
4835: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
4836: ELSE
4837: ---------------------------------------------------------------------------------------------------
4838: -- 4262811a Switch Sign
4839: ---------------------------------------------------------------------------------------------------
4836: ELSE
4837: ---------------------------------------------------------------------------------------------------
4838: -- 4262811a Switch Sign
4839: ---------------------------------------------------------------------------------------------------
4840: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4841: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4842: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4843: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4844: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4837: ---------------------------------------------------------------------------------------------------
4838: -- 4262811a Switch Sign
4839: ---------------------------------------------------------------------------------------------------
4840: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4841: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4842: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4843: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4844: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4845: -- 5132302
4838: -- 4262811a Switch Sign
4839: ---------------------------------------------------------------------------------------------------
4840: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4841: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4842: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4843: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4844: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4845: -- 5132302
4846: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4839: ---------------------------------------------------------------------------------------------------
4840: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4841: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4842: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4843: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4844: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4845: -- 5132302
4846: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4847: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4840: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4841: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4842: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4843: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4844: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4845: -- 5132302
4846: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4847: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4848:
4842: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4843: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4844: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4845: -- 5132302
4846: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4847: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4848:
4849: END IF;
4850:
4843: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4844: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4845: -- 5132302
4846: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4847: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4848:
4849: END IF;
4850:
4851: -- 4955764
4848:
4849: END IF;
4850:
4851: -- 4955764
4852: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4853: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4854:
4855:
4856: XLA_AE_LINES_PKG.ValidateCurrentLine;
4852: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4853: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4854:
4855:
4856: XLA_AE_LINES_PKG.ValidateCurrentLine;
4857: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
4858:
4859: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
4860: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
4853: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4854:
4855:
4856: XLA_AE_LINES_PKG.ValidateCurrentLine;
4857: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
4858:
4859: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
4860: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
4861: ,p_balance_type_code => l_balance_type_code);
4997: --
4998: -- bulk performance
4999: --
5000: l_balance_type_code VARCHAR2(1);
5001: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
5002: l_log_module VARCHAR2(240);
5003:
5004: --
5005: -- Upgrade strategy
5074: ') = 'RET_RI_INV'
5075: THEN
5076:
5077: --
5078: XLA_AE_LINES_PKG.SetNewLine;
5079:
5080: p_balance_type_code := l_balance_type_code;
5081: -- set the flag so later we will know whether the gain loss line needs to be created
5082:
5086:
5087: --
5088: -- bulk performance
5089: --
5090: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
5091: p_header_num => 0); -- 4262811
5092: --
5093: -- set accounting line options
5094: --
5091: p_header_num => 0); -- 4262811
5092: --
5093: -- set accounting line options
5094: --
5095: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
5096: p_natural_side_code => 'D'
5097: , p_gain_or_loss_flag => 'N'
5098: , p_gl_transfer_mode_code => 'S'
5099: , p_acct_entry_type_code => 'E'
5105: --
5106: --
5107: -- set accounting line type info
5108: --
5109: xla_ae_lines_pkg.SetAcctLineType
5110: (p_component_type => l_component_type
5111: ,p_event_type_code => l_event_type_code
5112: ,p_line_definition_owner_code => l_line_definition_owner_code
5113: ,p_line_definition_code => l_line_definition_code
5119: ,p_event_class_code => l_event_class_code);
5120: --
5121: -- set accounting class
5122: --
5123: xla_ae_lines_pkg.SetAcctClass(
5124: p_accounting_class_code => 'PURCHASE_ORDER'
5125: , p_ae_header_id => l_ae_header_id
5126: );
5127:
5127:
5128: --
5129: -- set rounding class
5130: --
5131: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
5132: 'PURCHASE_ORDER';
5133:
5134: --
5135: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
5131: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
5132: 'PURCHASE_ORDER';
5133:
5134: --
5135: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
5136: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
5137: --
5138: -- bulk performance
5139: --
5132: 'PURCHASE_ORDER';
5133:
5134: --
5135: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
5136: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
5137: --
5138: -- bulk performance
5139: --
5140: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
5136: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
5137: --
5138: -- bulk performance
5139: --
5140: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
5141:
5142: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
5143: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
5144:
5138: -- bulk performance
5139: --
5140: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
5141:
5142: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
5143: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
5144:
5145: -- 4955764
5146: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5142: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
5143: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
5144:
5145: -- 4955764
5146: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5147: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
5148:
5149: -- 4458381 Public Sector Enh
5150:
5196: l_rec_acct_attrs.array_num_value(20) := p_source_28;
5197: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
5198: l_rec_acct_attrs.array_num_value(21) := p_source_28;
5199:
5200: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
5201: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
5202:
5203: ---------------------------------------------------------------------------------------------------------------
5204: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5197: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
5198: l_rec_acct_attrs.array_num_value(21) := p_source_28;
5199:
5200: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
5201: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
5202:
5203: ---------------------------------------------------------------------------------------------------------------
5204: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5205: ---------------------------------------------------------------------------------------------------------------
5200: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
5201: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
5202:
5203: ---------------------------------------------------------------------------------------------------------------
5204: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5205: ---------------------------------------------------------------------------------------------------------------
5206: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5207:
5208: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5202:
5203: ---------------------------------------------------------------------------------------------------------------
5204: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5205: ---------------------------------------------------------------------------------------------------------------
5206: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5207:
5208: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5209: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5210:
5204: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5205: ---------------------------------------------------------------------------------------------------------------
5206: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5207:
5208: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5209: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5210:
5211: IF xla_accounting_cache_pkg.GetValueChar
5212: (p_source_code => 'LEDGER_CATEGORY_CODE'
5205: ---------------------------------------------------------------------------------------------------------------
5206: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5207:
5208: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5209: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5210:
5211: IF xla_accounting_cache_pkg.GetValueChar
5212: (p_source_code => 'LEDGER_CATEGORY_CODE'
5213: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
5216: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
5217: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
5218: )
5219: THEN
5220: xla_ae_lines_pkg.BflowUpgEntry
5221: (p_business_method_code => l_bflow_method_code
5222: ,p_business_class_code => l_bflow_class_code
5223: ,p_balance_type => l_balance_type_code);
5224: ELSE
5222: ,p_business_class_code => l_bflow_class_code
5223: ,p_balance_type => l_balance_type_code);
5224: ELSE
5225: NULL;
5226: XLA_AE_LINES_PKG.business_flow_validation(
5227: p_business_method_code => l_bflow_method_code
5228: ,p_business_class_code => l_bflow_class_code
5229: ,p_inherit_description_flag => l_inherit_desc_flag);
5230: END IF;
5269: xla_accounting_err_pkg.build_message
5270: (p_appli_s_name => 'XLA'
5271: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
5272: ,p_token_1 => 'LINE_NUMBER'
5273: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
5274: ,p_token_2 => 'LINE_TYPE_NAME'
5275: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
5276: l_component_type
5277: ,l_component_code
5305: --
5306: --
5307: ------------------------------------------------------------------------------------------------
5308: -- 4219869 Business Flow
5309: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
5310: -- Prior Entry. Currently, the following code is always generated.
5311: ------------------------------------------------------------------------------------------------
5312: -- No ValidateCurrentLine for business flow method of Prior Entry
5313:
5314: ------------------------------------------------------------------------------------
5315: -- 4219869 Business Flow
5316: -- Populated credit and debit amounts -- Need to generate this within IF
5317: ------------------------------------------------------------------------------------
5318: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
5319:
5320: ----------------------------------------------------------------------------------
5321: -- 4219869 Business Flow
5322: -- Update journal entry status -- Need to generate this within IF
5346: -- To allow MPA report to determine if it should generate report process
5347: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
5348: ------------------------------------------------------------------------------------------
5349:
5350: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
5351: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
5352: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
5353: -- call ADRs
5354: -- Bug 4922099
5347: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
5348: ------------------------------------------------------------------------------------------
5349:
5350: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
5351: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
5352: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
5353: -- call ADRs
5354: -- Bug 4922099
5355: --
5368:
5369: --
5370: -- Update the line information that should be overwritten
5371: --
5372: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
5373: p_header_num => 1);
5374: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
5375:
5376: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5370: -- Update the line information that should be overwritten
5371: --
5372: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
5373: p_header_num => 1);
5374: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
5375:
5376: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5377:
5378: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
5372: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
5373: p_header_num => 1);
5374: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
5375:
5376: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5377:
5378: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
5379: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
5380: END IF;
5375:
5376: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5377:
5378: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
5379: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
5380: END IF;
5381:
5382: --
5383: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
5382: --
5383: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
5384: --
5385: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
5386: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
5387: ELSE
5388: ---------------------------------------------------------------------------------------------------
5389: -- 4262811a Switch Sign
5390: ---------------------------------------------------------------------------------------------------
5387: ELSE
5388: ---------------------------------------------------------------------------------------------------
5389: -- 4262811a Switch Sign
5390: ---------------------------------------------------------------------------------------------------
5391: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5392: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5393: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5394: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5395: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5388: ---------------------------------------------------------------------------------------------------
5389: -- 4262811a Switch Sign
5390: ---------------------------------------------------------------------------------------------------
5391: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5392: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5393: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5394: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5395: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5396: -- 5132302
5389: -- 4262811a Switch Sign
5390: ---------------------------------------------------------------------------------------------------
5391: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5392: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5393: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5394: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5395: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5396: -- 5132302
5397: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5390: ---------------------------------------------------------------------------------------------------
5391: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5392: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5393: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5394: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5395: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5396: -- 5132302
5397: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5398: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5391: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5392: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5393: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5394: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5395: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5396: -- 5132302
5397: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5398: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5399:
5393: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5394: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5395: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5396: -- 5132302
5397: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5398: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5399:
5400: END IF;
5401:
5394: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5395: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5396: -- 5132302
5397: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5398: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5399:
5400: END IF;
5401:
5402: -- 4955764
5399:
5400: END IF;
5401:
5402: -- 4955764
5403: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5404: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
5405:
5406:
5407: XLA_AE_LINES_PKG.ValidateCurrentLine;
5403: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5404: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
5405:
5406:
5407: XLA_AE_LINES_PKG.ValidateCurrentLine;
5408: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
5409:
5410: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
5411: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
5404: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
5405:
5406:
5407: XLA_AE_LINES_PKG.ValidateCurrentLine;
5408: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
5409:
5410: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
5411: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
5412: ,p_balance_type_code => l_balance_type_code);
5548: --
5549: -- bulk performance
5550: --
5551: l_balance_type_code VARCHAR2(1);
5552: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
5553: l_log_module VARCHAR2(240);
5554:
5555: --
5556: -- Upgrade strategy
5625: ') = 'RET_RI_INV'
5626: THEN
5627:
5628: --
5629: XLA_AE_LINES_PKG.SetNewLine;
5630:
5631: p_balance_type_code := l_balance_type_code;
5632: -- set the flag so later we will know whether the gain loss line needs to be created
5633:
5637:
5638: --
5639: -- bulk performance
5640: --
5641: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
5642: p_header_num => 0); -- 4262811
5643: --
5644: -- set accounting line options
5645: --
5642: p_header_num => 0); -- 4262811
5643: --
5644: -- set accounting line options
5645: --
5646: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
5647: p_natural_side_code => 'D'
5648: , p_gain_or_loss_flag => 'N'
5649: , p_gl_transfer_mode_code => 'S'
5650: , p_acct_entry_type_code => 'E'
5656: --
5657: --
5658: -- set accounting line type info
5659: --
5660: xla_ae_lines_pkg.SetAcctLineType
5661: (p_component_type => l_component_type
5662: ,p_event_type_code => l_event_type_code
5663: ,p_line_definition_owner_code => l_line_definition_owner_code
5664: ,p_line_definition_code => l_line_definition_code
5670: ,p_event_class_code => l_event_class_code);
5671: --
5672: -- set accounting class
5673: --
5674: xla_ae_lines_pkg.SetAcctClass(
5675: p_accounting_class_code => 'PURCHASE_ORDER'
5676: , p_ae_header_id => l_ae_header_id
5677: );
5678:
5678:
5679: --
5680: -- set rounding class
5681: --
5682: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
5683: 'PURCHASE_ORDER';
5684:
5685: --
5686: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
5682: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
5683: 'PURCHASE_ORDER';
5684:
5685: --
5686: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
5687: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
5688: --
5689: -- bulk performance
5690: --
5683: 'PURCHASE_ORDER';
5684:
5685: --
5686: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
5687: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
5688: --
5689: -- bulk performance
5690: --
5691: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
5687: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
5688: --
5689: -- bulk performance
5690: --
5691: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
5692:
5693: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
5694: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
5695:
5689: -- bulk performance
5690: --
5691: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
5692:
5693: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
5694: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
5695:
5696: -- 4955764
5697: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5693: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
5694: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
5695:
5696: -- 4955764
5697: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5698: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
5699:
5700: -- 4458381 Public Sector Enh
5701:
5747: l_rec_acct_attrs.array_num_value(20) := p_source_28;
5748: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
5749: l_rec_acct_attrs.array_num_value(21) := p_source_28;
5750:
5751: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
5752: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
5753:
5754: ---------------------------------------------------------------------------------------------------------------
5755: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5748: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
5749: l_rec_acct_attrs.array_num_value(21) := p_source_28;
5750:
5751: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
5752: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
5753:
5754: ---------------------------------------------------------------------------------------------------------------
5755: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5756: ---------------------------------------------------------------------------------------------------------------
5751: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
5752: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
5753:
5754: ---------------------------------------------------------------------------------------------------------------
5755: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5756: ---------------------------------------------------------------------------------------------------------------
5757: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5758:
5759: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5753:
5754: ---------------------------------------------------------------------------------------------------------------
5755: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5756: ---------------------------------------------------------------------------------------------------------------
5757: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5758:
5759: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5760: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5761:
5755: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5756: ---------------------------------------------------------------------------------------------------------------
5757: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5758:
5759: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5760: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5761:
5762: IF xla_accounting_cache_pkg.GetValueChar
5763: (p_source_code => 'LEDGER_CATEGORY_CODE'
5756: ---------------------------------------------------------------------------------------------------------------
5757: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5758:
5759: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5760: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5761:
5762: IF xla_accounting_cache_pkg.GetValueChar
5763: (p_source_code => 'LEDGER_CATEGORY_CODE'
5764: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
5767: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
5768: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
5769: )
5770: THEN
5771: xla_ae_lines_pkg.BflowUpgEntry
5772: (p_business_method_code => l_bflow_method_code
5773: ,p_business_class_code => l_bflow_class_code
5774: ,p_balance_type => l_balance_type_code);
5775: ELSE
5773: ,p_business_class_code => l_bflow_class_code
5774: ,p_balance_type => l_balance_type_code);
5775: ELSE
5776: NULL;
5777: XLA_AE_LINES_PKG.business_flow_validation(
5778: p_business_method_code => l_bflow_method_code
5779: ,p_business_class_code => l_bflow_class_code
5780: ,p_inherit_description_flag => l_inherit_desc_flag);
5781: END IF;
5820: xla_accounting_err_pkg.build_message
5821: (p_appli_s_name => 'XLA'
5822: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
5823: ,p_token_1 => 'LINE_NUMBER'
5824: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
5825: ,p_token_2 => 'LINE_TYPE_NAME'
5826: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
5827: l_component_type
5828: ,l_component_code
5856: --
5857: --
5858: ------------------------------------------------------------------------------------------------
5859: -- 4219869 Business Flow
5860: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
5861: -- Prior Entry. Currently, the following code is always generated.
5862: ------------------------------------------------------------------------------------------------
5863: -- No ValidateCurrentLine for business flow method of Prior Entry
5864:
5865: ------------------------------------------------------------------------------------
5866: -- 4219869 Business Flow
5867: -- Populated credit and debit amounts -- Need to generate this within IF
5868: ------------------------------------------------------------------------------------
5869: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
5870:
5871: ----------------------------------------------------------------------------------
5872: -- 4219869 Business Flow
5873: -- Update journal entry status -- Need to generate this within IF
5897: -- To allow MPA report to determine if it should generate report process
5898: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
5899: ------------------------------------------------------------------------------------------
5900:
5901: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
5902: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
5903: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
5904: -- call ADRs
5905: -- Bug 4922099
5898: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
5899: ------------------------------------------------------------------------------------------
5900:
5901: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
5902: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
5903: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
5904: -- call ADRs
5905: -- Bug 4922099
5906: --
5919:
5920: --
5921: -- Update the line information that should be overwritten
5922: --
5923: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
5924: p_header_num => 1);
5925: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
5926:
5927: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5921: -- Update the line information that should be overwritten
5922: --
5923: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
5924: p_header_num => 1);
5925: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
5926:
5927: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5928:
5929: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
5923: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
5924: p_header_num => 1);
5925: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
5926:
5927: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5928:
5929: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
5930: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
5931: END IF;
5926:
5927: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5928:
5929: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
5930: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
5931: END IF;
5932:
5933: --
5934: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
5933: --
5934: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
5935: --
5936: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
5937: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
5938: ELSE
5939: ---------------------------------------------------------------------------------------------------
5940: -- 4262811a Switch Sign
5941: ---------------------------------------------------------------------------------------------------
5938: ELSE
5939: ---------------------------------------------------------------------------------------------------
5940: -- 4262811a Switch Sign
5941: ---------------------------------------------------------------------------------------------------
5942: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5943: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5944: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5945: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5946: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5939: ---------------------------------------------------------------------------------------------------
5940: -- 4262811a Switch Sign
5941: ---------------------------------------------------------------------------------------------------
5942: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5943: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5944: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5945: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5946: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5947: -- 5132302
5940: -- 4262811a Switch Sign
5941: ---------------------------------------------------------------------------------------------------
5942: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5943: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5944: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5945: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5946: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5947: -- 5132302
5948: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5941: ---------------------------------------------------------------------------------------------------
5942: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5943: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5944: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5945: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5946: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5947: -- 5132302
5948: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5949: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5942: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5943: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5944: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5945: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5946: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5947: -- 5132302
5948: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5949: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5950:
5944: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5945: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5946: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5947: -- 5132302
5948: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5949: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5950:
5951: END IF;
5952:
5945: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5946: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5947: -- 5132302
5948: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5949: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5950:
5951: END IF;
5952:
5953: -- 4955764
5950:
5951: END IF;
5952:
5953: -- 4955764
5954: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5955: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
5956:
5957:
5958: XLA_AE_LINES_PKG.ValidateCurrentLine;
5954: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5955: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
5956:
5957:
5958: XLA_AE_LINES_PKG.ValidateCurrentLine;
5959: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
5960:
5961: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
5962: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
5955: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
5956:
5957:
5958: XLA_AE_LINES_PKG.ValidateCurrentLine;
5959: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
5960:
5961: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
5962: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
5963: ,p_balance_type_code => l_balance_type_code);
6099: --
6100: -- bulk performance
6101: --
6102: l_balance_type_code VARCHAR2(1);
6103: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
6104: l_log_module VARCHAR2(240);
6105:
6106: --
6107: -- Upgrade strategy
6176: ') = 'Charge'
6177: THEN
6178:
6179: --
6180: XLA_AE_LINES_PKG.SetNewLine;
6181:
6182: p_balance_type_code := l_balance_type_code;
6183: -- set the flag so later we will know whether the gain loss line needs to be created
6184:
6188:
6189: --
6190: -- bulk performance
6191: --
6192: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
6193: p_header_num => 0); -- 4262811
6194: --
6195: -- set accounting line options
6196: --
6193: p_header_num => 0); -- 4262811
6194: --
6195: -- set accounting line options
6196: --
6197: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
6198: p_natural_side_code => 'D'
6199: , p_gain_or_loss_flag => 'N'
6200: , p_gl_transfer_mode_code => 'S'
6201: , p_acct_entry_type_code => 'E'
6207: --
6208: --
6209: -- set accounting line type info
6210: --
6211: xla_ae_lines_pkg.SetAcctLineType
6212: (p_component_type => l_component_type
6213: ,p_event_type_code => l_event_type_code
6214: ,p_line_definition_owner_code => l_line_definition_owner_code
6215: ,p_line_definition_code => l_line_definition_code
6221: ,p_event_class_code => l_event_class_code);
6222: --
6223: -- set accounting class
6224: --
6225: xla_ae_lines_pkg.SetAcctClass(
6226: p_accounting_class_code => 'PURCHASE_ORDER'
6227: , p_ae_header_id => l_ae_header_id
6228: );
6229:
6229:
6230: --
6231: -- set rounding class
6232: --
6233: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
6234: 'PURCHASE_ORDER';
6235:
6236: --
6237: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6233: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
6234: 'PURCHASE_ORDER';
6235:
6236: --
6237: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6238: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6239: --
6240: -- bulk performance
6241: --
6234: 'PURCHASE_ORDER';
6235:
6236: --
6237: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6238: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6239: --
6240: -- bulk performance
6241: --
6242: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6238: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6239: --
6240: -- bulk performance
6241: --
6242: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6243:
6244: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6245: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
6246:
6240: -- bulk performance
6241: --
6242: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6243:
6244: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6245: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
6246:
6247: -- 4955764
6248: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6244: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6245: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
6246:
6247: -- 4955764
6248: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6249: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
6250:
6251: -- 4458381 Public Sector Enh
6252:
6298: l_rec_acct_attrs.array_num_value(20) := p_source_28;
6299: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
6300: l_rec_acct_attrs.array_num_value(21) := p_source_28;
6301:
6302: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
6303: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
6304:
6305: ---------------------------------------------------------------------------------------------------------------
6306: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6299: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
6300: l_rec_acct_attrs.array_num_value(21) := p_source_28;
6301:
6302: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
6303: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
6304:
6305: ---------------------------------------------------------------------------------------------------------------
6306: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6307: ---------------------------------------------------------------------------------------------------------------
6302: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
6303: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
6304:
6305: ---------------------------------------------------------------------------------------------------------------
6306: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6307: ---------------------------------------------------------------------------------------------------------------
6308: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6309:
6310: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6304:
6305: ---------------------------------------------------------------------------------------------------------------
6306: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6307: ---------------------------------------------------------------------------------------------------------------
6308: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6309:
6310: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6311: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6312:
6306: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6307: ---------------------------------------------------------------------------------------------------------------
6308: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6309:
6310: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6311: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6312:
6313: IF xla_accounting_cache_pkg.GetValueChar
6314: (p_source_code => 'LEDGER_CATEGORY_CODE'
6307: ---------------------------------------------------------------------------------------------------------------
6308: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6309:
6310: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6311: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6312:
6313: IF xla_accounting_cache_pkg.GetValueChar
6314: (p_source_code => 'LEDGER_CATEGORY_CODE'
6315: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
6318: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
6319: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
6320: )
6321: THEN
6322: xla_ae_lines_pkg.BflowUpgEntry
6323: (p_business_method_code => l_bflow_method_code
6324: ,p_business_class_code => l_bflow_class_code
6325: ,p_balance_type => l_balance_type_code);
6326: ELSE
6324: ,p_business_class_code => l_bflow_class_code
6325: ,p_balance_type => l_balance_type_code);
6326: ELSE
6327: NULL;
6328: XLA_AE_LINES_PKG.business_flow_validation(
6329: p_business_method_code => l_bflow_method_code
6330: ,p_business_class_code => l_bflow_class_code
6331: ,p_inherit_description_flag => l_inherit_desc_flag);
6332: END IF;
6371: xla_accounting_err_pkg.build_message
6372: (p_appli_s_name => 'XLA'
6373: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
6374: ,p_token_1 => 'LINE_NUMBER'
6375: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
6376: ,p_token_2 => 'LINE_TYPE_NAME'
6377: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
6378: l_component_type
6379: ,l_component_code
6407: --
6408: --
6409: ------------------------------------------------------------------------------------------------
6410: -- 4219869 Business Flow
6411: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
6412: -- Prior Entry. Currently, the following code is always generated.
6413: ------------------------------------------------------------------------------------------------
6414: -- No ValidateCurrentLine for business flow method of Prior Entry
6415:
6416: ------------------------------------------------------------------------------------
6417: -- 4219869 Business Flow
6418: -- Populated credit and debit amounts -- Need to generate this within IF
6419: ------------------------------------------------------------------------------------
6420: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
6421:
6422: ----------------------------------------------------------------------------------
6423: -- 4219869 Business Flow
6424: -- Update journal entry status -- Need to generate this within IF
6448: -- To allow MPA report to determine if it should generate report process
6449: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
6450: ------------------------------------------------------------------------------------------
6451:
6452: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
6453: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
6454: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
6455: -- call ADRs
6456: -- Bug 4922099
6449: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
6450: ------------------------------------------------------------------------------------------
6451:
6452: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
6453: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
6454: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
6455: -- call ADRs
6456: -- Bug 4922099
6457: --
6470:
6471: --
6472: -- Update the line information that should be overwritten
6473: --
6474: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
6475: p_header_num => 1);
6476: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
6477:
6478: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6472: -- Update the line information that should be overwritten
6473: --
6474: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
6475: p_header_num => 1);
6476: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
6477:
6478: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6479:
6480: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
6474: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
6475: p_header_num => 1);
6476: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
6477:
6478: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6479:
6480: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
6481: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
6482: END IF;
6477:
6478: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6479:
6480: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
6481: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
6482: END IF;
6483:
6484: --
6485: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
6484: --
6485: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
6486: --
6487: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
6488: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
6489: ELSE
6490: ---------------------------------------------------------------------------------------------------
6491: -- 4262811a Switch Sign
6492: ---------------------------------------------------------------------------------------------------
6489: ELSE
6490: ---------------------------------------------------------------------------------------------------
6491: -- 4262811a Switch Sign
6492: ---------------------------------------------------------------------------------------------------
6493: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6494: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6495: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6496: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6497: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6490: ---------------------------------------------------------------------------------------------------
6491: -- 4262811a Switch Sign
6492: ---------------------------------------------------------------------------------------------------
6493: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6494: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6495: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6496: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6497: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6498: -- 5132302
6491: -- 4262811a Switch Sign
6492: ---------------------------------------------------------------------------------------------------
6493: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6494: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6495: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6496: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6497: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6498: -- 5132302
6499: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6492: ---------------------------------------------------------------------------------------------------
6493: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6494: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6495: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6496: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6497: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6498: -- 5132302
6499: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6500: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6493: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6494: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6495: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6496: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6497: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6498: -- 5132302
6499: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6500: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6501:
6495: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6496: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6497: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6498: -- 5132302
6499: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6500: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6501:
6502: END IF;
6503:
6496: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6497: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6498: -- 5132302
6499: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6500: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6501:
6502: END IF;
6503:
6504: -- 4955764
6501:
6502: END IF;
6503:
6504: -- 4955764
6505: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6506: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
6507:
6508:
6509: XLA_AE_LINES_PKG.ValidateCurrentLine;
6505: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6506: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
6507:
6508:
6509: XLA_AE_LINES_PKG.ValidateCurrentLine;
6510: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
6511:
6512: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
6513: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
6506: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
6507:
6508:
6509: XLA_AE_LINES_PKG.ValidateCurrentLine;
6510: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
6511:
6512: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
6513: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
6514: ,p_balance_type_code => l_balance_type_code);
6652: --
6653: -- bulk performance
6654: --
6655: l_balance_type_code VARCHAR2(1);
6656: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
6657: l_log_module VARCHAR2(240);
6658:
6659: --
6660: -- Upgrade strategy
6731: ') = 'Charge'
6732: THEN
6733:
6734: --
6735: XLA_AE_LINES_PKG.SetNewLine;
6736:
6737: p_balance_type_code := l_balance_type_code;
6738: -- set the flag so later we will know whether the gain loss line needs to be created
6739:
6743:
6744: --
6745: -- bulk performance
6746: --
6747: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
6748: p_header_num => 0); -- 4262811
6749: --
6750: -- set accounting line options
6751: --
6748: p_header_num => 0); -- 4262811
6749: --
6750: -- set accounting line options
6751: --
6752: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
6753: p_natural_side_code => 'D'
6754: , p_gain_or_loss_flag => 'N'
6755: , p_gl_transfer_mode_code => 'S'
6756: , p_acct_entry_type_code => 'E'
6762: --
6763: --
6764: -- set accounting line type info
6765: --
6766: xla_ae_lines_pkg.SetAcctLineType
6767: (p_component_type => l_component_type
6768: ,p_event_type_code => l_event_type_code
6769: ,p_line_definition_owner_code => l_line_definition_owner_code
6770: ,p_line_definition_code => l_line_definition_code
6776: ,p_event_class_code => l_event_class_code);
6777: --
6778: -- set accounting class
6779: --
6780: xla_ae_lines_pkg.SetAcctClass(
6781: p_accounting_class_code => 'PURCHASE_ORDER'
6782: , p_ae_header_id => l_ae_header_id
6783: );
6784:
6784:
6785: --
6786: -- set rounding class
6787: --
6788: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
6789: 'PURCHASE_ORDER';
6790:
6791: --
6792: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6788: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
6789: 'PURCHASE_ORDER';
6790:
6791: --
6792: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6793: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6794: --
6795: -- bulk performance
6796: --
6789: 'PURCHASE_ORDER';
6790:
6791: --
6792: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6793: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6794: --
6795: -- bulk performance
6796: --
6797: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6793: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6794: --
6795: -- bulk performance
6796: --
6797: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6798:
6799: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6800: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
6801:
6795: -- bulk performance
6796: --
6797: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6798:
6799: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6800: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
6801:
6802: -- 4955764
6803: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6799: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6800: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
6801:
6802: -- 4955764
6803: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6804: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
6805:
6806: -- 4458381 Public Sector Enh
6807:
6853: l_rec_acct_attrs.array_num_value(20) := p_source_28;
6854: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
6855: l_rec_acct_attrs.array_num_value(21) := p_source_28;
6856:
6857: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
6858: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
6859:
6860: ---------------------------------------------------------------------------------------------------------------
6861: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6854: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
6855: l_rec_acct_attrs.array_num_value(21) := p_source_28;
6856:
6857: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
6858: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
6859:
6860: ---------------------------------------------------------------------------------------------------------------
6861: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6862: ---------------------------------------------------------------------------------------------------------------
6857: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
6858: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
6859:
6860: ---------------------------------------------------------------------------------------------------------------
6861: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6862: ---------------------------------------------------------------------------------------------------------------
6863: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6864:
6865: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6859:
6860: ---------------------------------------------------------------------------------------------------------------
6861: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6862: ---------------------------------------------------------------------------------------------------------------
6863: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6864:
6865: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6866: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6867:
6861: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6862: ---------------------------------------------------------------------------------------------------------------
6863: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6864:
6865: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6866: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6867:
6868: IF xla_accounting_cache_pkg.GetValueChar
6869: (p_source_code => 'LEDGER_CATEGORY_CODE'
6862: ---------------------------------------------------------------------------------------------------------------
6863: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6864:
6865: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6866: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6867:
6868: IF xla_accounting_cache_pkg.GetValueChar
6869: (p_source_code => 'LEDGER_CATEGORY_CODE'
6870: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
6873: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
6874: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
6875: )
6876: THEN
6877: xla_ae_lines_pkg.BflowUpgEntry
6878: (p_business_method_code => l_bflow_method_code
6879: ,p_business_class_code => l_bflow_class_code
6880: ,p_balance_type => l_balance_type_code);
6881: ELSE
6879: ,p_business_class_code => l_bflow_class_code
6880: ,p_balance_type => l_balance_type_code);
6881: ELSE
6882: NULL;
6883: XLA_AE_LINES_PKG.business_flow_validation(
6884: p_business_method_code => l_bflow_method_code
6885: ,p_business_class_code => l_bflow_class_code
6886: ,p_inherit_description_flag => l_inherit_desc_flag);
6887: END IF;
6926: xla_accounting_err_pkg.build_message
6927: (p_appli_s_name => 'XLA'
6928: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
6929: ,p_token_1 => 'LINE_NUMBER'
6930: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
6931: ,p_token_2 => 'LINE_TYPE_NAME'
6932: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
6933: l_component_type
6934: ,l_component_code
6962: --
6963: --
6964: ------------------------------------------------------------------------------------------------
6965: -- 4219869 Business Flow
6966: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
6967: -- Prior Entry. Currently, the following code is always generated.
6968: ------------------------------------------------------------------------------------------------
6969: -- No ValidateCurrentLine for business flow method of Prior Entry
6970:
6971: ------------------------------------------------------------------------------------
6972: -- 4219869 Business Flow
6973: -- Populated credit and debit amounts -- Need to generate this within IF
6974: ------------------------------------------------------------------------------------
6975: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
6976:
6977: ----------------------------------------------------------------------------------
6978: -- 4219869 Business Flow
6979: -- Update journal entry status -- Need to generate this within IF
7003: -- To allow MPA report to determine if it should generate report process
7004: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
7005: ------------------------------------------------------------------------------------------
7006:
7007: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
7008: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
7009: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
7010: -- call ADRs
7011: -- Bug 4922099
7004: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
7005: ------------------------------------------------------------------------------------------
7006:
7007: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
7008: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
7009: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
7010: -- call ADRs
7011: -- Bug 4922099
7012: --
7025:
7026: --
7027: -- Update the line information that should be overwritten
7028: --
7029: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
7030: p_header_num => 1);
7031: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
7032:
7033: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7027: -- Update the line information that should be overwritten
7028: --
7029: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
7030: p_header_num => 1);
7031: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
7032:
7033: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7034:
7035: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
7029: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
7030: p_header_num => 1);
7031: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
7032:
7033: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7034:
7035: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
7036: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
7037: END IF;
7032:
7033: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7034:
7035: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
7036: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
7037: END IF;
7038:
7039: --
7040: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
7039: --
7040: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
7041: --
7042: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
7043: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
7044: ELSE
7045: ---------------------------------------------------------------------------------------------------
7046: -- 4262811a Switch Sign
7047: ---------------------------------------------------------------------------------------------------
7044: ELSE
7045: ---------------------------------------------------------------------------------------------------
7046: -- 4262811a Switch Sign
7047: ---------------------------------------------------------------------------------------------------
7048: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7049: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7050: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7051: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7052: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7045: ---------------------------------------------------------------------------------------------------
7046: -- 4262811a Switch Sign
7047: ---------------------------------------------------------------------------------------------------
7048: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7049: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7050: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7051: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7052: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7053: -- 5132302
7046: -- 4262811a Switch Sign
7047: ---------------------------------------------------------------------------------------------------
7048: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7049: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7050: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7051: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7052: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7053: -- 5132302
7054: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7047: ---------------------------------------------------------------------------------------------------
7048: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7049: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7050: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7051: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7052: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7053: -- 5132302
7054: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7055: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7048: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7049: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7050: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7051: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7052: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7053: -- 5132302
7054: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7055: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7056:
7050: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7051: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7052: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7053: -- 5132302
7054: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7055: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7056:
7057: END IF;
7058:
7051: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7052: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7053: -- 5132302
7054: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7055: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7056:
7057: END IF;
7058:
7059: -- 4955764
7056:
7057: END IF;
7058:
7059: -- 4955764
7060: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7061: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
7062:
7063:
7064: XLA_AE_LINES_PKG.ValidateCurrentLine;
7060: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7061: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
7062:
7063:
7064: XLA_AE_LINES_PKG.ValidateCurrentLine;
7065: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
7066:
7067: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
7068: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
7061: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
7062:
7063:
7064: XLA_AE_LINES_PKG.ValidateCurrentLine;
7065: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
7066:
7067: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
7068: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
7069: ,p_balance_type_code => l_balance_type_code);
7209: --
7210: -- bulk performance
7211: --
7212: l_balance_type_code VARCHAR2(1);
7213: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
7214: l_log_module VARCHAR2(240);
7215:
7216: --
7217: -- Upgrade strategy
7289: NVL(p_source_7,9E125) = 15
7290: THEN
7291:
7292: --
7293: XLA_AE_LINES_PKG.SetNewLine;
7294:
7295: p_balance_type_code := l_balance_type_code;
7296: -- set the flag so later we will know whether the gain loss line needs to be created
7297:
7301:
7302: --
7303: -- bulk performance
7304: --
7305: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
7306: p_header_num => 0); -- 4262811
7307: --
7308: -- set accounting line options
7309: --
7306: p_header_num => 0); -- 4262811
7307: --
7308: -- set accounting line options
7309: --
7310: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
7311: p_natural_side_code => 'C'
7312: , p_gain_or_loss_flag => 'N'
7313: , p_gl_transfer_mode_code => 'S'
7314: , p_acct_entry_type_code => 'E'
7320: --
7321: --
7322: -- set accounting line type info
7323: --
7324: xla_ae_lines_pkg.SetAcctLineType
7325: (p_component_type => l_component_type
7326: ,p_event_type_code => l_event_type_code
7327: ,p_line_definition_owner_code => l_line_definition_owner_code
7328: ,p_line_definition_code => l_line_definition_code
7334: ,p_event_class_code => l_event_class_code);
7335: --
7336: -- set accounting class
7337: --
7338: xla_ae_lines_pkg.SetAcctClass(
7339: p_accounting_class_code => 'PURCHASE_ORDER'
7340: , p_ae_header_id => l_ae_header_id
7341: );
7342:
7342:
7343: --
7344: -- set rounding class
7345: --
7346: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
7347: 'PURCHASE_ORDER';
7348:
7349: --
7350: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
7346: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
7347: 'PURCHASE_ORDER';
7348:
7349: --
7350: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
7351: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
7352: --
7353: -- bulk performance
7354: --
7347: 'PURCHASE_ORDER';
7348:
7349: --
7350: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
7351: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
7352: --
7353: -- bulk performance
7354: --
7355: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
7351: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
7352: --
7353: -- bulk performance
7354: --
7355: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
7356:
7357: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
7358: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7359:
7353: -- bulk performance
7354: --
7355: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
7356:
7357: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
7358: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7359:
7360: -- 4955764
7361: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7357: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
7358: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7359:
7360: -- 4955764
7361: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7362: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
7363:
7364: -- 4458381 Public Sector Enh
7365:
7411: l_rec_acct_attrs.array_num_value(20) := p_source_28;
7412: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
7413: l_rec_acct_attrs.array_num_value(21) := p_source_28;
7414:
7415: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
7416: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
7417:
7418: ---------------------------------------------------------------------------------------------------------------
7419: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7412: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
7413: l_rec_acct_attrs.array_num_value(21) := p_source_28;
7414:
7415: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
7416: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
7417:
7418: ---------------------------------------------------------------------------------------------------------------
7419: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7420: ---------------------------------------------------------------------------------------------------------------
7415: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
7416: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
7417:
7418: ---------------------------------------------------------------------------------------------------------------
7419: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7420: ---------------------------------------------------------------------------------------------------------------
7421: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7422:
7423: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7417:
7418: ---------------------------------------------------------------------------------------------------------------
7419: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7420: ---------------------------------------------------------------------------------------------------------------
7421: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7422:
7423: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7424: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7425:
7419: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7420: ---------------------------------------------------------------------------------------------------------------
7421: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7422:
7423: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7424: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7425:
7426: IF xla_accounting_cache_pkg.GetValueChar
7427: (p_source_code => 'LEDGER_CATEGORY_CODE'
7420: ---------------------------------------------------------------------------------------------------------------
7421: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7422:
7423: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7424: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7425:
7426: IF xla_accounting_cache_pkg.GetValueChar
7427: (p_source_code => 'LEDGER_CATEGORY_CODE'
7428: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
7431: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
7432: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
7433: )
7434: THEN
7435: xla_ae_lines_pkg.BflowUpgEntry
7436: (p_business_method_code => l_bflow_method_code
7437: ,p_business_class_code => l_bflow_class_code
7438: ,p_balance_type => l_balance_type_code);
7439: ELSE
7437: ,p_business_class_code => l_bflow_class_code
7438: ,p_balance_type => l_balance_type_code);
7439: ELSE
7440: NULL;
7441: XLA_AE_LINES_PKG.business_flow_validation(
7442: p_business_method_code => l_bflow_method_code
7443: ,p_business_class_code => l_bflow_class_code
7444: ,p_inherit_description_flag => l_inherit_desc_flag);
7445: END IF;
7484: xla_accounting_err_pkg.build_message
7485: (p_appli_s_name => 'XLA'
7486: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
7487: ,p_token_1 => 'LINE_NUMBER'
7488: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
7489: ,p_token_2 => 'LINE_TYPE_NAME'
7490: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
7491: l_component_type
7492: ,l_component_code
7520: --
7521: --
7522: ------------------------------------------------------------------------------------------------
7523: -- 4219869 Business Flow
7524: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
7525: -- Prior Entry. Currently, the following code is always generated.
7526: ------------------------------------------------------------------------------------------------
7527: -- No ValidateCurrentLine for business flow method of Prior Entry
7528:
7529: ------------------------------------------------------------------------------------
7530: -- 4219869 Business Flow
7531: -- Populated credit and debit amounts -- Need to generate this within IF
7532: ------------------------------------------------------------------------------------
7533: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
7534:
7535: ----------------------------------------------------------------------------------
7536: -- 4219869 Business Flow
7537: -- Update journal entry status -- Need to generate this within IF
7561: -- To allow MPA report to determine if it should generate report process
7562: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
7563: ------------------------------------------------------------------------------------------
7564:
7565: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
7566: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
7567: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
7568: -- call ADRs
7569: -- Bug 4922099
7562: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
7563: ------------------------------------------------------------------------------------------
7564:
7565: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
7566: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
7567: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
7568: -- call ADRs
7569: -- Bug 4922099
7570: --
7583:
7584: --
7585: -- Update the line information that should be overwritten
7586: --
7587: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
7588: p_header_num => 1);
7589: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
7590:
7591: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7585: -- Update the line information that should be overwritten
7586: --
7587: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
7588: p_header_num => 1);
7589: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
7590:
7591: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7592:
7593: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
7587: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
7588: p_header_num => 1);
7589: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
7590:
7591: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7592:
7593: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
7594: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
7595: END IF;
7590:
7591: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7592:
7593: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
7594: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
7595: END IF;
7596:
7597: --
7598: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
7597: --
7598: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
7599: --
7600: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
7601: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
7602: ELSE
7603: ---------------------------------------------------------------------------------------------------
7604: -- 4262811a Switch Sign
7605: ---------------------------------------------------------------------------------------------------
7602: ELSE
7603: ---------------------------------------------------------------------------------------------------
7604: -- 4262811a Switch Sign
7605: ---------------------------------------------------------------------------------------------------
7606: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7607: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7608: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7609: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7610: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7603: ---------------------------------------------------------------------------------------------------
7604: -- 4262811a Switch Sign
7605: ---------------------------------------------------------------------------------------------------
7606: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7607: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7608: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7609: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7610: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7611: -- 5132302
7604: -- 4262811a Switch Sign
7605: ---------------------------------------------------------------------------------------------------
7606: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7607: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7608: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7609: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7610: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7611: -- 5132302
7612: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7605: ---------------------------------------------------------------------------------------------------
7606: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7607: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7608: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7609: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7610: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7611: -- 5132302
7612: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7613: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7606: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7607: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7608: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7609: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7610: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7611: -- 5132302
7612: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7613: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7614:
7608: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7609: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7610: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7611: -- 5132302
7612: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7613: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7614:
7615: END IF;
7616:
7609: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7610: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7611: -- 5132302
7612: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7613: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7614:
7615: END IF;
7616:
7617: -- 4955764
7614:
7615: END IF;
7616:
7617: -- 4955764
7618: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7619: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
7620:
7621:
7622: XLA_AE_LINES_PKG.ValidateCurrentLine;
7618: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7619: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
7620:
7621:
7622: XLA_AE_LINES_PKG.ValidateCurrentLine;
7623: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
7624:
7625: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
7626: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
7619: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
7620:
7621:
7622: XLA_AE_LINES_PKG.ValidateCurrentLine;
7623: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
7624:
7625: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
7626: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
7627: ,p_balance_type_code => l_balance_type_code);
7767: --
7768: -- bulk performance
7769: --
7770: l_balance_type_code VARCHAR2(1);
7771: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
7772: l_log_module VARCHAR2(240);
7773:
7774: --
7775: -- Upgrade strategy
7847: NVL(p_source_7,9E125) = 15
7848: THEN
7849:
7850: --
7851: XLA_AE_LINES_PKG.SetNewLine;
7852:
7853: p_balance_type_code := l_balance_type_code;
7854: -- set the flag so later we will know whether the gain loss line needs to be created
7855:
7859:
7860: --
7861: -- bulk performance
7862: --
7863: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
7864: p_header_num => 0); -- 4262811
7865: --
7866: -- set accounting line options
7867: --
7864: p_header_num => 0); -- 4262811
7865: --
7866: -- set accounting line options
7867: --
7868: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
7869: p_natural_side_code => 'C'
7870: , p_gain_or_loss_flag => 'N'
7871: , p_gl_transfer_mode_code => 'S'
7872: , p_acct_entry_type_code => 'E'
7878: --
7879: --
7880: -- set accounting line type info
7881: --
7882: xla_ae_lines_pkg.SetAcctLineType
7883: (p_component_type => l_component_type
7884: ,p_event_type_code => l_event_type_code
7885: ,p_line_definition_owner_code => l_line_definition_owner_code
7886: ,p_line_definition_code => l_line_definition_code
7892: ,p_event_class_code => l_event_class_code);
7893: --
7894: -- set accounting class
7895: --
7896: xla_ae_lines_pkg.SetAcctClass(
7897: p_accounting_class_code => 'PURCHASE_ORDER'
7898: , p_ae_header_id => l_ae_header_id
7899: );
7900:
7900:
7901: --
7902: -- set rounding class
7903: --
7904: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
7905: 'PURCHASE_ORDER';
7906:
7907: --
7908: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
7904: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
7905: 'PURCHASE_ORDER';
7906:
7907: --
7908: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
7909: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
7910: --
7911: -- bulk performance
7912: --
7905: 'PURCHASE_ORDER';
7906:
7907: --
7908: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
7909: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
7910: --
7911: -- bulk performance
7912: --
7913: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
7909: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
7910: --
7911: -- bulk performance
7912: --
7913: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
7914:
7915: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
7916: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7917:
7911: -- bulk performance
7912: --
7913: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
7914:
7915: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
7916: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7917:
7918: -- 4955764
7919: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7915: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
7916: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7917:
7918: -- 4955764
7919: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7920: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
7921:
7922: -- 4458381 Public Sector Enh
7923:
7969: l_rec_acct_attrs.array_num_value(20) := p_source_28;
7970: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
7971: l_rec_acct_attrs.array_num_value(21) := p_source_28;
7972:
7973: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
7974: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
7975:
7976: ---------------------------------------------------------------------------------------------------------------
7977: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7970: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
7971: l_rec_acct_attrs.array_num_value(21) := p_source_28;
7972:
7973: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
7974: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
7975:
7976: ---------------------------------------------------------------------------------------------------------------
7977: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7978: ---------------------------------------------------------------------------------------------------------------
7973: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
7974: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
7975:
7976: ---------------------------------------------------------------------------------------------------------------
7977: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7978: ---------------------------------------------------------------------------------------------------------------
7979: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7980:
7981: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7975:
7976: ---------------------------------------------------------------------------------------------------------------
7977: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7978: ---------------------------------------------------------------------------------------------------------------
7979: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7980:
7981: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7982: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7983:
7977: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7978: ---------------------------------------------------------------------------------------------------------------
7979: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7980:
7981: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7982: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7983:
7984: IF xla_accounting_cache_pkg.GetValueChar
7985: (p_source_code => 'LEDGER_CATEGORY_CODE'
7978: ---------------------------------------------------------------------------------------------------------------
7979: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7980:
7981: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7982: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7983:
7984: IF xla_accounting_cache_pkg.GetValueChar
7985: (p_source_code => 'LEDGER_CATEGORY_CODE'
7986: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
7989: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
7990: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
7991: )
7992: THEN
7993: xla_ae_lines_pkg.BflowUpgEntry
7994: (p_business_method_code => l_bflow_method_code
7995: ,p_business_class_code => l_bflow_class_code
7996: ,p_balance_type => l_balance_type_code);
7997: ELSE
7995: ,p_business_class_code => l_bflow_class_code
7996: ,p_balance_type => l_balance_type_code);
7997: ELSE
7998: NULL;
7999: XLA_AE_LINES_PKG.business_flow_validation(
8000: p_business_method_code => l_bflow_method_code
8001: ,p_business_class_code => l_bflow_class_code
8002: ,p_inherit_description_flag => l_inherit_desc_flag);
8003: END IF;
8042: xla_accounting_err_pkg.build_message
8043: (p_appli_s_name => 'XLA'
8044: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
8045: ,p_token_1 => 'LINE_NUMBER'
8046: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
8047: ,p_token_2 => 'LINE_TYPE_NAME'
8048: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
8049: l_component_type
8050: ,l_component_code
8078: --
8079: --
8080: ------------------------------------------------------------------------------------------------
8081: -- 4219869 Business Flow
8082: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
8083: -- Prior Entry. Currently, the following code is always generated.
8084: ------------------------------------------------------------------------------------------------
8085: -- No ValidateCurrentLine for business flow method of Prior Entry
8086:
8087: ------------------------------------------------------------------------------------
8088: -- 4219869 Business Flow
8089: -- Populated credit and debit amounts -- Need to generate this within IF
8090: ------------------------------------------------------------------------------------
8091: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
8092:
8093: ----------------------------------------------------------------------------------
8094: -- 4219869 Business Flow
8095: -- Update journal entry status -- Need to generate this within IF
8119: -- To allow MPA report to determine if it should generate report process
8120: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
8121: ------------------------------------------------------------------------------------------
8122:
8123: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
8124: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
8125: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
8126: -- call ADRs
8127: -- Bug 4922099
8120: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
8121: ------------------------------------------------------------------------------------------
8122:
8123: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
8124: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
8125: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
8126: -- call ADRs
8127: -- Bug 4922099
8128: --
8141:
8142: --
8143: -- Update the line information that should be overwritten
8144: --
8145: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
8146: p_header_num => 1);
8147: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
8148:
8149: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8143: -- Update the line information that should be overwritten
8144: --
8145: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
8146: p_header_num => 1);
8147: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
8148:
8149: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8150:
8151: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
8145: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
8146: p_header_num => 1);
8147: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
8148:
8149: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8150:
8151: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
8152: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
8153: END IF;
8148:
8149: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8150:
8151: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
8152: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
8153: END IF;
8154:
8155: --
8156: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
8155: --
8156: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
8157: --
8158: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
8159: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
8160: ELSE
8161: ---------------------------------------------------------------------------------------------------
8162: -- 4262811a Switch Sign
8163: ---------------------------------------------------------------------------------------------------
8160: ELSE
8161: ---------------------------------------------------------------------------------------------------
8162: -- 4262811a Switch Sign
8163: ---------------------------------------------------------------------------------------------------
8164: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8165: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8166: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8167: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8168: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8161: ---------------------------------------------------------------------------------------------------
8162: -- 4262811a Switch Sign
8163: ---------------------------------------------------------------------------------------------------
8164: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8165: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8166: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8167: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8168: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8169: -- 5132302
8162: -- 4262811a Switch Sign
8163: ---------------------------------------------------------------------------------------------------
8164: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8165: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8166: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8167: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8168: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8169: -- 5132302
8170: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8163: ---------------------------------------------------------------------------------------------------
8164: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8165: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8166: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8167: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8168: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8169: -- 5132302
8170: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8171: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8164: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8165: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8166: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8167: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8168: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8169: -- 5132302
8170: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8171: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8172:
8166: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8167: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8168: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8169: -- 5132302
8170: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8171: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8172:
8173: END IF;
8174:
8167: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8168: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8169: -- 5132302
8170: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8171: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8172:
8173: END IF;
8174:
8175: -- 4955764
8172:
8173: END IF;
8174:
8175: -- 4955764
8176: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8177: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
8178:
8179:
8180: XLA_AE_LINES_PKG.ValidateCurrentLine;
8176: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8177: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
8178:
8179:
8180: XLA_AE_LINES_PKG.ValidateCurrentLine;
8181: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
8182:
8183: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
8184: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
8177: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
8178:
8179:
8180: XLA_AE_LINES_PKG.ValidateCurrentLine;
8181: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
8182:
8183: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
8184: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
8185: ,p_balance_type_code => l_balance_type_code);
8325: --
8326: -- bulk performance
8327: --
8328: l_balance_type_code VARCHAR2(1);
8329: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
8330: l_log_module VARCHAR2(240);
8331:
8332: --
8333: -- Upgrade strategy
8405: NVL(p_source_7,9E125) = 15
8406: THEN
8407:
8408: --
8409: XLA_AE_LINES_PKG.SetNewLine;
8410:
8411: p_balance_type_code := l_balance_type_code;
8412: -- set the flag so later we will know whether the gain loss line needs to be created
8413:
8417:
8418: --
8419: -- bulk performance
8420: --
8421: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
8422: p_header_num => 0); -- 4262811
8423: --
8424: -- set accounting line options
8425: --
8422: p_header_num => 0); -- 4262811
8423: --
8424: -- set accounting line options
8425: --
8426: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
8427: p_natural_side_code => 'C'
8428: , p_gain_or_loss_flag => 'N'
8429: , p_gl_transfer_mode_code => 'S'
8430: , p_acct_entry_type_code => 'E'
8436: --
8437: --
8438: -- set accounting line type info
8439: --
8440: xla_ae_lines_pkg.SetAcctLineType
8441: (p_component_type => l_component_type
8442: ,p_event_type_code => l_event_type_code
8443: ,p_line_definition_owner_code => l_line_definition_owner_code
8444: ,p_line_definition_code => l_line_definition_code
8450: ,p_event_class_code => l_event_class_code);
8451: --
8452: -- set accounting class
8453: --
8454: xla_ae_lines_pkg.SetAcctClass(
8455: p_accounting_class_code => 'PURCHASE_ORDER'
8456: , p_ae_header_id => l_ae_header_id
8457: );
8458:
8458:
8459: --
8460: -- set rounding class
8461: --
8462: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
8463: 'PURCHASE_ORDER';
8464:
8465: --
8466: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
8462: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
8463: 'PURCHASE_ORDER';
8464:
8465: --
8466: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
8467: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
8468: --
8469: -- bulk performance
8470: --
8463: 'PURCHASE_ORDER';
8464:
8465: --
8466: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
8467: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
8468: --
8469: -- bulk performance
8470: --
8471: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
8467: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
8468: --
8469: -- bulk performance
8470: --
8471: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
8472:
8473: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
8474: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
8475:
8469: -- bulk performance
8470: --
8471: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
8472:
8473: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
8474: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
8475:
8476: -- 4955764
8477: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8473: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
8474: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
8475:
8476: -- 4955764
8477: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8478: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
8479:
8480: -- 4458381 Public Sector Enh
8481:
8527: l_rec_acct_attrs.array_num_value(20) := p_source_28;
8528: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
8529: l_rec_acct_attrs.array_num_value(21) := p_source_28;
8530:
8531: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
8532: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
8533:
8534: ---------------------------------------------------------------------------------------------------------------
8535: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8528: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
8529: l_rec_acct_attrs.array_num_value(21) := p_source_28;
8530:
8531: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
8532: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
8533:
8534: ---------------------------------------------------------------------------------------------------------------
8535: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8536: ---------------------------------------------------------------------------------------------------------------
8531: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
8532: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
8533:
8534: ---------------------------------------------------------------------------------------------------------------
8535: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8536: ---------------------------------------------------------------------------------------------------------------
8537: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8538:
8539: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8533:
8534: ---------------------------------------------------------------------------------------------------------------
8535: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8536: ---------------------------------------------------------------------------------------------------------------
8537: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8538:
8539: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8540: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8541:
8535: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8536: ---------------------------------------------------------------------------------------------------------------
8537: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8538:
8539: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8540: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8541:
8542: IF xla_accounting_cache_pkg.GetValueChar
8543: (p_source_code => 'LEDGER_CATEGORY_CODE'
8536: ---------------------------------------------------------------------------------------------------------------
8537: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8538:
8539: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8540: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8541:
8542: IF xla_accounting_cache_pkg.GetValueChar
8543: (p_source_code => 'LEDGER_CATEGORY_CODE'
8544: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
8547: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
8548: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
8549: )
8550: THEN
8551: xla_ae_lines_pkg.BflowUpgEntry
8552: (p_business_method_code => l_bflow_method_code
8553: ,p_business_class_code => l_bflow_class_code
8554: ,p_balance_type => l_balance_type_code);
8555: ELSE
8553: ,p_business_class_code => l_bflow_class_code
8554: ,p_balance_type => l_balance_type_code);
8555: ELSE
8556: NULL;
8557: XLA_AE_LINES_PKG.business_flow_validation(
8558: p_business_method_code => l_bflow_method_code
8559: ,p_business_class_code => l_bflow_class_code
8560: ,p_inherit_description_flag => l_inherit_desc_flag);
8561: END IF;
8600: xla_accounting_err_pkg.build_message
8601: (p_appli_s_name => 'XLA'
8602: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
8603: ,p_token_1 => 'LINE_NUMBER'
8604: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
8605: ,p_token_2 => 'LINE_TYPE_NAME'
8606: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
8607: l_component_type
8608: ,l_component_code
8636: --
8637: --
8638: ------------------------------------------------------------------------------------------------
8639: -- 4219869 Business Flow
8640: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
8641: -- Prior Entry. Currently, the following code is always generated.
8642: ------------------------------------------------------------------------------------------------
8643: -- No ValidateCurrentLine for business flow method of Prior Entry
8644:
8645: ------------------------------------------------------------------------------------
8646: -- 4219869 Business Flow
8647: -- Populated credit and debit amounts -- Need to generate this within IF
8648: ------------------------------------------------------------------------------------
8649: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
8650:
8651: ----------------------------------------------------------------------------------
8652: -- 4219869 Business Flow
8653: -- Update journal entry status -- Need to generate this within IF
8677: -- To allow MPA report to determine if it should generate report process
8678: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
8679: ------------------------------------------------------------------------------------------
8680:
8681: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
8682: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
8683: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
8684: -- call ADRs
8685: -- Bug 4922099
8678: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
8679: ------------------------------------------------------------------------------------------
8680:
8681: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
8682: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
8683: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
8684: -- call ADRs
8685: -- Bug 4922099
8686: --
8699:
8700: --
8701: -- Update the line information that should be overwritten
8702: --
8703: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
8704: p_header_num => 1);
8705: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
8706:
8707: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8701: -- Update the line information that should be overwritten
8702: --
8703: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
8704: p_header_num => 1);
8705: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
8706:
8707: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8708:
8709: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
8703: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
8704: p_header_num => 1);
8705: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
8706:
8707: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8708:
8709: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
8710: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
8711: END IF;
8706:
8707: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8708:
8709: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
8710: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
8711: END IF;
8712:
8713: --
8714: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
8713: --
8714: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
8715: --
8716: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
8717: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
8718: ELSE
8719: ---------------------------------------------------------------------------------------------------
8720: -- 4262811a Switch Sign
8721: ---------------------------------------------------------------------------------------------------
8718: ELSE
8719: ---------------------------------------------------------------------------------------------------
8720: -- 4262811a Switch Sign
8721: ---------------------------------------------------------------------------------------------------
8722: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8723: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8724: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8725: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8726: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8719: ---------------------------------------------------------------------------------------------------
8720: -- 4262811a Switch Sign
8721: ---------------------------------------------------------------------------------------------------
8722: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8723: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8724: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8725: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8726: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8727: -- 5132302
8720: -- 4262811a Switch Sign
8721: ---------------------------------------------------------------------------------------------------
8722: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8723: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8724: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8725: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8726: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8727: -- 5132302
8728: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8721: ---------------------------------------------------------------------------------------------------
8722: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8723: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8724: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8725: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8726: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8727: -- 5132302
8728: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8729: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8722: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8723: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8724: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8725: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8726: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8727: -- 5132302
8728: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8729: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8730:
8724: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8725: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8726: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8727: -- 5132302
8728: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8729: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8730:
8731: END IF;
8732:
8725: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8726: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8727: -- 5132302
8728: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8729: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8730:
8731: END IF;
8732:
8733: -- 4955764
8730:
8731: END IF;
8732:
8733: -- 4955764
8734: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8735: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
8736:
8737:
8738: XLA_AE_LINES_PKG.ValidateCurrentLine;
8734: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8735: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
8736:
8737:
8738: XLA_AE_LINES_PKG.ValidateCurrentLine;
8739: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
8740:
8741: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
8742: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
8735: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
8736:
8737:
8738: XLA_AE_LINES_PKG.ValidateCurrentLine;
8739: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
8740:
8741: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
8742: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
8743: ,p_balance_type_code => l_balance_type_code);
8883: --
8884: -- bulk performance
8885: --
8886: l_balance_type_code VARCHAR2(1);
8887: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
8888: l_log_module VARCHAR2(240);
8889:
8890: --
8891: -- Upgrade strategy
8963: NVL(p_source_7,9E125) = 15
8964: THEN
8965:
8966: --
8967: XLA_AE_LINES_PKG.SetNewLine;
8968:
8969: p_balance_type_code := l_balance_type_code;
8970: -- set the flag so later we will know whether the gain loss line needs to be created
8971:
8975:
8976: --
8977: -- bulk performance
8978: --
8979: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
8980: p_header_num => 0); -- 4262811
8981: --
8982: -- set accounting line options
8983: --
8980: p_header_num => 0); -- 4262811
8981: --
8982: -- set accounting line options
8983: --
8984: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
8985: p_natural_side_code => 'C'
8986: , p_gain_or_loss_flag => 'N'
8987: , p_gl_transfer_mode_code => 'S'
8988: , p_acct_entry_type_code => 'E'
8994: --
8995: --
8996: -- set accounting line type info
8997: --
8998: xla_ae_lines_pkg.SetAcctLineType
8999: (p_component_type => l_component_type
9000: ,p_event_type_code => l_event_type_code
9001: ,p_line_definition_owner_code => l_line_definition_owner_code
9002: ,p_line_definition_code => l_line_definition_code
9008: ,p_event_class_code => l_event_class_code);
9009: --
9010: -- set accounting class
9011: --
9012: xla_ae_lines_pkg.SetAcctClass(
9013: p_accounting_class_code => 'PURCHASE_ORDER'
9014: , p_ae_header_id => l_ae_header_id
9015: );
9016:
9016:
9017: --
9018: -- set rounding class
9019: --
9020: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
9021: 'PURCHASE_ORDER';
9022:
9023: --
9024: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
9020: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
9021: 'PURCHASE_ORDER';
9022:
9023: --
9024: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
9025: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
9026: --
9027: -- bulk performance
9028: --
9021: 'PURCHASE_ORDER';
9022:
9023: --
9024: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
9025: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
9026: --
9027: -- bulk performance
9028: --
9029: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
9025: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
9026: --
9027: -- bulk performance
9028: --
9029: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
9030:
9031: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
9032: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
9033:
9027: -- bulk performance
9028: --
9029: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
9030:
9031: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
9032: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
9033:
9034: -- 4955764
9035: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9031: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
9032: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
9033:
9034: -- 4955764
9035: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9036: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
9037:
9038: -- 4458381 Public Sector Enh
9039:
9085: l_rec_acct_attrs.array_num_value(20) := p_source_28;
9086: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
9087: l_rec_acct_attrs.array_num_value(21) := p_source_28;
9088:
9089: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
9090: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
9091:
9092: ---------------------------------------------------------------------------------------------------------------
9093: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9086: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
9087: l_rec_acct_attrs.array_num_value(21) := p_source_28;
9088:
9089: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
9090: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
9091:
9092: ---------------------------------------------------------------------------------------------------------------
9093: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9094: ---------------------------------------------------------------------------------------------------------------
9089: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
9090: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
9091:
9092: ---------------------------------------------------------------------------------------------------------------
9093: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9094: ---------------------------------------------------------------------------------------------------------------
9095: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9096:
9097: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9091:
9092: ---------------------------------------------------------------------------------------------------------------
9093: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9094: ---------------------------------------------------------------------------------------------------------------
9095: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9096:
9097: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9098: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9099:
9093: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9094: ---------------------------------------------------------------------------------------------------------------
9095: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9096:
9097: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9098: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9099:
9100: IF xla_accounting_cache_pkg.GetValueChar
9101: (p_source_code => 'LEDGER_CATEGORY_CODE'
9094: ---------------------------------------------------------------------------------------------------------------
9095: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9096:
9097: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9098: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9099:
9100: IF xla_accounting_cache_pkg.GetValueChar
9101: (p_source_code => 'LEDGER_CATEGORY_CODE'
9102: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
9105: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
9106: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
9107: )
9108: THEN
9109: xla_ae_lines_pkg.BflowUpgEntry
9110: (p_business_method_code => l_bflow_method_code
9111: ,p_business_class_code => l_bflow_class_code
9112: ,p_balance_type => l_balance_type_code);
9113: ELSE
9111: ,p_business_class_code => l_bflow_class_code
9112: ,p_balance_type => l_balance_type_code);
9113: ELSE
9114: NULL;
9115: XLA_AE_LINES_PKG.business_flow_validation(
9116: p_business_method_code => l_bflow_method_code
9117: ,p_business_class_code => l_bflow_class_code
9118: ,p_inherit_description_flag => l_inherit_desc_flag);
9119: END IF;
9158: xla_accounting_err_pkg.build_message
9159: (p_appli_s_name => 'XLA'
9160: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
9161: ,p_token_1 => 'LINE_NUMBER'
9162: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
9163: ,p_token_2 => 'LINE_TYPE_NAME'
9164: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
9165: l_component_type
9166: ,l_component_code
9194: --
9195: --
9196: ------------------------------------------------------------------------------------------------
9197: -- 4219869 Business Flow
9198: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
9199: -- Prior Entry. Currently, the following code is always generated.
9200: ------------------------------------------------------------------------------------------------
9201: -- No ValidateCurrentLine for business flow method of Prior Entry
9202:
9203: ------------------------------------------------------------------------------------
9204: -- 4219869 Business Flow
9205: -- Populated credit and debit amounts -- Need to generate this within IF
9206: ------------------------------------------------------------------------------------
9207: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
9208:
9209: ----------------------------------------------------------------------------------
9210: -- 4219869 Business Flow
9211: -- Update journal entry status -- Need to generate this within IF
9235: -- To allow MPA report to determine if it should generate report process
9236: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
9237: ------------------------------------------------------------------------------------------
9238:
9239: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
9240: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
9241: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
9242: -- call ADRs
9243: -- Bug 4922099
9236: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
9237: ------------------------------------------------------------------------------------------
9238:
9239: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
9240: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
9241: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
9242: -- call ADRs
9243: -- Bug 4922099
9244: --
9257:
9258: --
9259: -- Update the line information that should be overwritten
9260: --
9261: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
9262: p_header_num => 1);
9263: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
9264:
9265: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9259: -- Update the line information that should be overwritten
9260: --
9261: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
9262: p_header_num => 1);
9263: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
9264:
9265: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9266:
9267: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
9261: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
9262: p_header_num => 1);
9263: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
9264:
9265: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9266:
9267: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
9268: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
9269: END IF;
9264:
9265: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9266:
9267: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
9268: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
9269: END IF;
9270:
9271: --
9272: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
9271: --
9272: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
9273: --
9274: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
9275: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
9276: ELSE
9277: ---------------------------------------------------------------------------------------------------
9278: -- 4262811a Switch Sign
9279: ---------------------------------------------------------------------------------------------------
9276: ELSE
9277: ---------------------------------------------------------------------------------------------------
9278: -- 4262811a Switch Sign
9279: ---------------------------------------------------------------------------------------------------
9280: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9281: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9282: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9283: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9284: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9277: ---------------------------------------------------------------------------------------------------
9278: -- 4262811a Switch Sign
9279: ---------------------------------------------------------------------------------------------------
9280: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9281: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9282: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9283: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9284: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9285: -- 5132302
9278: -- 4262811a Switch Sign
9279: ---------------------------------------------------------------------------------------------------
9280: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9281: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9282: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9283: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9284: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9285: -- 5132302
9286: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9279: ---------------------------------------------------------------------------------------------------
9280: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9281: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9282: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9283: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9284: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9285: -- 5132302
9286: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9287: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9280: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9281: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9282: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9283: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9284: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9285: -- 5132302
9286: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9287: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9288:
9282: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9283: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9284: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9285: -- 5132302
9286: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9287: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9288:
9289: END IF;
9290:
9283: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9284: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9285: -- 5132302
9286: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9287: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9288:
9289: END IF;
9290:
9291: -- 4955764
9288:
9289: END IF;
9290:
9291: -- 4955764
9292: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9293: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
9294:
9295:
9296: XLA_AE_LINES_PKG.ValidateCurrentLine;
9292: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9293: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
9294:
9295:
9296: XLA_AE_LINES_PKG.ValidateCurrentLine;
9297: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
9298:
9299: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
9300: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
9293: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
9294:
9295:
9296: XLA_AE_LINES_PKG.ValidateCurrentLine;
9297: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
9298:
9299: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
9300: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
9301: ,p_balance_type_code => l_balance_type_code);
9441: --
9442: -- bulk performance
9443: --
9444: l_balance_type_code VARCHAR2(1);
9445: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
9446: l_log_module VARCHAR2(240);
9447:
9448: --
9449: -- Upgrade strategy
9521: NVL(p_source_7,9E125) = 15
9522: THEN
9523:
9524: --
9525: XLA_AE_LINES_PKG.SetNewLine;
9526:
9527: p_balance_type_code := l_balance_type_code;
9528: -- set the flag so later we will know whether the gain loss line needs to be created
9529:
9533:
9534: --
9535: -- bulk performance
9536: --
9537: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
9538: p_header_num => 0); -- 4262811
9539: --
9540: -- set accounting line options
9541: --
9538: p_header_num => 0); -- 4262811
9539: --
9540: -- set accounting line options
9541: --
9542: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
9543: p_natural_side_code => 'C'
9544: , p_gain_or_loss_flag => 'N'
9545: , p_gl_transfer_mode_code => 'S'
9546: , p_acct_entry_type_code => 'E'
9552: --
9553: --
9554: -- set accounting line type info
9555: --
9556: xla_ae_lines_pkg.SetAcctLineType
9557: (p_component_type => l_component_type
9558: ,p_event_type_code => l_event_type_code
9559: ,p_line_definition_owner_code => l_line_definition_owner_code
9560: ,p_line_definition_code => l_line_definition_code
9566: ,p_event_class_code => l_event_class_code);
9567: --
9568: -- set accounting class
9569: --
9570: xla_ae_lines_pkg.SetAcctClass(
9571: p_accounting_class_code => 'PURCHASE_ORDER'
9572: , p_ae_header_id => l_ae_header_id
9573: );
9574:
9574:
9575: --
9576: -- set rounding class
9577: --
9578: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
9579: 'PURCHASE_ORDER';
9580:
9581: --
9582: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
9578: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
9579: 'PURCHASE_ORDER';
9580:
9581: --
9582: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
9583: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
9584: --
9585: -- bulk performance
9586: --
9579: 'PURCHASE_ORDER';
9580:
9581: --
9582: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
9583: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
9584: --
9585: -- bulk performance
9586: --
9587: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
9583: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
9584: --
9585: -- bulk performance
9586: --
9587: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
9588:
9589: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
9590: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
9591:
9585: -- bulk performance
9586: --
9587: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
9588:
9589: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
9590: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
9591:
9592: -- 4955764
9593: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9589: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
9590: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
9591:
9592: -- 4955764
9593: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9594: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
9595:
9596: -- 4458381 Public Sector Enh
9597:
9643: l_rec_acct_attrs.array_num_value(20) := p_source_28;
9644: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
9645: l_rec_acct_attrs.array_num_value(21) := p_source_28;
9646:
9647: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
9648: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
9649:
9650: ---------------------------------------------------------------------------------------------------------------
9651: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9644: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
9645: l_rec_acct_attrs.array_num_value(21) := p_source_28;
9646:
9647: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
9648: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
9649:
9650: ---------------------------------------------------------------------------------------------------------------
9651: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9652: ---------------------------------------------------------------------------------------------------------------
9647: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
9648: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
9649:
9650: ---------------------------------------------------------------------------------------------------------------
9651: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9652: ---------------------------------------------------------------------------------------------------------------
9653: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9654:
9655: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9649:
9650: ---------------------------------------------------------------------------------------------------------------
9651: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9652: ---------------------------------------------------------------------------------------------------------------
9653: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9654:
9655: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9656: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9657:
9651: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9652: ---------------------------------------------------------------------------------------------------------------
9653: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9654:
9655: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9656: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9657:
9658: IF xla_accounting_cache_pkg.GetValueChar
9659: (p_source_code => 'LEDGER_CATEGORY_CODE'
9652: ---------------------------------------------------------------------------------------------------------------
9653: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9654:
9655: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9656: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9657:
9658: IF xla_accounting_cache_pkg.GetValueChar
9659: (p_source_code => 'LEDGER_CATEGORY_CODE'
9660: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
9663: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
9664: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
9665: )
9666: THEN
9667: xla_ae_lines_pkg.BflowUpgEntry
9668: (p_business_method_code => l_bflow_method_code
9669: ,p_business_class_code => l_bflow_class_code
9670: ,p_balance_type => l_balance_type_code);
9671: ELSE
9669: ,p_business_class_code => l_bflow_class_code
9670: ,p_balance_type => l_balance_type_code);
9671: ELSE
9672: NULL;
9673: XLA_AE_LINES_PKG.business_flow_validation(
9674: p_business_method_code => l_bflow_method_code
9675: ,p_business_class_code => l_bflow_class_code
9676: ,p_inherit_description_flag => l_inherit_desc_flag);
9677: END IF;
9716: xla_accounting_err_pkg.build_message
9717: (p_appli_s_name => 'XLA'
9718: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
9719: ,p_token_1 => 'LINE_NUMBER'
9720: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
9721: ,p_token_2 => 'LINE_TYPE_NAME'
9722: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
9723: l_component_type
9724: ,l_component_code
9752: --
9753: --
9754: ------------------------------------------------------------------------------------------------
9755: -- 4219869 Business Flow
9756: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
9757: -- Prior Entry. Currently, the following code is always generated.
9758: ------------------------------------------------------------------------------------------------
9759: -- No ValidateCurrentLine for business flow method of Prior Entry
9760:
9761: ------------------------------------------------------------------------------------
9762: -- 4219869 Business Flow
9763: -- Populated credit and debit amounts -- Need to generate this within IF
9764: ------------------------------------------------------------------------------------
9765: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
9766:
9767: ----------------------------------------------------------------------------------
9768: -- 4219869 Business Flow
9769: -- Update journal entry status -- Need to generate this within IF
9793: -- To allow MPA report to determine if it should generate report process
9794: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
9795: ------------------------------------------------------------------------------------------
9796:
9797: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
9798: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
9799: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
9800: -- call ADRs
9801: -- Bug 4922099
9794: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
9795: ------------------------------------------------------------------------------------------
9796:
9797: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
9798: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
9799: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
9800: -- call ADRs
9801: -- Bug 4922099
9802: --
9815:
9816: --
9817: -- Update the line information that should be overwritten
9818: --
9819: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
9820: p_header_num => 1);
9821: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
9822:
9823: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9817: -- Update the line information that should be overwritten
9818: --
9819: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
9820: p_header_num => 1);
9821: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
9822:
9823: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9824:
9825: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
9819: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
9820: p_header_num => 1);
9821: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
9822:
9823: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9824:
9825: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
9826: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
9827: END IF;
9822:
9823: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9824:
9825: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
9826: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
9827: END IF;
9828:
9829: --
9830: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
9829: --
9830: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
9831: --
9832: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
9833: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
9834: ELSE
9835: ---------------------------------------------------------------------------------------------------
9836: -- 4262811a Switch Sign
9837: ---------------------------------------------------------------------------------------------------
9834: ELSE
9835: ---------------------------------------------------------------------------------------------------
9836: -- 4262811a Switch Sign
9837: ---------------------------------------------------------------------------------------------------
9838: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9839: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9840: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9841: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9842: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9835: ---------------------------------------------------------------------------------------------------
9836: -- 4262811a Switch Sign
9837: ---------------------------------------------------------------------------------------------------
9838: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9839: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9840: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9841: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9842: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9843: -- 5132302
9836: -- 4262811a Switch Sign
9837: ---------------------------------------------------------------------------------------------------
9838: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9839: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9840: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9841: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9842: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9843: -- 5132302
9844: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9837: ---------------------------------------------------------------------------------------------------
9838: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9839: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9840: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9841: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9842: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9843: -- 5132302
9844: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9845: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9838: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9839: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9840: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9841: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9842: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9843: -- 5132302
9844: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9845: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9846:
9840: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9841: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9842: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9843: -- 5132302
9844: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9845: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9846:
9847: END IF;
9848:
9841: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9842: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9843: -- 5132302
9844: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9845: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9846:
9847: END IF;
9848:
9849: -- 4955764
9846:
9847: END IF;
9848:
9849: -- 4955764
9850: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9851: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
9852:
9853:
9854: XLA_AE_LINES_PKG.ValidateCurrentLine;
9850: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9851: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
9852:
9853:
9854: XLA_AE_LINES_PKG.ValidateCurrentLine;
9855: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
9856:
9857: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
9858: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
9851: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
9852:
9853:
9854: XLA_AE_LINES_PKG.ValidateCurrentLine;
9855: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
9856:
9857: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
9858: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
9859: ,p_balance_type_code => l_balance_type_code);
9999: --
10000: -- bulk performance
10001: --
10002: l_balance_type_code VARCHAR2(1);
10003: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
10004: l_log_module VARCHAR2(240);
10005:
10006: --
10007: -- Upgrade strategy
10079: NVL(p_source_7,9E125) = 15
10080: THEN
10081:
10082: --
10083: XLA_AE_LINES_PKG.SetNewLine;
10084:
10085: p_balance_type_code := l_balance_type_code;
10086: -- set the flag so later we will know whether the gain loss line needs to be created
10087:
10091:
10092: --
10093: -- bulk performance
10094: --
10095: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
10096: p_header_num => 0); -- 4262811
10097: --
10098: -- set accounting line options
10099: --
10096: p_header_num => 0); -- 4262811
10097: --
10098: -- set accounting line options
10099: --
10100: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
10101: p_natural_side_code => 'C'
10102: , p_gain_or_loss_flag => 'N'
10103: , p_gl_transfer_mode_code => 'S'
10104: , p_acct_entry_type_code => 'E'
10110: --
10111: --
10112: -- set accounting line type info
10113: --
10114: xla_ae_lines_pkg.SetAcctLineType
10115: (p_component_type => l_component_type
10116: ,p_event_type_code => l_event_type_code
10117: ,p_line_definition_owner_code => l_line_definition_owner_code
10118: ,p_line_definition_code => l_line_definition_code
10124: ,p_event_class_code => l_event_class_code);
10125: --
10126: -- set accounting class
10127: --
10128: xla_ae_lines_pkg.SetAcctClass(
10129: p_accounting_class_code => 'PURCHASE_ORDER'
10130: , p_ae_header_id => l_ae_header_id
10131: );
10132:
10132:
10133: --
10134: -- set rounding class
10135: --
10136: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
10137: 'PURCHASE_ORDER';
10138:
10139: --
10140: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
10136: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
10137: 'PURCHASE_ORDER';
10138:
10139: --
10140: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
10141: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
10142: --
10143: -- bulk performance
10144: --
10137: 'PURCHASE_ORDER';
10138:
10139: --
10140: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
10141: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
10142: --
10143: -- bulk performance
10144: --
10145: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
10141: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
10142: --
10143: -- bulk performance
10144: --
10145: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
10146:
10147: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
10148: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
10149:
10143: -- bulk performance
10144: --
10145: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
10146:
10147: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
10148: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
10149:
10150: -- 4955764
10151: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10147: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
10148: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
10149:
10150: -- 4955764
10151: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10152: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
10153:
10154: -- 4458381 Public Sector Enh
10155:
10201: l_rec_acct_attrs.array_num_value(20) := p_source_28;
10202: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
10203: l_rec_acct_attrs.array_num_value(21) := p_source_28;
10204:
10205: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10206: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10207:
10208: ---------------------------------------------------------------------------------------------------------------
10209: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10202: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
10203: l_rec_acct_attrs.array_num_value(21) := p_source_28;
10204:
10205: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10206: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10207:
10208: ---------------------------------------------------------------------------------------------------------------
10209: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10210: ---------------------------------------------------------------------------------------------------------------
10205: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10206: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10207:
10208: ---------------------------------------------------------------------------------------------------------------
10209: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10210: ---------------------------------------------------------------------------------------------------------------
10211: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10212:
10213: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10207:
10208: ---------------------------------------------------------------------------------------------------------------
10209: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10210: ---------------------------------------------------------------------------------------------------------------
10211: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10212:
10213: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10214: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10215:
10209: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10210: ---------------------------------------------------------------------------------------------------------------
10211: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10212:
10213: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10214: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10215:
10216: IF xla_accounting_cache_pkg.GetValueChar
10217: (p_source_code => 'LEDGER_CATEGORY_CODE'
10210: ---------------------------------------------------------------------------------------------------------------
10211: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10212:
10213: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10214: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10215:
10216: IF xla_accounting_cache_pkg.GetValueChar
10217: (p_source_code => 'LEDGER_CATEGORY_CODE'
10218: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
10221: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
10222: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
10223: )
10224: THEN
10225: xla_ae_lines_pkg.BflowUpgEntry
10226: (p_business_method_code => l_bflow_method_code
10227: ,p_business_class_code => l_bflow_class_code
10228: ,p_balance_type => l_balance_type_code);
10229: ELSE
10227: ,p_business_class_code => l_bflow_class_code
10228: ,p_balance_type => l_balance_type_code);
10229: ELSE
10230: NULL;
10231: XLA_AE_LINES_PKG.business_flow_validation(
10232: p_business_method_code => l_bflow_method_code
10233: ,p_business_class_code => l_bflow_class_code
10234: ,p_inherit_description_flag => l_inherit_desc_flag);
10235: END IF;
10274: xla_accounting_err_pkg.build_message
10275: (p_appli_s_name => 'XLA'
10276: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
10277: ,p_token_1 => 'LINE_NUMBER'
10278: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
10279: ,p_token_2 => 'LINE_TYPE_NAME'
10280: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
10281: l_component_type
10282: ,l_component_code
10310: --
10311: --
10312: ------------------------------------------------------------------------------------------------
10313: -- 4219869 Business Flow
10314: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
10315: -- Prior Entry. Currently, the following code is always generated.
10316: ------------------------------------------------------------------------------------------------
10317: -- No ValidateCurrentLine for business flow method of Prior Entry
10318:
10319: ------------------------------------------------------------------------------------
10320: -- 4219869 Business Flow
10321: -- Populated credit and debit amounts -- Need to generate this within IF
10322: ------------------------------------------------------------------------------------
10323: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
10324:
10325: ----------------------------------------------------------------------------------
10326: -- 4219869 Business Flow
10327: -- Update journal entry status -- Need to generate this within IF
10351: -- To allow MPA report to determine if it should generate report process
10352: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
10353: ------------------------------------------------------------------------------------------
10354:
10355: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
10356: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
10357: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
10358: -- call ADRs
10359: -- Bug 4922099
10352: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
10353: ------------------------------------------------------------------------------------------
10354:
10355: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
10356: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
10357: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
10358: -- call ADRs
10359: -- Bug 4922099
10360: --
10373:
10374: --
10375: -- Update the line information that should be overwritten
10376: --
10377: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
10378: p_header_num => 1);
10379: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
10380:
10381: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10375: -- Update the line information that should be overwritten
10376: --
10377: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
10378: p_header_num => 1);
10379: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
10380:
10381: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10382:
10383: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
10377: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
10378: p_header_num => 1);
10379: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
10380:
10381: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10382:
10383: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
10384: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
10385: END IF;
10380:
10381: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10382:
10383: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
10384: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
10385: END IF;
10386:
10387: --
10388: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
10387: --
10388: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
10389: --
10390: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
10391: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
10392: ELSE
10393: ---------------------------------------------------------------------------------------------------
10394: -- 4262811a Switch Sign
10395: ---------------------------------------------------------------------------------------------------
10392: ELSE
10393: ---------------------------------------------------------------------------------------------------
10394: -- 4262811a Switch Sign
10395: ---------------------------------------------------------------------------------------------------
10396: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10397: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10398: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10399: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10400: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10393: ---------------------------------------------------------------------------------------------------
10394: -- 4262811a Switch Sign
10395: ---------------------------------------------------------------------------------------------------
10396: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10397: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10398: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10399: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10400: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10401: -- 5132302
10394: -- 4262811a Switch Sign
10395: ---------------------------------------------------------------------------------------------------
10396: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10397: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10398: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10399: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10400: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10401: -- 5132302
10402: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10395: ---------------------------------------------------------------------------------------------------
10396: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10397: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10398: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10399: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10400: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10401: -- 5132302
10402: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10403: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10396: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10397: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10398: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10399: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10400: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10401: -- 5132302
10402: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10403: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10404:
10398: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10399: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10400: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10401: -- 5132302
10402: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10403: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10404:
10405: END IF;
10406:
10399: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10400: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10401: -- 5132302
10402: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10403: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10404:
10405: END IF;
10406:
10407: -- 4955764
10404:
10405: END IF;
10406:
10407: -- 4955764
10408: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10409: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
10410:
10411:
10412: XLA_AE_LINES_PKG.ValidateCurrentLine;
10408: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10409: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
10410:
10411:
10412: XLA_AE_LINES_PKG.ValidateCurrentLine;
10413: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
10414:
10415: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
10416: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
10409: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
10410:
10411:
10412: XLA_AE_LINES_PKG.ValidateCurrentLine;
10413: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
10414:
10415: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
10416: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
10417: ,p_balance_type_code => l_balance_type_code);
10553: --
10554: -- bulk performance
10555: --
10556: l_balance_type_code VARCHAR2(1);
10557: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
10558: l_log_module VARCHAR2(240);
10559:
10560: --
10561: -- Upgrade strategy
10630: ') = 'Charge'
10631: THEN
10632:
10633: --
10634: XLA_AE_LINES_PKG.SetNewLine;
10635:
10636: p_balance_type_code := l_balance_type_code;
10637: -- set the flag so later we will know whether the gain loss line needs to be created
10638:
10642:
10643: --
10644: -- bulk performance
10645: --
10646: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
10647: p_header_num => 0); -- 4262811
10648: --
10649: -- set accounting line options
10650: --
10647: p_header_num => 0); -- 4262811
10648: --
10649: -- set accounting line options
10650: --
10651: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
10652: p_natural_side_code => 'D'
10653: , p_gain_or_loss_flag => 'N'
10654: , p_gl_transfer_mode_code => 'S'
10655: , p_acct_entry_type_code => 'E'
10661: --
10662: --
10663: -- set accounting line type info
10664: --
10665: xla_ae_lines_pkg.SetAcctLineType
10666: (p_component_type => l_component_type
10667: ,p_event_type_code => l_event_type_code
10668: ,p_line_definition_owner_code => l_line_definition_owner_code
10669: ,p_line_definition_code => l_line_definition_code
10675: ,p_event_class_code => l_event_class_code);
10676: --
10677: -- set accounting class
10678: --
10679: xla_ae_lines_pkg.SetAcctClass(
10680: p_accounting_class_code => 'PURCHASE_ORDER'
10681: , p_ae_header_id => l_ae_header_id
10682: );
10683:
10683:
10684: --
10685: -- set rounding class
10686: --
10687: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
10688: 'PURCHASE_ORDER';
10689:
10690: --
10691: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
10687: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
10688: 'PURCHASE_ORDER';
10689:
10690: --
10691: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
10692: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
10693: --
10694: -- bulk performance
10695: --
10688: 'PURCHASE_ORDER';
10689:
10690: --
10691: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
10692: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
10693: --
10694: -- bulk performance
10695: --
10696: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
10692: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
10693: --
10694: -- bulk performance
10695: --
10696: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
10697:
10698: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
10699: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
10700:
10694: -- bulk performance
10695: --
10696: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
10697:
10698: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
10699: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
10700:
10701: -- 4955764
10702: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10698: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
10699: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
10700:
10701: -- 4955764
10702: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10703: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
10704:
10705: -- 4458381 Public Sector Enh
10706:
10752: l_rec_acct_attrs.array_num_value(20) := p_source_28;
10753: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
10754: l_rec_acct_attrs.array_num_value(21) := p_source_28;
10755:
10756: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10757: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10758:
10759: ---------------------------------------------------------------------------------------------------------------
10760: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10753: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
10754: l_rec_acct_attrs.array_num_value(21) := p_source_28;
10755:
10756: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10757: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10758:
10759: ---------------------------------------------------------------------------------------------------------------
10760: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10761: ---------------------------------------------------------------------------------------------------------------
10756: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10757: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10758:
10759: ---------------------------------------------------------------------------------------------------------------
10760: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10761: ---------------------------------------------------------------------------------------------------------------
10762: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10763:
10764: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10758:
10759: ---------------------------------------------------------------------------------------------------------------
10760: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10761: ---------------------------------------------------------------------------------------------------------------
10762: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10763:
10764: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10765: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10766:
10760: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10761: ---------------------------------------------------------------------------------------------------------------
10762: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10763:
10764: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10765: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10766:
10767: IF xla_accounting_cache_pkg.GetValueChar
10768: (p_source_code => 'LEDGER_CATEGORY_CODE'
10761: ---------------------------------------------------------------------------------------------------------------
10762: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10763:
10764: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10765: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10766:
10767: IF xla_accounting_cache_pkg.GetValueChar
10768: (p_source_code => 'LEDGER_CATEGORY_CODE'
10769: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
10772: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
10773: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
10774: )
10775: THEN
10776: xla_ae_lines_pkg.BflowUpgEntry
10777: (p_business_method_code => l_bflow_method_code
10778: ,p_business_class_code => l_bflow_class_code
10779: ,p_balance_type => l_balance_type_code);
10780: ELSE
10778: ,p_business_class_code => l_bflow_class_code
10779: ,p_balance_type => l_balance_type_code);
10780: ELSE
10781: NULL;
10782: XLA_AE_LINES_PKG.business_flow_validation(
10783: p_business_method_code => l_bflow_method_code
10784: ,p_business_class_code => l_bflow_class_code
10785: ,p_inherit_description_flag => l_inherit_desc_flag);
10786: END IF;
10825: xla_accounting_err_pkg.build_message
10826: (p_appli_s_name => 'XLA'
10827: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
10828: ,p_token_1 => 'LINE_NUMBER'
10829: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
10830: ,p_token_2 => 'LINE_TYPE_NAME'
10831: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
10832: l_component_type
10833: ,l_component_code
10861: --
10862: --
10863: ------------------------------------------------------------------------------------------------
10864: -- 4219869 Business Flow
10865: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
10866: -- Prior Entry. Currently, the following code is always generated.
10867: ------------------------------------------------------------------------------------------------
10868: -- No ValidateCurrentLine for business flow method of Prior Entry
10869:
10870: ------------------------------------------------------------------------------------
10871: -- 4219869 Business Flow
10872: -- Populated credit and debit amounts -- Need to generate this within IF
10873: ------------------------------------------------------------------------------------
10874: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
10875:
10876: ----------------------------------------------------------------------------------
10877: -- 4219869 Business Flow
10878: -- Update journal entry status -- Need to generate this within IF
10902: -- To allow MPA report to determine if it should generate report process
10903: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
10904: ------------------------------------------------------------------------------------------
10905:
10906: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
10907: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
10908: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
10909: -- call ADRs
10910: -- Bug 4922099
10903: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
10904: ------------------------------------------------------------------------------------------
10905:
10906: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
10907: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
10908: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
10909: -- call ADRs
10910: -- Bug 4922099
10911: --
10924:
10925: --
10926: -- Update the line information that should be overwritten
10927: --
10928: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
10929: p_header_num => 1);
10930: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
10931:
10932: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10926: -- Update the line information that should be overwritten
10927: --
10928: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
10929: p_header_num => 1);
10930: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
10931:
10932: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10933:
10934: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
10928: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
10929: p_header_num => 1);
10930: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
10931:
10932: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10933:
10934: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
10935: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
10936: END IF;
10931:
10932: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10933:
10934: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
10935: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
10936: END IF;
10937:
10938: --
10939: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
10938: --
10939: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
10940: --
10941: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
10942: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
10943: ELSE
10944: ---------------------------------------------------------------------------------------------------
10945: -- 4262811a Switch Sign
10946: ---------------------------------------------------------------------------------------------------
10943: ELSE
10944: ---------------------------------------------------------------------------------------------------
10945: -- 4262811a Switch Sign
10946: ---------------------------------------------------------------------------------------------------
10947: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10948: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10949: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10950: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10951: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10944: ---------------------------------------------------------------------------------------------------
10945: -- 4262811a Switch Sign
10946: ---------------------------------------------------------------------------------------------------
10947: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10948: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10949: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10950: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10951: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10952: -- 5132302
10945: -- 4262811a Switch Sign
10946: ---------------------------------------------------------------------------------------------------
10947: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10948: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10949: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10950: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10951: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10952: -- 5132302
10953: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10946: ---------------------------------------------------------------------------------------------------
10947: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10948: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10949: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10950: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10951: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10952: -- 5132302
10953: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10954: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10947: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10948: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10949: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10950: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10951: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10952: -- 5132302
10953: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10954: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10955:
10949: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10950: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10951: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10952: -- 5132302
10953: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10954: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10955:
10956: END IF;
10957:
10950: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10951: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10952: -- 5132302
10953: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10954: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10955:
10956: END IF;
10957:
10958: -- 4955764
10955:
10956: END IF;
10957:
10958: -- 4955764
10959: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10960: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
10961:
10962:
10963: XLA_AE_LINES_PKG.ValidateCurrentLine;
10959: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10960: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
10961:
10962:
10963: XLA_AE_LINES_PKG.ValidateCurrentLine;
10964: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
10965:
10966: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
10967: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
10960: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
10961:
10962:
10963: XLA_AE_LINES_PKG.ValidateCurrentLine;
10964: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
10965:
10966: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
10967: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
10968: ,p_balance_type_code => l_balance_type_code);
11106: --
11107: -- bulk performance
11108: --
11109: l_balance_type_code VARCHAR2(1);
11110: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
11111: l_log_module VARCHAR2(240);
11112:
11113: --
11114: -- Upgrade strategy
11178: ') = 'Y'
11179: THEN
11180:
11181: --
11182: XLA_AE_LINES_PKG.SetNewLine;
11183:
11184: p_balance_type_code := l_balance_type_code;
11185: -- set the flag so later we will know whether the gain loss line needs to be created
11186:
11190:
11191: --
11192: -- bulk performance
11193: --
11194: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
11195: p_header_num => 0); -- 4262811
11196: --
11197: -- set accounting line options
11198: --
11195: p_header_num => 0); -- 4262811
11196: --
11197: -- set accounting line options
11198: --
11199: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
11200: p_natural_side_code => 'C'
11201: , p_gain_or_loss_flag => 'N'
11202: , p_gl_transfer_mode_code => 'S'
11203: , p_acct_entry_type_code => 'E'
11209: --
11210: --
11211: -- set accounting line type info
11212: --
11213: xla_ae_lines_pkg.SetAcctLineType
11214: (p_component_type => l_component_type
11215: ,p_event_type_code => l_event_type_code
11216: ,p_line_definition_owner_code => l_line_definition_owner_code
11217: ,p_line_definition_code => l_line_definition_code
11223: ,p_event_class_code => l_event_class_code);
11224: --
11225: -- set accounting class
11226: --
11227: xla_ae_lines_pkg.SetAcctClass(
11228: p_accounting_class_code => 'REQUISITION'
11229: , p_ae_header_id => l_ae_header_id
11230: );
11231:
11231:
11232: --
11233: -- set rounding class
11234: --
11235: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
11236: 'REQUISITION';
11237:
11238: --
11239: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11235: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
11236: 'REQUISITION';
11237:
11238: --
11239: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11240: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11241: --
11242: -- bulk performance
11243: --
11236: 'REQUISITION';
11237:
11238: --
11239: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11240: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11241: --
11242: -- bulk performance
11243: --
11244: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11240: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11241: --
11242: -- bulk performance
11243: --
11244: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11245:
11246: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
11247: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
11248:
11242: -- bulk performance
11243: --
11244: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11245:
11246: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
11247: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
11248:
11249: -- 4955764
11250: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11246: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
11247: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
11248:
11249: -- 4955764
11250: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11251: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
11252:
11253: -- 4458381 Public Sector Enh
11254:
11300: l_rec_acct_attrs.array_num_value(20) := p_source_40;
11301: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
11302: l_rec_acct_attrs.array_num_value(21) := p_source_40;
11303:
11304: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
11305: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
11306:
11307: ---------------------------------------------------------------------------------------------------------------
11308: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11301: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
11302: l_rec_acct_attrs.array_num_value(21) := p_source_40;
11303:
11304: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
11305: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
11306:
11307: ---------------------------------------------------------------------------------------------------------------
11308: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11309: ---------------------------------------------------------------------------------------------------------------
11304: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
11305: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
11306:
11307: ---------------------------------------------------------------------------------------------------------------
11308: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11309: ---------------------------------------------------------------------------------------------------------------
11310: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11311:
11312: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11306:
11307: ---------------------------------------------------------------------------------------------------------------
11308: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11309: ---------------------------------------------------------------------------------------------------------------
11310: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11311:
11312: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11313: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11314:
11308: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11309: ---------------------------------------------------------------------------------------------------------------
11310: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11311:
11312: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11313: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11314:
11315: IF xla_accounting_cache_pkg.GetValueChar
11316: (p_source_code => 'LEDGER_CATEGORY_CODE'
11309: ---------------------------------------------------------------------------------------------------------------
11310: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11311:
11312: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11313: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11314:
11315: IF xla_accounting_cache_pkg.GetValueChar
11316: (p_source_code => 'LEDGER_CATEGORY_CODE'
11317: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
11320: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
11321: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
11322: )
11323: THEN
11324: xla_ae_lines_pkg.BflowUpgEntry
11325: (p_business_method_code => l_bflow_method_code
11326: ,p_business_class_code => l_bflow_class_code
11327: ,p_balance_type => l_balance_type_code);
11328: ELSE
11326: ,p_business_class_code => l_bflow_class_code
11327: ,p_balance_type => l_balance_type_code);
11328: ELSE
11329: NULL;
11330: XLA_AE_LINES_PKG.business_flow_validation(
11331: p_business_method_code => l_bflow_method_code
11332: ,p_business_class_code => l_bflow_class_code
11333: ,p_inherit_description_flag => l_inherit_desc_flag);
11334: END IF;
11373: xla_accounting_err_pkg.build_message
11374: (p_appli_s_name => 'XLA'
11375: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
11376: ,p_token_1 => 'LINE_NUMBER'
11377: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
11378: ,p_token_2 => 'LINE_TYPE_NAME'
11379: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
11380: l_component_type
11381: ,l_component_code
11409: --
11410: --
11411: ------------------------------------------------------------------------------------------------
11412: -- 4219869 Business Flow
11413: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
11414: -- Prior Entry. Currently, the following code is always generated.
11415: ------------------------------------------------------------------------------------------------
11416: -- No ValidateCurrentLine for business flow method of Prior Entry
11417:
11418: ------------------------------------------------------------------------------------
11419: -- 4219869 Business Flow
11420: -- Populated credit and debit amounts -- Need to generate this within IF
11421: ------------------------------------------------------------------------------------
11422: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
11423:
11424: ----------------------------------------------------------------------------------
11425: -- 4219869 Business Flow
11426: -- Update journal entry status -- Need to generate this within IF
11450: -- To allow MPA report to determine if it should generate report process
11451: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
11452: ------------------------------------------------------------------------------------------
11453:
11454: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
11455: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
11456: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
11457: -- call ADRs
11458: -- Bug 4922099
11451: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
11452: ------------------------------------------------------------------------------------------
11453:
11454: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
11455: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
11456: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
11457: -- call ADRs
11458: -- Bug 4922099
11459: --
11472:
11473: --
11474: -- Update the line information that should be overwritten
11475: --
11476: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
11477: p_header_num => 1);
11478: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
11479:
11480: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
11474: -- Update the line information that should be overwritten
11475: --
11476: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
11477: p_header_num => 1);
11478: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
11479:
11480: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
11481:
11482: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
11476: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
11477: p_header_num => 1);
11478: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
11479:
11480: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
11481:
11482: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
11483: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
11484: END IF;
11479:
11480: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
11481:
11482: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
11483: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
11484: END IF;
11485:
11486: --
11487: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
11486: --
11487: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
11488: --
11489: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
11490: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
11491: ELSE
11492: ---------------------------------------------------------------------------------------------------
11493: -- 4262811a Switch Sign
11494: ---------------------------------------------------------------------------------------------------
11491: ELSE
11492: ---------------------------------------------------------------------------------------------------
11493: -- 4262811a Switch Sign
11494: ---------------------------------------------------------------------------------------------------
11495: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11496: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11497: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11498: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11499: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11492: ---------------------------------------------------------------------------------------------------
11493: -- 4262811a Switch Sign
11494: ---------------------------------------------------------------------------------------------------
11495: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11496: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11497: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11498: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11499: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11500: -- 5132302
11493: -- 4262811a Switch Sign
11494: ---------------------------------------------------------------------------------------------------
11495: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11496: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11497: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11498: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11499: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11500: -- 5132302
11501: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11494: ---------------------------------------------------------------------------------------------------
11495: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11496: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11497: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11498: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11499: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11500: -- 5132302
11501: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11502: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11495: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11496: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11497: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11498: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11499: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11500: -- 5132302
11501: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11502: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11503:
11497: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11498: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11499: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11500: -- 5132302
11501: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11502: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11503:
11504: END IF;
11505:
11498: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11499: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11500: -- 5132302
11501: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11502: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11503:
11504: END IF;
11505:
11506: -- 4955764
11503:
11504: END IF;
11505:
11506: -- 4955764
11507: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11508: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
11509:
11510:
11511: XLA_AE_LINES_PKG.ValidateCurrentLine;
11507: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11508: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
11509:
11510:
11511: XLA_AE_LINES_PKG.ValidateCurrentLine;
11512: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
11513:
11514: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
11515: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
11508: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
11509:
11510:
11511: XLA_AE_LINES_PKG.ValidateCurrentLine;
11512: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
11513:
11514: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
11515: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
11516: ,p_balance_type_code => l_balance_type_code);
11656: --
11657: -- bulk performance
11658: --
11659: l_balance_type_code VARCHAR2(1);
11660: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
11661: l_log_module VARCHAR2(240);
11662:
11663: --
11664: -- Upgrade strategy
11729: NVL(p_source_7,9E125) = 15
11730: THEN
11731:
11732: --
11733: XLA_AE_LINES_PKG.SetNewLine;
11734:
11735: p_balance_type_code := l_balance_type_code;
11736: -- set the flag so later we will know whether the gain loss line needs to be created
11737:
11741:
11742: --
11743: -- bulk performance
11744: --
11745: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
11746: p_header_num => 0); -- 4262811
11747: --
11748: -- set accounting line options
11749: --
11746: p_header_num => 0); -- 4262811
11747: --
11748: -- set accounting line options
11749: --
11750: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
11751: p_natural_side_code => 'C'
11752: , p_gain_or_loss_flag => 'N'
11753: , p_gl_transfer_mode_code => 'S'
11754: , p_acct_entry_type_code => 'E'
11760: --
11761: --
11762: -- set accounting line type info
11763: --
11764: xla_ae_lines_pkg.SetAcctLineType
11765: (p_component_type => l_component_type
11766: ,p_event_type_code => l_event_type_code
11767: ,p_line_definition_owner_code => l_line_definition_owner_code
11768: ,p_line_definition_code => l_line_definition_code
11774: ,p_event_class_code => l_event_class_code);
11775: --
11776: -- set accounting class
11777: --
11778: xla_ae_lines_pkg.SetAcctClass(
11779: p_accounting_class_code => 'REQUISITION'
11780: , p_ae_header_id => l_ae_header_id
11781: );
11782:
11782:
11783: --
11784: -- set rounding class
11785: --
11786: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
11787: 'REQUISITION';
11788:
11789: --
11790: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11786: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
11787: 'REQUISITION';
11788:
11789: --
11790: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11791: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11792: --
11793: -- bulk performance
11794: --
11787: 'REQUISITION';
11788:
11789: --
11790: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11791: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11792: --
11793: -- bulk performance
11794: --
11795: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11791: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11792: --
11793: -- bulk performance
11794: --
11795: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11796:
11797: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
11798: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
11799:
11793: -- bulk performance
11794: --
11795: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11796:
11797: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
11798: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
11799:
11800: -- 4955764
11801: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11797: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
11798: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
11799:
11800: -- 4955764
11801: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11802: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
11803:
11804: -- 4458381 Public Sector Enh
11805:
11851: l_rec_acct_attrs.array_num_value(20) := p_source_40;
11852: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
11853: l_rec_acct_attrs.array_num_value(21) := p_source_40;
11854:
11855: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
11856: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
11857:
11858: ---------------------------------------------------------------------------------------------------------------
11859: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11852: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
11853: l_rec_acct_attrs.array_num_value(21) := p_source_40;
11854:
11855: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
11856: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
11857:
11858: ---------------------------------------------------------------------------------------------------------------
11859: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11860: ---------------------------------------------------------------------------------------------------------------
11855: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
11856: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
11857:
11858: ---------------------------------------------------------------------------------------------------------------
11859: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11860: ---------------------------------------------------------------------------------------------------------------
11861: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11862:
11863: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11857:
11858: ---------------------------------------------------------------------------------------------------------------
11859: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11860: ---------------------------------------------------------------------------------------------------------------
11861: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11862:
11863: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11864: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11865:
11859: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11860: ---------------------------------------------------------------------------------------------------------------
11861: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11862:
11863: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11864: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11865:
11866: IF xla_accounting_cache_pkg.GetValueChar
11867: (p_source_code => 'LEDGER_CATEGORY_CODE'
11860: ---------------------------------------------------------------------------------------------------------------
11861: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11862:
11863: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11864: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11865:
11866: IF xla_accounting_cache_pkg.GetValueChar
11867: (p_source_code => 'LEDGER_CATEGORY_CODE'
11868: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
11871: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
11872: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
11873: )
11874: THEN
11875: xla_ae_lines_pkg.BflowUpgEntry
11876: (p_business_method_code => l_bflow_method_code
11877: ,p_business_class_code => l_bflow_class_code
11878: ,p_balance_type => l_balance_type_code);
11879: ELSE
11877: ,p_business_class_code => l_bflow_class_code
11878: ,p_balance_type => l_balance_type_code);
11879: ELSE
11880: NULL;
11881: XLA_AE_LINES_PKG.business_flow_validation(
11882: p_business_method_code => l_bflow_method_code
11883: ,p_business_class_code => l_bflow_class_code
11884: ,p_inherit_description_flag => l_inherit_desc_flag);
11885: END IF;
11924: xla_accounting_err_pkg.build_message
11925: (p_appli_s_name => 'XLA'
11926: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
11927: ,p_token_1 => 'LINE_NUMBER'
11928: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
11929: ,p_token_2 => 'LINE_TYPE_NAME'
11930: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
11931: l_component_type
11932: ,l_component_code
11960: --
11961: --
11962: ------------------------------------------------------------------------------------------------
11963: -- 4219869 Business Flow
11964: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
11965: -- Prior Entry. Currently, the following code is always generated.
11966: ------------------------------------------------------------------------------------------------
11967: -- No ValidateCurrentLine for business flow method of Prior Entry
11968:
11969: ------------------------------------------------------------------------------------
11970: -- 4219869 Business Flow
11971: -- Populated credit and debit amounts -- Need to generate this within IF
11972: ------------------------------------------------------------------------------------
11973: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
11974:
11975: ----------------------------------------------------------------------------------
11976: -- 4219869 Business Flow
11977: -- Update journal entry status -- Need to generate this within IF
12001: -- To allow MPA report to determine if it should generate report process
12002: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
12003: ------------------------------------------------------------------------------------------
12004:
12005: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
12006: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
12007: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
12008: -- call ADRs
12009: -- Bug 4922099
12002: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
12003: ------------------------------------------------------------------------------------------
12004:
12005: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
12006: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
12007: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
12008: -- call ADRs
12009: -- Bug 4922099
12010: --
12023:
12024: --
12025: -- Update the line information that should be overwritten
12026: --
12027: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12028: p_header_num => 1);
12029: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12030:
12031: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12025: -- Update the line information that should be overwritten
12026: --
12027: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12028: p_header_num => 1);
12029: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12030:
12031: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12032:
12033: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12027: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12028: p_header_num => 1);
12029: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12030:
12031: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12032:
12033: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12034: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
12035: END IF;
12030:
12031: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12032:
12033: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12034: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
12035: END IF;
12036:
12037: --
12038: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
12037: --
12038: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
12039: --
12040: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
12041: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
12042: ELSE
12043: ---------------------------------------------------------------------------------------------------
12044: -- 4262811a Switch Sign
12045: ---------------------------------------------------------------------------------------------------
12042: ELSE
12043: ---------------------------------------------------------------------------------------------------
12044: -- 4262811a Switch Sign
12045: ---------------------------------------------------------------------------------------------------
12046: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12047: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12048: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12049: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12050: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12043: ---------------------------------------------------------------------------------------------------
12044: -- 4262811a Switch Sign
12045: ---------------------------------------------------------------------------------------------------
12046: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12047: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12048: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12049: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12050: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12051: -- 5132302
12044: -- 4262811a Switch Sign
12045: ---------------------------------------------------------------------------------------------------
12046: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12047: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12048: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12049: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12050: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12051: -- 5132302
12052: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12045: ---------------------------------------------------------------------------------------------------
12046: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12047: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12048: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12049: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12050: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12051: -- 5132302
12052: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12053: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12046: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12047: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12048: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12049: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12050: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12051: -- 5132302
12052: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12053: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12054:
12048: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12049: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12050: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12051: -- 5132302
12052: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12053: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12054:
12055: END IF;
12056:
12049: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12050: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12051: -- 5132302
12052: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12053: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12054:
12055: END IF;
12056:
12057: -- 4955764
12054:
12055: END IF;
12056:
12057: -- 4955764
12058: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12059: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12060:
12061:
12062: XLA_AE_LINES_PKG.ValidateCurrentLine;
12058: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12059: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12060:
12061:
12062: XLA_AE_LINES_PKG.ValidateCurrentLine;
12063: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
12064:
12065: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
12066: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
12059: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12060:
12061:
12062: XLA_AE_LINES_PKG.ValidateCurrentLine;
12063: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
12064:
12065: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
12066: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
12067: ,p_balance_type_code => l_balance_type_code);
12207: --
12208: -- bulk performance
12209: --
12210: l_balance_type_code VARCHAR2(1);
12211: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
12212: l_log_module VARCHAR2(240);
12213:
12214: --
12215: -- Upgrade strategy
12280: NVL(p_source_7,9E125) = 15
12281: THEN
12282:
12283: --
12284: XLA_AE_LINES_PKG.SetNewLine;
12285:
12286: p_balance_type_code := l_balance_type_code;
12287: -- set the flag so later we will know whether the gain loss line needs to be created
12288:
12292:
12293: --
12294: -- bulk performance
12295: --
12296: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
12297: p_header_num => 0); -- 4262811
12298: --
12299: -- set accounting line options
12300: --
12297: p_header_num => 0); -- 4262811
12298: --
12299: -- set accounting line options
12300: --
12301: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
12302: p_natural_side_code => 'C'
12303: , p_gain_or_loss_flag => 'N'
12304: , p_gl_transfer_mode_code => 'S'
12305: , p_acct_entry_type_code => 'E'
12311: --
12312: --
12313: -- set accounting line type info
12314: --
12315: xla_ae_lines_pkg.SetAcctLineType
12316: (p_component_type => l_component_type
12317: ,p_event_type_code => l_event_type_code
12318: ,p_line_definition_owner_code => l_line_definition_owner_code
12319: ,p_line_definition_code => l_line_definition_code
12325: ,p_event_class_code => l_event_class_code);
12326: --
12327: -- set accounting class
12328: --
12329: xla_ae_lines_pkg.SetAcctClass(
12330: p_accounting_class_code => 'REQUISITION'
12331: , p_ae_header_id => l_ae_header_id
12332: );
12333:
12333:
12334: --
12335: -- set rounding class
12336: --
12337: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
12338: 'REQUISITION';
12339:
12340: --
12341: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
12337: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
12338: 'REQUISITION';
12339:
12340: --
12341: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
12342: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
12343: --
12344: -- bulk performance
12345: --
12338: 'REQUISITION';
12339:
12340: --
12341: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
12342: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
12343: --
12344: -- bulk performance
12345: --
12346: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
12342: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
12343: --
12344: -- bulk performance
12345: --
12346: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
12347:
12348: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
12349: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
12350:
12344: -- bulk performance
12345: --
12346: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
12347:
12348: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
12349: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
12350:
12351: -- 4955764
12352: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12348: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
12349: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
12350:
12351: -- 4955764
12352: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12353: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
12354:
12355: -- 4458381 Public Sector Enh
12356:
12402: l_rec_acct_attrs.array_num_value(20) := p_source_40;
12403: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
12404: l_rec_acct_attrs.array_num_value(21) := p_source_40;
12405:
12406: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
12407: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
12408:
12409: ---------------------------------------------------------------------------------------------------------------
12410: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12403: l_rec_acct_attrs.array_acct_attr_code(21) := 'UPG_DR_ENC_TYPE_ID';
12404: l_rec_acct_attrs.array_num_value(21) := p_source_40;
12405:
12406: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
12407: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
12408:
12409: ---------------------------------------------------------------------------------------------------------------
12410: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12411: ---------------------------------------------------------------------------------------------------------------
12406: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
12407: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
12408:
12409: ---------------------------------------------------------------------------------------------------------------
12410: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12411: ---------------------------------------------------------------------------------------------------------------
12412: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12413:
12414: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12408:
12409: ---------------------------------------------------------------------------------------------------------------
12410: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12411: ---------------------------------------------------------------------------------------------------------------
12412: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12413:
12414: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12415: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12416:
12410: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12411: ---------------------------------------------------------------------------------------------------------------
12412: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12413:
12414: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12415: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12416:
12417: IF xla_accounting_cache_pkg.GetValueChar
12418: (p_source_code => 'LEDGER_CATEGORY_CODE'
12411: ---------------------------------------------------------------------------------------------------------------
12412: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12413:
12414: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12415: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12416:
12417: IF xla_accounting_cache_pkg.GetValueChar
12418: (p_source_code => 'LEDGER_CATEGORY_CODE'
12419: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
12422: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
12423: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
12424: )
12425: THEN
12426: xla_ae_lines_pkg.BflowUpgEntry
12427: (p_business_method_code => l_bflow_method_code
12428: ,p_business_class_code => l_bflow_class_code
12429: ,p_balance_type => l_balance_type_code);
12430: ELSE
12428: ,p_business_class_code => l_bflow_class_code
12429: ,p_balance_type => l_balance_type_code);
12430: ELSE
12431: NULL;
12432: XLA_AE_LINES_PKG.business_flow_validation(
12433: p_business_method_code => l_bflow_method_code
12434: ,p_business_class_code => l_bflow_class_code
12435: ,p_inherit_description_flag => l_inherit_desc_flag);
12436: END IF;
12475: xla_accounting_err_pkg.build_message
12476: (p_appli_s_name => 'XLA'
12477: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
12478: ,p_token_1 => 'LINE_NUMBER'
12479: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
12480: ,p_token_2 => 'LINE_TYPE_NAME'
12481: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
12482: l_component_type
12483: ,l_component_code
12511: --
12512: --
12513: ------------------------------------------------------------------------------------------------
12514: -- 4219869 Business Flow
12515: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
12516: -- Prior Entry. Currently, the following code is always generated.
12517: ------------------------------------------------------------------------------------------------
12518: -- No ValidateCurrentLine for business flow method of Prior Entry
12519:
12520: ------------------------------------------------------------------------------------
12521: -- 4219869 Business Flow
12522: -- Populated credit and debit amounts -- Need to generate this within IF
12523: ------------------------------------------------------------------------------------
12524: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
12525:
12526: ----------------------------------------------------------------------------------
12527: -- 4219869 Business Flow
12528: -- Update journal entry status -- Need to generate this within IF
12552: -- To allow MPA report to determine if it should generate report process
12553: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
12554: ------------------------------------------------------------------------------------------
12555:
12556: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
12557: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
12558: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
12559: -- call ADRs
12560: -- Bug 4922099
12553: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
12554: ------------------------------------------------------------------------------------------
12555:
12556: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
12557: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
12558: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
12559: -- call ADRs
12560: -- Bug 4922099
12561: --
12574:
12575: --
12576: -- Update the line information that should be overwritten
12577: --
12578: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12579: p_header_num => 1);
12580: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12581:
12582: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12576: -- Update the line information that should be overwritten
12577: --
12578: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12579: p_header_num => 1);
12580: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12581:
12582: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12583:
12584: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12578: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12579: p_header_num => 1);
12580: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12581:
12582: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12583:
12584: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12585: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
12586: END IF;
12581:
12582: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12583:
12584: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12585: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
12586: END IF;
12587:
12588: --
12589: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
12588: --
12589: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
12590: --
12591: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
12592: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
12593: ELSE
12594: ---------------------------------------------------------------------------------------------------
12595: -- 4262811a Switch Sign
12596: ---------------------------------------------------------------------------------------------------
12593: ELSE
12594: ---------------------------------------------------------------------------------------------------
12595: -- 4262811a Switch Sign
12596: ---------------------------------------------------------------------------------------------------
12597: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12598: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12599: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12600: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12601: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12594: ---------------------------------------------------------------------------------------------------
12595: -- 4262811a Switch Sign
12596: ---------------------------------------------------------------------------------------------------
12597: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12598: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12599: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12600: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12601: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12602: -- 5132302
12595: -- 4262811a Switch Sign
12596: ---------------------------------------------------------------------------------------------------
12597: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12598: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12599: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12600: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12601: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12602: -- 5132302
12603: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12596: ---------------------------------------------------------------------------------------------------
12597: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12598: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12599: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12600: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12601: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12602: -- 5132302
12603: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12604: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12597: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12598: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12599: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12600: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12601: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12602: -- 5132302
12603: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12604: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12605:
12599: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12600: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12601: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12602: -- 5132302
12603: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12604: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12605:
12606: END IF;
12607:
12600: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12601: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12602: -- 5132302
12603: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12604: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12605:
12606: END IF;
12607:
12608: -- 4955764
12605:
12606: END IF;
12607:
12608: -- 4955764
12609: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12610: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12611:
12612:
12613: XLA_AE_LINES_PKG.ValidateCurrentLine;
12609: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12610: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12611:
12612:
12613: XLA_AE_LINES_PKG.ValidateCurrentLine;
12614: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
12615:
12616: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
12617: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
12610: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12611:
12612:
12613: XLA_AE_LINES_PKG.ValidateCurrentLine;
12614: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
12615:
12616: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
12617: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
12618: ,p_balance_type_code => l_balance_type_code);
12744: --
12745: -- bulk performance
12746: --
12747: l_balance_type_code VARCHAR2(1);
12748: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
12749: l_log_module VARCHAR2(240);
12750:
12751: --
12752: -- Upgrade strategy
12811: IF NVL(p_source_7,9E125) = 15
12812: THEN
12813:
12814: --
12815: XLA_AE_LINES_PKG.SetNewLine;
12816:
12817: p_balance_type_code := l_balance_type_code;
12818: -- set the flag so later we will know whether the gain loss line needs to be created
12819:
12823:
12824: --
12825: -- bulk performance
12826: --
12827: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
12828: p_header_num => 0); -- 4262811
12829: --
12830: -- set accounting line options
12831: --
12828: p_header_num => 0); -- 4262811
12829: --
12830: -- set accounting line options
12831: --
12832: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
12833: p_natural_side_code => 'D'
12834: , p_gain_or_loss_flag => 'N'
12835: , p_gl_transfer_mode_code => 'S'
12836: , p_acct_entry_type_code => 'E'
12842: --
12843: --
12844: -- set accounting line type info
12845: --
12846: xla_ae_lines_pkg.SetAcctLineType
12847: (p_component_type => l_component_type
12848: ,p_event_type_code => l_event_type_code
12849: ,p_line_definition_owner_code => l_line_definition_owner_code
12850: ,p_line_definition_code => l_line_definition_code
12856: ,p_event_class_code => l_event_class_code);
12857: --
12858: -- set accounting class
12859: --
12860: xla_ae_lines_pkg.SetAcctClass(
12861: p_accounting_class_code => 'REQUISITION'
12862: , p_ae_header_id => l_ae_header_id
12863: );
12864:
12864:
12865: --
12866: -- set rounding class
12867: --
12868: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
12869: 'REQUISITION';
12870:
12871: --
12872: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
12868: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
12869: 'REQUISITION';
12870:
12871: --
12872: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
12873: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
12874: --
12875: -- bulk performance
12876: --
12869: 'REQUISITION';
12870:
12871: --
12872: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
12873: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
12874: --
12875: -- bulk performance
12876: --
12877: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
12873: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
12874: --
12875: -- bulk performance
12876: --
12877: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
12878:
12879: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
12880: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
12881:
12875: -- bulk performance
12876: --
12877: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
12878:
12879: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
12880: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
12881:
12882: -- 4955764
12883: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12879: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
12880: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
12881:
12882: -- 4955764
12883: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12884: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
12885:
12886: -- 4458381 Public Sector Enh
12887: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
12883: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12884: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
12885:
12886: -- 4458381 Public Sector Enh
12887: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
12888: --
12889: -- set accounting attributes for the line type
12890: --
12891: l_entered_amt_idx := 3;
12907: l_rec_acct_attrs.array_char_value(7) := p_source_14;
12908: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
12909: l_rec_acct_attrs.array_num_value(8) := p_source_15;
12910:
12911: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
12912: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
12913:
12914: ---------------------------------------------------------------------------------------------------------------
12915: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12908: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
12909: l_rec_acct_attrs.array_num_value(8) := p_source_15;
12910:
12911: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
12912: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
12913:
12914: ---------------------------------------------------------------------------------------------------------------
12915: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12916: ---------------------------------------------------------------------------------------------------------------
12911: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
12912: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
12913:
12914: ---------------------------------------------------------------------------------------------------------------
12915: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12916: ---------------------------------------------------------------------------------------------------------------
12917: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12918:
12919: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12913:
12914: ---------------------------------------------------------------------------------------------------------------
12915: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12916: ---------------------------------------------------------------------------------------------------------------
12917: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12918:
12919: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12920: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12921:
12915: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12916: ---------------------------------------------------------------------------------------------------------------
12917: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12918:
12919: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12920: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12921:
12922: IF xla_accounting_cache_pkg.GetValueChar
12923: (p_source_code => 'LEDGER_CATEGORY_CODE'
12916: ---------------------------------------------------------------------------------------------------------------
12917: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12918:
12919: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12920: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12921:
12922: IF xla_accounting_cache_pkg.GetValueChar
12923: (p_source_code => 'LEDGER_CATEGORY_CODE'
12924: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
12927: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
12928: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
12929: )
12930: THEN
12931: xla_ae_lines_pkg.BflowUpgEntry
12932: (p_business_method_code => l_bflow_method_code
12933: ,p_business_class_code => l_bflow_class_code
12934: ,p_balance_type => l_balance_type_code);
12935: ELSE
12967: , x_value_type_code => l_adr_value_type_code
12968: , p_side => 'NA'
12969: );
12970:
12971: xla_ae_lines_pkg.set_ccid(
12972: p_code_combination_id => l_ccid
12973: , p_value_type_code => l_adr_value_type_code
12974: , p_transaction_coa_id => l_adr_transaction_coa_id
12975: , p_accounting_coa_id => l_adr_accounting_coa_id
13003: xla_accounting_err_pkg.build_message
13004: (p_appli_s_name => 'XLA'
13005: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
13006: ,p_token_1 => 'LINE_NUMBER'
13007: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
13008: ,p_token_2 => 'LINE_TYPE_NAME'
13009: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
13010: l_component_type
13011: ,l_component_code
13039: --
13040: --
13041: ------------------------------------------------------------------------------------------------
13042: -- 4219869 Business Flow
13043: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
13044: -- Prior Entry. Currently, the following code is always generated.
13045: ------------------------------------------------------------------------------------------------
13046: XLA_AE_LINES_PKG.ValidateCurrentLine;
13047:
13042: -- 4219869 Business Flow
13043: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
13044: -- Prior Entry. Currently, the following code is always generated.
13045: ------------------------------------------------------------------------------------------------
13046: XLA_AE_LINES_PKG.ValidateCurrentLine;
13047:
13048: ------------------------------------------------------------------------------------
13049: -- 4219869 Business Flow
13050: -- Populated credit and debit amounts -- Need to generate this within IF
13048: ------------------------------------------------------------------------------------
13049: -- 4219869 Business Flow
13050: -- Populated credit and debit amounts -- Need to generate this within IF
13051: ------------------------------------------------------------------------------------
13052: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
13053:
13054: ----------------------------------------------------------------------------------
13055: -- 4219869 Business Flow
13056: -- Update journal entry status -- Need to generate this within IF
13080: -- To allow MPA report to determine if it should generate report process
13081: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
13082: ------------------------------------------------------------------------------------------
13083:
13084: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
13085: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
13086: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
13087: -- call ADRs
13088: -- Bug 4922099
13081: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
13082: ------------------------------------------------------------------------------------------
13083:
13084: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
13085: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
13086: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
13087: -- call ADRs
13088: -- Bug 4922099
13089: --
13105: , x_value_type_code => l_adr_value_type_code
13106: , p_side => 'NA'
13107: );
13108:
13109: xla_ae_lines_pkg.set_ccid(
13110: p_code_combination_id => l_ccid
13111: , p_value_type_code => l_adr_value_type_code
13112: , p_transaction_coa_id => l_adr_transaction_coa_id
13113: , p_accounting_coa_id => l_adr_accounting_coa_id
13128:
13129: --
13130: -- Update the line information that should be overwritten
13131: --
13132: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
13133: p_header_num => 1);
13134: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
13135:
13136: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
13130: -- Update the line information that should be overwritten
13131: --
13132: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
13133: p_header_num => 1);
13134: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
13135:
13136: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
13137:
13138: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
13132: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
13133: p_header_num => 1);
13134: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
13135:
13136: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
13137:
13138: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
13139: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
13140: END IF;
13135:
13136: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
13137:
13138: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
13139: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
13140: END IF;
13141:
13142: --
13143: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
13142: --
13143: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
13144: --
13145: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
13146: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
13147: ELSE
13148: ---------------------------------------------------------------------------------------------------
13149: -- 4262811a Switch Sign
13150: ---------------------------------------------------------------------------------------------------
13147: ELSE
13148: ---------------------------------------------------------------------------------------------------
13149: -- 4262811a Switch Sign
13150: ---------------------------------------------------------------------------------------------------
13151: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13152: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13153: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13154: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13155: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13148: ---------------------------------------------------------------------------------------------------
13149: -- 4262811a Switch Sign
13150: ---------------------------------------------------------------------------------------------------
13151: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13152: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13153: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13154: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13155: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13156: -- 5132302
13149: -- 4262811a Switch Sign
13150: ---------------------------------------------------------------------------------------------------
13151: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13152: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13153: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13154: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13155: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13156: -- 5132302
13157: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13150: ---------------------------------------------------------------------------------------------------
13151: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13152: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13153: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13154: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13155: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13156: -- 5132302
13157: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13158: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13151: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13152: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13153: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13154: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13155: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13156: -- 5132302
13157: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13158: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13159:
13153: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13154: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13155: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13156: -- 5132302
13157: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13158: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13159:
13160: END IF;
13161:
13154: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13155: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13156: -- 5132302
13157: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13158: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13159:
13160: END IF;
13161:
13162: -- 4955764
13159:
13160: END IF;
13161:
13162: -- 4955764
13163: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13164: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
13165:
13166:
13167: XLA_AE_LINES_PKG.ValidateCurrentLine;
13163: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13164: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
13165:
13166:
13167: XLA_AE_LINES_PKG.ValidateCurrentLine;
13168: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
13169:
13170: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
13171: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
13164: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
13165:
13166:
13167: XLA_AE_LINES_PKG.ValidateCurrentLine;
13168: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
13169:
13170: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
13171: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
13172: ,p_balance_type_code => l_balance_type_code);
13298: --
13299: -- bulk performance
13300: --
13301: l_balance_type_code VARCHAR2(1);
13302: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
13303: l_log_module VARCHAR2(240);
13304:
13305: --
13306: -- Upgrade strategy
13365: IF NVL(p_source_7,9E125) = 15
13366: THEN
13367:
13368: --
13369: XLA_AE_LINES_PKG.SetNewLine;
13370:
13371: p_balance_type_code := l_balance_type_code;
13372: -- set the flag so later we will know whether the gain loss line needs to be created
13373:
13377:
13378: --
13379: -- bulk performance
13380: --
13381: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
13382: p_header_num => 0); -- 4262811
13383: --
13384: -- set accounting line options
13385: --
13382: p_header_num => 0); -- 4262811
13383: --
13384: -- set accounting line options
13385: --
13386: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
13387: p_natural_side_code => 'D'
13388: , p_gain_or_loss_flag => 'N'
13389: , p_gl_transfer_mode_code => 'S'
13390: , p_acct_entry_type_code => 'E'
13396: --
13397: --
13398: -- set accounting line type info
13399: --
13400: xla_ae_lines_pkg.SetAcctLineType
13401: (p_component_type => l_component_type
13402: ,p_event_type_code => l_event_type_code
13403: ,p_line_definition_owner_code => l_line_definition_owner_code
13404: ,p_line_definition_code => l_line_definition_code
13410: ,p_event_class_code => l_event_class_code);
13411: --
13412: -- set accounting class
13413: --
13414: xla_ae_lines_pkg.SetAcctClass(
13415: p_accounting_class_code => 'REQUISITION'
13416: , p_ae_header_id => l_ae_header_id
13417: );
13418:
13418:
13419: --
13420: -- set rounding class
13421: --
13422: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
13423: 'REQUISITION';
13424:
13425: --
13426: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
13422: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
13423: 'REQUISITION';
13424:
13425: --
13426: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
13427: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
13428: --
13429: -- bulk performance
13430: --
13423: 'REQUISITION';
13424:
13425: --
13426: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
13427: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
13428: --
13429: -- bulk performance
13430: --
13431: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
13427: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
13428: --
13429: -- bulk performance
13430: --
13431: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
13432:
13433: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
13434: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
13435:
13429: -- bulk performance
13430: --
13431: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
13432:
13433: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
13434: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
13435:
13436: -- 4955764
13437: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13433: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
13434: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
13435:
13436: -- 4955764
13437: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13438: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
13439:
13440: -- 4458381 Public Sector Enh
13441: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
13437: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13438: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
13439:
13440: -- 4458381 Public Sector Enh
13441: XLA_AE_LINES_PKG.g_rec_lines.array_encumbrance_type_id(XLA_AE_LINES_PKG.g_LineNumber) := 1000;
13442: --
13443: -- set accounting attributes for the line type
13444: --
13445: l_entered_amt_idx := 3;
13461: l_rec_acct_attrs.array_char_value(7) := p_source_14;
13462: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
13463: l_rec_acct_attrs.array_num_value(8) := p_source_15;
13464:
13465: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
13466: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
13467:
13468: ---------------------------------------------------------------------------------------------------------------
13469: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13462: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
13463: l_rec_acct_attrs.array_num_value(8) := p_source_15;
13464:
13465: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
13466: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
13467:
13468: ---------------------------------------------------------------------------------------------------------------
13469: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13470: ---------------------------------------------------------------------------------------------------------------
13465: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
13466: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
13467:
13468: ---------------------------------------------------------------------------------------------------------------
13469: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13470: ---------------------------------------------------------------------------------------------------------------
13471: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13472:
13473: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13467:
13468: ---------------------------------------------------------------------------------------------------------------
13469: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13470: ---------------------------------------------------------------------------------------------------------------
13471: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13472:
13473: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13474: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13475:
13469: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13470: ---------------------------------------------------------------------------------------------------------------
13471: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13472:
13473: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13474: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13475:
13476: IF xla_accounting_cache_pkg.GetValueChar
13477: (p_source_code => 'LEDGER_CATEGORY_CODE'
13470: ---------------------------------------------------------------------------------------------------------------
13471: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13472:
13473: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13474: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13475:
13476: IF xla_accounting_cache_pkg.GetValueChar
13477: (p_source_code => 'LEDGER_CATEGORY_CODE'
13478: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
13481: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
13482: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
13483: )
13484: THEN
13485: xla_ae_lines_pkg.BflowUpgEntry
13486: (p_business_method_code => l_bflow_method_code
13487: ,p_business_class_code => l_bflow_class_code
13488: ,p_balance_type => l_balance_type_code);
13489: ELSE
13521: , x_value_type_code => l_adr_value_type_code
13522: , p_side => 'NA'
13523: );
13524:
13525: xla_ae_lines_pkg.set_ccid(
13526: p_code_combination_id => l_ccid
13527: , p_value_type_code => l_adr_value_type_code
13528: , p_transaction_coa_id => l_adr_transaction_coa_id
13529: , p_accounting_coa_id => l_adr_accounting_coa_id
13557: xla_accounting_err_pkg.build_message
13558: (p_appli_s_name => 'XLA'
13559: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
13560: ,p_token_1 => 'LINE_NUMBER'
13561: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
13562: ,p_token_2 => 'LINE_TYPE_NAME'
13563: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
13564: l_component_type
13565: ,l_component_code
13593: --
13594: --
13595: ------------------------------------------------------------------------------------------------
13596: -- 4219869 Business Flow
13597: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
13598: -- Prior Entry. Currently, the following code is always generated.
13599: ------------------------------------------------------------------------------------------------
13600: XLA_AE_LINES_PKG.ValidateCurrentLine;
13601:
13596: -- 4219869 Business Flow
13597: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
13598: -- Prior Entry. Currently, the following code is always generated.
13599: ------------------------------------------------------------------------------------------------
13600: XLA_AE_LINES_PKG.ValidateCurrentLine;
13601:
13602: ------------------------------------------------------------------------------------
13603: -- 4219869 Business Flow
13604: -- Populated credit and debit amounts -- Need to generate this within IF
13602: ------------------------------------------------------------------------------------
13603: -- 4219869 Business Flow
13604: -- Populated credit and debit amounts -- Need to generate this within IF
13605: ------------------------------------------------------------------------------------
13606: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
13607:
13608: ----------------------------------------------------------------------------------
13609: -- 4219869 Business Flow
13610: -- Update journal entry status -- Need to generate this within IF
13634: -- To allow MPA report to determine if it should generate report process
13635: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
13636: ------------------------------------------------------------------------------------------
13637:
13638: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
13639: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
13640: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
13641: -- call ADRs
13642: -- Bug 4922099
13635: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
13636: ------------------------------------------------------------------------------------------
13637:
13638: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
13639: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
13640: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
13641: -- call ADRs
13642: -- Bug 4922099
13643: --
13659: , x_value_type_code => l_adr_value_type_code
13660: , p_side => 'NA'
13661: );
13662:
13663: xla_ae_lines_pkg.set_ccid(
13664: p_code_combination_id => l_ccid
13665: , p_value_type_code => l_adr_value_type_code
13666: , p_transaction_coa_id => l_adr_transaction_coa_id
13667: , p_accounting_coa_id => l_adr_accounting_coa_id
13682:
13683: --
13684: -- Update the line information that should be overwritten
13685: --
13686: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
13687: p_header_num => 1);
13688: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
13689:
13690: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
13684: -- Update the line information that should be overwritten
13685: --
13686: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
13687: p_header_num => 1);
13688: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
13689:
13690: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
13691:
13692: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
13686: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
13687: p_header_num => 1);
13688: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
13689:
13690: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
13691:
13692: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
13693: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
13694: END IF;
13689:
13690: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
13691:
13692: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
13693: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
13694: END IF;
13695:
13696: --
13697: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
13696: --
13697: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
13698: --
13699: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
13700: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
13701: ELSE
13702: ---------------------------------------------------------------------------------------------------
13703: -- 4262811a Switch Sign
13704: ---------------------------------------------------------------------------------------------------
13701: ELSE
13702: ---------------------------------------------------------------------------------------------------
13703: -- 4262811a Switch Sign
13704: ---------------------------------------------------------------------------------------------------
13705: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13706: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13707: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13708: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13709: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13702: ---------------------------------------------------------------------------------------------------
13703: -- 4262811a Switch Sign
13704: ---------------------------------------------------------------------------------------------------
13705: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13706: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13707: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13708: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13709: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13710: -- 5132302
13703: -- 4262811a Switch Sign
13704: ---------------------------------------------------------------------------------------------------
13705: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13706: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13707: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13708: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13709: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13710: -- 5132302
13711: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13704: ---------------------------------------------------------------------------------------------------
13705: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13706: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13707: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13708: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13709: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13710: -- 5132302
13711: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13712: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13705: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13706: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13707: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13708: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13709: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13710: -- 5132302
13711: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13712: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13713:
13707: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13708: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13709: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13710: -- 5132302
13711: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13712: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13713:
13714: END IF;
13715:
13708: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13709: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13710: -- 5132302
13711: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13712: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13713:
13714: END IF;
13715:
13716: -- 4955764
13713:
13714: END IF;
13715:
13716: -- 4955764
13717: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13718: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
13719:
13720:
13721: XLA_AE_LINES_PKG.ValidateCurrentLine;
13717: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13718: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
13719:
13720:
13721: XLA_AE_LINES_PKG.ValidateCurrentLine;
13722: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
13723:
13724: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
13725: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
13718: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
13719:
13720:
13721: XLA_AE_LINES_PKG.ValidateCurrentLine;
13722: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
13723:
13724: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
13725: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
13726: ,p_balance_type_code => l_balance_type_code);
14180: l_first_event_id NUMBER;
14181: l_last_event_id NUMBER;
14182:
14183: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
14184: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
14185: --
14186: --
14187: l_result BOOLEAN := TRUE;
14188: l_rows NUMBER := 1000;
14466: EXIT WHEN l_array_entity_id.COUNT = 0;
14467:
14468: -- initialize arrays
14469: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
14470: XLA_AE_LINES_PKG.g_rec_lines := NULL;
14471:
14472: --
14473: -- Bug 4458708
14474: --
14471:
14472: --
14473: -- Bug 4458708
14474: --
14475: XLA_AE_LINES_PKG.g_LineNumber := 0;
14476:
14477:
14478: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
14479: g_last_hdr_idx := l_array_event_id.LAST;
14622: --
14623: -- following sets the accounting attributes needed to reverse
14624: -- accounting for a distributeion
14625: --
14626: xla_ae_lines_pkg.SetTrxReversalAttrs
14627: (p_event_id => l_event_id
14628: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
14629: ,p_trx_reversal_source => l_trx_reversal_source);
14630:
14654: --
14655: -- insert dummy rows into lines gt table that were created due to
14656: -- transaction reversals
14657: --
14658: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
14659: l_result := XLA_AE_LINES_PKG.InsertLines;
14660: END IF;
14661:
14662: --
14655: -- insert dummy rows into lines gt table that were created due to
14656: -- transaction reversals
14657: --
14658: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
14659: l_result := XLA_AE_LINES_PKG.InsertLines;
14660: END IF;
14661:
14662: --
14663: -- reset the temp_line_num for each set of events fetched from header
14663: -- reset the temp_line_num for each set of events fetched from header
14664: -- cursor rather than doing it for each new event in line cursor
14665: -- Bug 3939231
14666: --
14667: xla_ae_lines_pkg.g_temp_line_num := 0;
14668:
14669:
14670:
14671: --
14723: END IF;
14724: --
14725: EXIT WHEN l_array_entity_id.count = 0;
14726:
14727: XLA_AE_LINES_PKG.g_rec_lines := null;
14728:
14729: --
14730: -- Bug 4458708
14731: --
14728:
14729: --
14730: -- Bug 4458708
14731: --
14732: XLA_AE_LINES_PKG.g_LineNumber := 0;
14733: --
14734: --
14735:
14736: FOR Idx IN 1..l_array_event_id.count LOOP
14800:
14801:
14802:
14803: --
14804: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
14805:
14806: l_acct_reversal_source := SUBSTR(NULL, 1,30);
14807:
14808: IF l_continue_with_lines THEN
14836: --
14837:
14838: -- No reversal code generated
14839:
14840: xla_ae_lines_pkg.SetAcctReversalAttrs
14841: (p_event_id => l_event_id
14842: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
14843: ,p_calculate_acctd_flag => l_calculate_acctd_flag
14844: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
14923:
14924: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
14925: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
14926: AND (l_actual_flag = 'A')) THEN
14927: XLA_AE_LINES_PKG.CreateGainOrLossLines(
14928: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
14929: ,p_application_id => p_application_id
14930: ,p_amb_context_code => 'DEFAULT'
14931: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
14956: END IF;
14957: END IF;
14958:
14959: END LOOP;
14960: l_result := XLA_AE_LINES_PKG.InsertLines ;
14961: end loop;
14962: close line_cur;
14963:
14964:
15503: l_first_event_id NUMBER;
15504: l_last_event_id NUMBER;
15505:
15506: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
15507: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
15508: --
15509: --
15510: l_result BOOLEAN := TRUE;
15511: l_rows NUMBER := 1000;
15812: EXIT WHEN l_array_entity_id.COUNT = 0;
15813:
15814: -- initialize arrays
15815: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
15816: XLA_AE_LINES_PKG.g_rec_lines := NULL;
15817:
15818: --
15819: -- Bug 4458708
15820: --
15817:
15818: --
15819: -- Bug 4458708
15820: --
15821: XLA_AE_LINES_PKG.g_LineNumber := 0;
15822:
15823:
15824: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
15825: g_last_hdr_idx := l_array_event_id.LAST;
15986: --
15987: -- following sets the accounting attributes needed to reverse
15988: -- accounting for a distributeion
15989: --
15990: xla_ae_lines_pkg.SetTrxReversalAttrs
15991: (p_event_id => l_event_id
15992: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
15993: ,p_trx_reversal_source => l_trx_reversal_source);
15994:
16018: --
16019: -- insert dummy rows into lines gt table that were created due to
16020: -- transaction reversals
16021: --
16022: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
16023: l_result := XLA_AE_LINES_PKG.InsertLines;
16024: END IF;
16025:
16026: --
16019: -- insert dummy rows into lines gt table that were created due to
16020: -- transaction reversals
16021: --
16022: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
16023: l_result := XLA_AE_LINES_PKG.InsertLines;
16024: END IF;
16025:
16026: --
16027: -- reset the temp_line_num for each set of events fetched from header
16027: -- reset the temp_line_num for each set of events fetched from header
16028: -- cursor rather than doing it for each new event in line cursor
16029: -- Bug 3939231
16030: --
16031: xla_ae_lines_pkg.g_temp_line_num := 0;
16032:
16033:
16034:
16035: --
16087: END IF;
16088: --
16089: EXIT WHEN l_array_entity_id.count = 0;
16090:
16091: XLA_AE_LINES_PKG.g_rec_lines := null;
16092:
16093: --
16094: -- Bug 4458708
16095: --
16092:
16093: --
16094: -- Bug 4458708
16095: --
16096: XLA_AE_LINES_PKG.g_LineNumber := 0;
16097: --
16098: --
16099:
16100: FOR Idx IN 1..l_array_event_id.count LOOP
16164:
16165:
16166:
16167: --
16168: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
16169:
16170: l_acct_reversal_source := SUBSTR(NULL, 1,30);
16171:
16172: IF l_continue_with_lines THEN
16200: --
16201:
16202: -- No reversal code generated
16203:
16204: xla_ae_lines_pkg.SetAcctReversalAttrs
16205: (p_event_id => l_event_id
16206: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
16207: ,p_calculate_acctd_flag => l_calculate_acctd_flag
16208: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
16253:
16254: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
16255: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
16256: AND (l_actual_flag = 'A')) THEN
16257: XLA_AE_LINES_PKG.CreateGainOrLossLines(
16258: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
16259: ,p_application_id => p_application_id
16260: ,p_amb_context_code => 'DEFAULT'
16261: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
16286: END IF;
16287: END IF;
16288:
16289: END LOOP;
16290: l_result := XLA_AE_LINES_PKG.InsertLines ;
16291: end loop;
16292: close line_cur;
16293:
16294:
16798: l_first_event_id NUMBER;
16799: l_last_event_id NUMBER;
16800:
16801: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
16802: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
16803: --
16804: --
16805: l_result BOOLEAN := TRUE;
16806: l_rows NUMBER := 1000;
17073: EXIT WHEN l_array_entity_id.COUNT = 0;
17074:
17075: -- initialize arrays
17076: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
17077: XLA_AE_LINES_PKG.g_rec_lines := NULL;
17078:
17079: --
17080: -- Bug 4458708
17081: --
17078:
17079: --
17080: -- Bug 4458708
17081: --
17082: XLA_AE_LINES_PKG.g_LineNumber := 0;
17083:
17084:
17085: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
17086: g_last_hdr_idx := l_array_event_id.LAST;
17232: --
17233: -- following sets the accounting attributes needed to reverse
17234: -- accounting for a distributeion
17235: --
17236: xla_ae_lines_pkg.SetTrxReversalAttrs
17237: (p_event_id => l_event_id
17238: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
17239: ,p_trx_reversal_source => l_trx_reversal_source);
17240:
17264: --
17265: -- insert dummy rows into lines gt table that were created due to
17266: -- transaction reversals
17267: --
17268: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
17269: l_result := XLA_AE_LINES_PKG.InsertLines;
17270: END IF;
17271:
17272: --
17265: -- insert dummy rows into lines gt table that were created due to
17266: -- transaction reversals
17267: --
17268: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
17269: l_result := XLA_AE_LINES_PKG.InsertLines;
17270: END IF;
17271:
17272: --
17273: -- reset the temp_line_num for each set of events fetched from header
17273: -- reset the temp_line_num for each set of events fetched from header
17274: -- cursor rather than doing it for each new event in line cursor
17275: -- Bug 3939231
17276: --
17277: xla_ae_lines_pkg.g_temp_line_num := 0;
17278:
17279:
17280:
17281: --
17340: END IF;
17341: --
17342: EXIT WHEN l_array_entity_id.count = 0;
17343:
17344: XLA_AE_LINES_PKG.g_rec_lines := null;
17345:
17346: --
17347: -- Bug 4458708
17348: --
17345:
17346: --
17347: -- Bug 4458708
17348: --
17349: XLA_AE_LINES_PKG.g_LineNumber := 0;
17350: --
17351: --
17352:
17353: FOR Idx IN 1..l_array_event_id.count LOOP
17417:
17418:
17419:
17420: --
17421: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
17422:
17423: l_acct_reversal_source := SUBSTR(NULL, 1,30);
17424:
17425: IF l_continue_with_lines THEN
17453: --
17454:
17455: -- No reversal code generated
17456:
17457: xla_ae_lines_pkg.SetAcctReversalAttrs
17458: (p_event_id => l_event_id
17459: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
17460: ,p_calculate_acctd_flag => l_calculate_acctd_flag
17461: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
17500:
17501: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
17502: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
17503: AND (l_actual_flag = 'A')) THEN
17504: XLA_AE_LINES_PKG.CreateGainOrLossLines(
17505: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
17506: ,p_application_id => p_application_id
17507: ,p_amb_context_code => 'DEFAULT'
17508: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
17533: END IF;
17534: END IF;
17535:
17536: END LOOP;
17537: l_result := XLA_AE_LINES_PKG.InsertLines ;
17538: end loop;
17539: close line_cur;
17540:
17541:
18045: l_first_event_id NUMBER;
18046: l_last_event_id NUMBER;
18047:
18048: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
18049: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
18050: --
18051: --
18052: l_result BOOLEAN := TRUE;
18053: l_rows NUMBER := 1000;
18320: EXIT WHEN l_array_entity_id.COUNT = 0;
18321:
18322: -- initialize arrays
18323: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
18324: XLA_AE_LINES_PKG.g_rec_lines := NULL;
18325:
18326: --
18327: -- Bug 4458708
18328: --
18325:
18326: --
18327: -- Bug 4458708
18328: --
18329: XLA_AE_LINES_PKG.g_LineNumber := 0;
18330:
18331:
18332: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
18333: g_last_hdr_idx := l_array_event_id.LAST;
18479: --
18480: -- following sets the accounting attributes needed to reverse
18481: -- accounting for a distributeion
18482: --
18483: xla_ae_lines_pkg.SetTrxReversalAttrs
18484: (p_event_id => l_event_id
18485: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
18486: ,p_trx_reversal_source => l_trx_reversal_source);
18487:
18511: --
18512: -- insert dummy rows into lines gt table that were created due to
18513: -- transaction reversals
18514: --
18515: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
18516: l_result := XLA_AE_LINES_PKG.InsertLines;
18517: END IF;
18518:
18519: --
18512: -- insert dummy rows into lines gt table that were created due to
18513: -- transaction reversals
18514: --
18515: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
18516: l_result := XLA_AE_LINES_PKG.InsertLines;
18517: END IF;
18518:
18519: --
18520: -- reset the temp_line_num for each set of events fetched from header
18520: -- reset the temp_line_num for each set of events fetched from header
18521: -- cursor rather than doing it for each new event in line cursor
18522: -- Bug 3939231
18523: --
18524: xla_ae_lines_pkg.g_temp_line_num := 0;
18525:
18526:
18527:
18528: --
18587: END IF;
18588: --
18589: EXIT WHEN l_array_entity_id.count = 0;
18590:
18591: XLA_AE_LINES_PKG.g_rec_lines := null;
18592:
18593: --
18594: -- Bug 4458708
18595: --
18592:
18593: --
18594: -- Bug 4458708
18595: --
18596: XLA_AE_LINES_PKG.g_LineNumber := 0;
18597: --
18598: --
18599:
18600: FOR Idx IN 1..l_array_event_id.count LOOP
18664:
18665:
18666:
18667: --
18668: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
18669:
18670: l_acct_reversal_source := SUBSTR(NULL, 1,30);
18671:
18672: IF l_continue_with_lines THEN
18700: --
18701:
18702: -- No reversal code generated
18703:
18704: xla_ae_lines_pkg.SetAcctReversalAttrs
18705: (p_event_id => l_event_id
18706: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
18707: ,p_calculate_acctd_flag => l_calculate_acctd_flag
18708: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
18747:
18748: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
18749: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
18750: AND (l_actual_flag = 'A')) THEN
18751: XLA_AE_LINES_PKG.CreateGainOrLossLines(
18752: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
18753: ,p_application_id => p_application_id
18754: ,p_amb_context_code => 'DEFAULT'
18755: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
18780: END IF;
18781: END IF;
18782:
18783: END LOOP;
18784: l_result := XLA_AE_LINES_PKG.InsertLines ;
18785: end loop;
18786: close line_cur;
18787:
18788:
19331: l_first_event_id NUMBER;
19332: l_last_event_id NUMBER;
19333:
19334: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
19335: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
19336: --
19337: --
19338: l_result BOOLEAN := TRUE;
19339: l_rows NUMBER := 1000;
19644: EXIT WHEN l_array_entity_id.COUNT = 0;
19645:
19646: -- initialize arrays
19647: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
19648: XLA_AE_LINES_PKG.g_rec_lines := NULL;
19649:
19650: --
19651: -- Bug 4458708
19652: --
19649:
19650: --
19651: -- Bug 4458708
19652: --
19653: XLA_AE_LINES_PKG.g_LineNumber := 0;
19654:
19655:
19656: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
19657: g_last_hdr_idx := l_array_event_id.LAST;
19818: --
19819: -- following sets the accounting attributes needed to reverse
19820: -- accounting for a distributeion
19821: --
19822: xla_ae_lines_pkg.SetTrxReversalAttrs
19823: (p_event_id => l_event_id
19824: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
19825: ,p_trx_reversal_source => l_trx_reversal_source);
19826:
19850: --
19851: -- insert dummy rows into lines gt table that were created due to
19852: -- transaction reversals
19853: --
19854: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
19855: l_result := XLA_AE_LINES_PKG.InsertLines;
19856: END IF;
19857:
19858: --
19851: -- insert dummy rows into lines gt table that were created due to
19852: -- transaction reversals
19853: --
19854: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
19855: l_result := XLA_AE_LINES_PKG.InsertLines;
19856: END IF;
19857:
19858: --
19859: -- reset the temp_line_num for each set of events fetched from header
19859: -- reset the temp_line_num for each set of events fetched from header
19860: -- cursor rather than doing it for each new event in line cursor
19861: -- Bug 3939231
19862: --
19863: xla_ae_lines_pkg.g_temp_line_num := 0;
19864:
19865:
19866:
19867: --
19920: END IF;
19921: --
19922: EXIT WHEN l_array_entity_id.count = 0;
19923:
19924: XLA_AE_LINES_PKG.g_rec_lines := null;
19925:
19926: --
19927: -- Bug 4458708
19928: --
19925:
19926: --
19927: -- Bug 4458708
19928: --
19929: XLA_AE_LINES_PKG.g_LineNumber := 0;
19930: --
19931: --
19932:
19933: FOR Idx IN 1..l_array_event_id.count LOOP
19997:
19998:
19999:
20000: --
20001: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
20002:
20003: l_acct_reversal_source := SUBSTR(NULL, 1,30);
20004:
20005: IF l_continue_with_lines THEN
20033: --
20034:
20035: -- No reversal code generated
20036:
20037: xla_ae_lines_pkg.SetAcctReversalAttrs
20038: (p_event_id => l_event_id
20039: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
20040: ,p_calculate_acctd_flag => l_calculate_acctd_flag
20041: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
20087:
20088: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
20089: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
20090: AND (l_actual_flag = 'A')) THEN
20091: XLA_AE_LINES_PKG.CreateGainOrLossLines(
20092: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
20093: ,p_application_id => p_application_id
20094: ,p_amb_context_code => 'DEFAULT'
20095: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
20120: END IF;
20121: END IF;
20122:
20123: END LOOP;
20124: l_result := XLA_AE_LINES_PKG.InsertLines ;
20125: end loop;
20126: close line_cur;
20127:
20128:
20671: l_first_event_id NUMBER;
20672: l_last_event_id NUMBER;
20673:
20674: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
20675: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
20676: --
20677: --
20678: l_result BOOLEAN := TRUE;
20679: l_rows NUMBER := 1000;
20984: EXIT WHEN l_array_entity_id.COUNT = 0;
20985:
20986: -- initialize arrays
20987: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
20988: XLA_AE_LINES_PKG.g_rec_lines := NULL;
20989:
20990: --
20991: -- Bug 4458708
20992: --
20989:
20990: --
20991: -- Bug 4458708
20992: --
20993: XLA_AE_LINES_PKG.g_LineNumber := 0;
20994:
20995:
20996: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
20997: g_last_hdr_idx := l_array_event_id.LAST;
21158: --
21159: -- following sets the accounting attributes needed to reverse
21160: -- accounting for a distributeion
21161: --
21162: xla_ae_lines_pkg.SetTrxReversalAttrs
21163: (p_event_id => l_event_id
21164: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
21165: ,p_trx_reversal_source => l_trx_reversal_source);
21166:
21190: --
21191: -- insert dummy rows into lines gt table that were created due to
21192: -- transaction reversals
21193: --
21194: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
21195: l_result := XLA_AE_LINES_PKG.InsertLines;
21196: END IF;
21197:
21198: --
21191: -- insert dummy rows into lines gt table that were created due to
21192: -- transaction reversals
21193: --
21194: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
21195: l_result := XLA_AE_LINES_PKG.InsertLines;
21196: END IF;
21197:
21198: --
21199: -- reset the temp_line_num for each set of events fetched from header
21199: -- reset the temp_line_num for each set of events fetched from header
21200: -- cursor rather than doing it for each new event in line cursor
21201: -- Bug 3939231
21202: --
21203: xla_ae_lines_pkg.g_temp_line_num := 0;
21204:
21205:
21206:
21207: --
21260: END IF;
21261: --
21262: EXIT WHEN l_array_entity_id.count = 0;
21263:
21264: XLA_AE_LINES_PKG.g_rec_lines := null;
21265:
21266: --
21267: -- Bug 4458708
21268: --
21265:
21266: --
21267: -- Bug 4458708
21268: --
21269: XLA_AE_LINES_PKG.g_LineNumber := 0;
21270: --
21271: --
21272:
21273: FOR Idx IN 1..l_array_event_id.count LOOP
21337:
21338:
21339:
21340: --
21341: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
21342:
21343: l_acct_reversal_source := SUBSTR(NULL, 1,30);
21344:
21345: IF l_continue_with_lines THEN
21373: --
21374:
21375: -- No reversal code generated
21376:
21377: xla_ae_lines_pkg.SetAcctReversalAttrs
21378: (p_event_id => l_event_id
21379: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
21380: ,p_calculate_acctd_flag => l_calculate_acctd_flag
21381: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
21427:
21428: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
21429: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
21430: AND (l_actual_flag = 'A')) THEN
21431: XLA_AE_LINES_PKG.CreateGainOrLossLines(
21432: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
21433: ,p_application_id => p_application_id
21434: ,p_amb_context_code => 'DEFAULT'
21435: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
21460: END IF;
21461: END IF;
21462:
21463: END LOOP;
21464: l_result := XLA_AE_LINES_PKG.InsertLines ;
21465: end loop;
21466: close line_cur;
21467:
21468:
21944: l_first_event_id NUMBER;
21945: l_last_event_id NUMBER;
21946:
21947: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
21948: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
21949: --
21950: --
21951: l_result BOOLEAN := TRUE;
21952: l_rows NUMBER := 1000;
22196: EXIT WHEN l_array_entity_id.COUNT = 0;
22197:
22198: -- initialize arrays
22199: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
22200: XLA_AE_LINES_PKG.g_rec_lines := NULL;
22201:
22202: --
22203: -- Bug 4458708
22204: --
22201:
22202: --
22203: -- Bug 4458708
22204: --
22205: XLA_AE_LINES_PKG.g_LineNumber := 0;
22206:
22207:
22208: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
22209: g_last_hdr_idx := l_array_event_id.LAST;
22337: --
22338: -- following sets the accounting attributes needed to reverse
22339: -- accounting for a distributeion
22340: --
22341: xla_ae_lines_pkg.SetTrxReversalAttrs
22342: (p_event_id => l_event_id
22343: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
22344: ,p_trx_reversal_source => l_trx_reversal_source);
22345:
22369: --
22370: -- insert dummy rows into lines gt table that were created due to
22371: -- transaction reversals
22372: --
22373: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
22374: l_result := XLA_AE_LINES_PKG.InsertLines;
22375: END IF;
22376:
22377: --
22370: -- insert dummy rows into lines gt table that were created due to
22371: -- transaction reversals
22372: --
22373: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
22374: l_result := XLA_AE_LINES_PKG.InsertLines;
22375: END IF;
22376:
22377: --
22378: -- reset the temp_line_num for each set of events fetched from header
22378: -- reset the temp_line_num for each set of events fetched from header
22379: -- cursor rather than doing it for each new event in line cursor
22380: -- Bug 3939231
22381: --
22382: xla_ae_lines_pkg.g_temp_line_num := 0;
22383:
22384:
22385:
22386: --
22445: END IF;
22446: --
22447: EXIT WHEN l_array_entity_id.count = 0;
22448:
22449: XLA_AE_LINES_PKG.g_rec_lines := null;
22450:
22451: --
22452: -- Bug 4458708
22453: --
22450:
22451: --
22452: -- Bug 4458708
22453: --
22454: XLA_AE_LINES_PKG.g_LineNumber := 0;
22455: --
22456: --
22457:
22458: FOR Idx IN 1..l_array_event_id.count LOOP
22522:
22523:
22524:
22525: --
22526: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
22527:
22528: l_acct_reversal_source := SUBSTR(NULL, 1,30);
22529:
22530: IF l_continue_with_lines THEN
22558: --
22559:
22560: -- No reversal code generated
22561:
22562: xla_ae_lines_pkg.SetAcctReversalAttrs
22563: (p_event_id => l_event_id
22564: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
22565: ,p_calculate_acctd_flag => l_calculate_acctd_flag
22566: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
22605:
22606: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
22607: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
22608: AND (l_actual_flag = 'A')) THEN
22609: XLA_AE_LINES_PKG.CreateGainOrLossLines(
22610: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
22611: ,p_application_id => p_application_id
22612: ,p_amb_context_code => 'DEFAULT'
22613: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
22638: END IF;
22639: END IF;
22640:
22641: END LOOP;
22642: l_result := XLA_AE_LINES_PKG.InsertLines ;
22643: end loop;
22644: close line_cur;
22645:
22646:
23122: l_first_event_id NUMBER;
23123: l_last_event_id NUMBER;
23124:
23125: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
23126: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
23127: --
23128: --
23129: l_result BOOLEAN := TRUE;
23130: l_rows NUMBER := 1000;
23374: EXIT WHEN l_array_entity_id.COUNT = 0;
23375:
23376: -- initialize arrays
23377: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
23378: XLA_AE_LINES_PKG.g_rec_lines := NULL;
23379:
23380: --
23381: -- Bug 4458708
23382: --
23379:
23380: --
23381: -- Bug 4458708
23382: --
23383: XLA_AE_LINES_PKG.g_LineNumber := 0;
23384:
23385:
23386: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
23387: g_last_hdr_idx := l_array_event_id.LAST;
23515: --
23516: -- following sets the accounting attributes needed to reverse
23517: -- accounting for a distributeion
23518: --
23519: xla_ae_lines_pkg.SetTrxReversalAttrs
23520: (p_event_id => l_event_id
23521: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
23522: ,p_trx_reversal_source => l_trx_reversal_source);
23523:
23547: --
23548: -- insert dummy rows into lines gt table that were created due to
23549: -- transaction reversals
23550: --
23551: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
23552: l_result := XLA_AE_LINES_PKG.InsertLines;
23553: END IF;
23554:
23555: --
23548: -- insert dummy rows into lines gt table that were created due to
23549: -- transaction reversals
23550: --
23551: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
23552: l_result := XLA_AE_LINES_PKG.InsertLines;
23553: END IF;
23554:
23555: --
23556: -- reset the temp_line_num for each set of events fetched from header
23556: -- reset the temp_line_num for each set of events fetched from header
23557: -- cursor rather than doing it for each new event in line cursor
23558: -- Bug 3939231
23559: --
23560: xla_ae_lines_pkg.g_temp_line_num := 0;
23561:
23562:
23563:
23564: --
23623: END IF;
23624: --
23625: EXIT WHEN l_array_entity_id.count = 0;
23626:
23627: XLA_AE_LINES_PKG.g_rec_lines := null;
23628:
23629: --
23630: -- Bug 4458708
23631: --
23628:
23629: --
23630: -- Bug 4458708
23631: --
23632: XLA_AE_LINES_PKG.g_LineNumber := 0;
23633: --
23634: --
23635:
23636: FOR Idx IN 1..l_array_event_id.count LOOP
23700:
23701:
23702:
23703: --
23704: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
23705:
23706: l_acct_reversal_source := SUBSTR(NULL, 1,30);
23707:
23708: IF l_continue_with_lines THEN
23736: --
23737:
23738: -- No reversal code generated
23739:
23740: xla_ae_lines_pkg.SetAcctReversalAttrs
23741: (p_event_id => l_event_id
23742: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
23743: ,p_calculate_acctd_flag => l_calculate_acctd_flag
23744: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
23783:
23784: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
23785: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
23786: AND (l_actual_flag = 'A')) THEN
23787: XLA_AE_LINES_PKG.CreateGainOrLossLines(
23788: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
23789: ,p_application_id => p_application_id
23790: ,p_amb_context_code => 'DEFAULT'
23791: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
23816: END IF;
23817: END IF;
23818:
23819: END LOOP;
23820: l_result := XLA_AE_LINES_PKG.InsertLines ;
23821: end loop;
23822: close line_cur;
23823:
23824:
24328: l_first_event_id NUMBER;
24329: l_last_event_id NUMBER;
24330:
24331: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
24332: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
24333: --
24334: --
24335: l_result BOOLEAN := TRUE;
24336: l_rows NUMBER := 1000;
24603: EXIT WHEN l_array_entity_id.COUNT = 0;
24604:
24605: -- initialize arrays
24606: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
24607: XLA_AE_LINES_PKG.g_rec_lines := NULL;
24608:
24609: --
24610: -- Bug 4458708
24611: --
24608:
24609: --
24610: -- Bug 4458708
24611: --
24612: XLA_AE_LINES_PKG.g_LineNumber := 0;
24613:
24614:
24615: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
24616: g_last_hdr_idx := l_array_event_id.LAST;
24762: --
24763: -- following sets the accounting attributes needed to reverse
24764: -- accounting for a distributeion
24765: --
24766: xla_ae_lines_pkg.SetTrxReversalAttrs
24767: (p_event_id => l_event_id
24768: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
24769: ,p_trx_reversal_source => l_trx_reversal_source);
24770:
24794: --
24795: -- insert dummy rows into lines gt table that were created due to
24796: -- transaction reversals
24797: --
24798: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
24799: l_result := XLA_AE_LINES_PKG.InsertLines;
24800: END IF;
24801:
24802: --
24795: -- insert dummy rows into lines gt table that were created due to
24796: -- transaction reversals
24797: --
24798: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
24799: l_result := XLA_AE_LINES_PKG.InsertLines;
24800: END IF;
24801:
24802: --
24803: -- reset the temp_line_num for each set of events fetched from header
24803: -- reset the temp_line_num for each set of events fetched from header
24804: -- cursor rather than doing it for each new event in line cursor
24805: -- Bug 3939231
24806: --
24807: xla_ae_lines_pkg.g_temp_line_num := 0;
24808:
24809:
24810:
24811: --
24870: END IF;
24871: --
24872: EXIT WHEN l_array_entity_id.count = 0;
24873:
24874: XLA_AE_LINES_PKG.g_rec_lines := null;
24875:
24876: --
24877: -- Bug 4458708
24878: --
24875:
24876: --
24877: -- Bug 4458708
24878: --
24879: XLA_AE_LINES_PKG.g_LineNumber := 0;
24880: --
24881: --
24882:
24883: FOR Idx IN 1..l_array_event_id.count LOOP
24947:
24948:
24949:
24950: --
24951: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
24952:
24953: l_acct_reversal_source := SUBSTR(NULL, 1,30);
24954:
24955: IF l_continue_with_lines THEN
24983: --
24984:
24985: -- No reversal code generated
24986:
24987: xla_ae_lines_pkg.SetAcctReversalAttrs
24988: (p_event_id => l_event_id
24989: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
24990: ,p_calculate_acctd_flag => l_calculate_acctd_flag
24991: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
25030:
25031: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
25032: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
25033: AND (l_actual_flag = 'A')) THEN
25034: XLA_AE_LINES_PKG.CreateGainOrLossLines(
25035: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
25036: ,p_application_id => p_application_id
25037: ,p_amb_context_code => 'DEFAULT'
25038: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
25063: END IF;
25064: END IF;
25065:
25066: END LOOP;
25067: l_result := XLA_AE_LINES_PKG.InsertLines ;
25068: end loop;
25069: close line_cur;
25070:
25071:
25575: l_first_event_id NUMBER;
25576: l_last_event_id NUMBER;
25577:
25578: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
25579: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
25580: --
25581: --
25582: l_result BOOLEAN := TRUE;
25583: l_rows NUMBER := 1000;
25850: EXIT WHEN l_array_entity_id.COUNT = 0;
25851:
25852: -- initialize arrays
25853: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
25854: XLA_AE_LINES_PKG.g_rec_lines := NULL;
25855:
25856: --
25857: -- Bug 4458708
25858: --
25855:
25856: --
25857: -- Bug 4458708
25858: --
25859: XLA_AE_LINES_PKG.g_LineNumber := 0;
25860:
25861:
25862: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
25863: g_last_hdr_idx := l_array_event_id.LAST;
26009: --
26010: -- following sets the accounting attributes needed to reverse
26011: -- accounting for a distributeion
26012: --
26013: xla_ae_lines_pkg.SetTrxReversalAttrs
26014: (p_event_id => l_event_id
26015: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
26016: ,p_trx_reversal_source => l_trx_reversal_source);
26017:
26041: --
26042: -- insert dummy rows into lines gt table that were created due to
26043: -- transaction reversals
26044: --
26045: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
26046: l_result := XLA_AE_LINES_PKG.InsertLines;
26047: END IF;
26048:
26049: --
26042: -- insert dummy rows into lines gt table that were created due to
26043: -- transaction reversals
26044: --
26045: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
26046: l_result := XLA_AE_LINES_PKG.InsertLines;
26047: END IF;
26048:
26049: --
26050: -- reset the temp_line_num for each set of events fetched from header
26050: -- reset the temp_line_num for each set of events fetched from header
26051: -- cursor rather than doing it for each new event in line cursor
26052: -- Bug 3939231
26053: --
26054: xla_ae_lines_pkg.g_temp_line_num := 0;
26055:
26056:
26057:
26058: --
26117: END IF;
26118: --
26119: EXIT WHEN l_array_entity_id.count = 0;
26120:
26121: XLA_AE_LINES_PKG.g_rec_lines := null;
26122:
26123: --
26124: -- Bug 4458708
26125: --
26122:
26123: --
26124: -- Bug 4458708
26125: --
26126: XLA_AE_LINES_PKG.g_LineNumber := 0;
26127: --
26128: --
26129:
26130: FOR Idx IN 1..l_array_event_id.count LOOP
26194:
26195:
26196:
26197: --
26198: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
26199:
26200: l_acct_reversal_source := SUBSTR(NULL, 1,30);
26201:
26202: IF l_continue_with_lines THEN
26230: --
26231:
26232: -- No reversal code generated
26233:
26234: xla_ae_lines_pkg.SetAcctReversalAttrs
26235: (p_event_id => l_event_id
26236: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
26237: ,p_calculate_acctd_flag => l_calculate_acctd_flag
26238: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
26277:
26278: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
26279: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
26280: AND (l_actual_flag = 'A')) THEN
26281: XLA_AE_LINES_PKG.CreateGainOrLossLines(
26282: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
26283: ,p_application_id => p_application_id
26284: ,p_amb_context_code => 'DEFAULT'
26285: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
26310: END IF;
26311: END IF;
26312:
26313: END LOOP;
26314: l_result := XLA_AE_LINES_PKG.InsertLines ;
26315: end loop;
26316: close line_cur;
26317:
26318:
26862: l_first_event_id NUMBER;
26863: l_last_event_id NUMBER;
26864:
26865: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
26866: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
26867: --
26868: --
26869: l_result BOOLEAN := TRUE;
26870: l_rows NUMBER := 1000;
27176: EXIT WHEN l_array_entity_id.COUNT = 0;
27177:
27178: -- initialize arrays
27179: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
27180: XLA_AE_LINES_PKG.g_rec_lines := NULL;
27181:
27182: --
27183: -- Bug 4458708
27184: --
27181:
27182: --
27183: -- Bug 4458708
27184: --
27185: XLA_AE_LINES_PKG.g_LineNumber := 0;
27186:
27187:
27188: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
27189: g_last_hdr_idx := l_array_event_id.LAST;
27350: --
27351: -- following sets the accounting attributes needed to reverse
27352: -- accounting for a distributeion
27353: --
27354: xla_ae_lines_pkg.SetTrxReversalAttrs
27355: (p_event_id => l_event_id
27356: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
27357: ,p_trx_reversal_source => l_trx_reversal_source);
27358:
27382: --
27383: -- insert dummy rows into lines gt table that were created due to
27384: -- transaction reversals
27385: --
27386: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
27387: l_result := XLA_AE_LINES_PKG.InsertLines;
27388: END IF;
27389:
27390: --
27383: -- insert dummy rows into lines gt table that were created due to
27384: -- transaction reversals
27385: --
27386: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
27387: l_result := XLA_AE_LINES_PKG.InsertLines;
27388: END IF;
27389:
27390: --
27391: -- reset the temp_line_num for each set of events fetched from header
27391: -- reset the temp_line_num for each set of events fetched from header
27392: -- cursor rather than doing it for each new event in line cursor
27393: -- Bug 3939231
27394: --
27395: xla_ae_lines_pkg.g_temp_line_num := 0;
27396:
27397:
27398:
27399: --
27452: END IF;
27453: --
27454: EXIT WHEN l_array_entity_id.count = 0;
27455:
27456: XLA_AE_LINES_PKG.g_rec_lines := null;
27457:
27458: --
27459: -- Bug 4458708
27460: --
27457:
27458: --
27459: -- Bug 4458708
27460: --
27461: XLA_AE_LINES_PKG.g_LineNumber := 0;
27462: --
27463: --
27464:
27465: FOR Idx IN 1..l_array_event_id.count LOOP
27529:
27530:
27531:
27532: --
27533: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
27534:
27535: l_acct_reversal_source := SUBSTR(NULL, 1,30);
27536:
27537: IF l_continue_with_lines THEN
27565: --
27566:
27567: -- No reversal code generated
27568:
27569: xla_ae_lines_pkg.SetAcctReversalAttrs
27570: (p_event_id => l_event_id
27571: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
27572: ,p_calculate_acctd_flag => l_calculate_acctd_flag
27573: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
27653:
27654: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
27655: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
27656: AND (l_actual_flag = 'A')) THEN
27657: XLA_AE_LINES_PKG.CreateGainOrLossLines(
27658: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
27659: ,p_application_id => p_application_id
27660: ,p_amb_context_code => 'DEFAULT'
27661: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
27686: END IF;
27687: END IF;
27688:
27689: END LOOP;
27690: l_result := XLA_AE_LINES_PKG.InsertLines ;
27691: end loop;
27692: close line_cur;
27693:
27694:
28238: l_first_event_id NUMBER;
28239: l_last_event_id NUMBER;
28240:
28241: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
28242: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
28243: --
28244: --
28245: l_result BOOLEAN := TRUE;
28246: l_rows NUMBER := 1000;
28552: EXIT WHEN l_array_entity_id.COUNT = 0;
28553:
28554: -- initialize arrays
28555: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
28556: XLA_AE_LINES_PKG.g_rec_lines := NULL;
28557:
28558: --
28559: -- Bug 4458708
28560: --
28557:
28558: --
28559: -- Bug 4458708
28560: --
28561: XLA_AE_LINES_PKG.g_LineNumber := 0;
28562:
28563:
28564: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
28565: g_last_hdr_idx := l_array_event_id.LAST;
28726: --
28727: -- following sets the accounting attributes needed to reverse
28728: -- accounting for a distributeion
28729: --
28730: xla_ae_lines_pkg.SetTrxReversalAttrs
28731: (p_event_id => l_event_id
28732: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
28733: ,p_trx_reversal_source => l_trx_reversal_source);
28734:
28758: --
28759: -- insert dummy rows into lines gt table that were created due to
28760: -- transaction reversals
28761: --
28762: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
28763: l_result := XLA_AE_LINES_PKG.InsertLines;
28764: END IF;
28765:
28766: --
28759: -- insert dummy rows into lines gt table that were created due to
28760: -- transaction reversals
28761: --
28762: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
28763: l_result := XLA_AE_LINES_PKG.InsertLines;
28764: END IF;
28765:
28766: --
28767: -- reset the temp_line_num for each set of events fetched from header
28767: -- reset the temp_line_num for each set of events fetched from header
28768: -- cursor rather than doing it for each new event in line cursor
28769: -- Bug 3939231
28770: --
28771: xla_ae_lines_pkg.g_temp_line_num := 0;
28772:
28773:
28774:
28775: --
28828: END IF;
28829: --
28830: EXIT WHEN l_array_entity_id.count = 0;
28831:
28832: XLA_AE_LINES_PKG.g_rec_lines := null;
28833:
28834: --
28835: -- Bug 4458708
28836: --
28833:
28834: --
28835: -- Bug 4458708
28836: --
28837: XLA_AE_LINES_PKG.g_LineNumber := 0;
28838: --
28839: --
28840:
28841: FOR Idx IN 1..l_array_event_id.count LOOP
28905:
28906:
28907:
28908: --
28909: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
28910:
28911: l_acct_reversal_source := SUBSTR(NULL, 1,30);
28912:
28913: IF l_continue_with_lines THEN
28941: --
28942:
28943: -- No reversal code generated
28944:
28945: xla_ae_lines_pkg.SetAcctReversalAttrs
28946: (p_event_id => l_event_id
28947: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
28948: ,p_calculate_acctd_flag => l_calculate_acctd_flag
28949: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
29029:
29030: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
29031: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
29032: AND (l_actual_flag = 'A')) THEN
29033: XLA_AE_LINES_PKG.CreateGainOrLossLines(
29034: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
29035: ,p_application_id => p_application_id
29036: ,p_amb_context_code => 'DEFAULT'
29037: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
29062: END IF;
29063: END IF;
29064:
29065: END LOOP;
29066: l_result := XLA_AE_LINES_PKG.InsertLines ;
29067: end loop;
29068: close line_cur;
29069:
29070:
29614: l_first_event_id NUMBER;
29615: l_last_event_id NUMBER;
29616:
29617: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
29618: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
29619: --
29620: --
29621: l_result BOOLEAN := TRUE;
29622: l_rows NUMBER := 1000;
29928: EXIT WHEN l_array_entity_id.COUNT = 0;
29929:
29930: -- initialize arrays
29931: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
29932: XLA_AE_LINES_PKG.g_rec_lines := NULL;
29933:
29934: --
29935: -- Bug 4458708
29936: --
29933:
29934: --
29935: -- Bug 4458708
29936: --
29937: XLA_AE_LINES_PKG.g_LineNumber := 0;
29938:
29939:
29940: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
29941: g_last_hdr_idx := l_array_event_id.LAST;
30102: --
30103: -- following sets the accounting attributes needed to reverse
30104: -- accounting for a distributeion
30105: --
30106: xla_ae_lines_pkg.SetTrxReversalAttrs
30107: (p_event_id => l_event_id
30108: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
30109: ,p_trx_reversal_source => l_trx_reversal_source);
30110:
30134: --
30135: -- insert dummy rows into lines gt table that were created due to
30136: -- transaction reversals
30137: --
30138: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
30139: l_result := XLA_AE_LINES_PKG.InsertLines;
30140: END IF;
30141:
30142: --
30135: -- insert dummy rows into lines gt table that were created due to
30136: -- transaction reversals
30137: --
30138: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
30139: l_result := XLA_AE_LINES_PKG.InsertLines;
30140: END IF;
30141:
30142: --
30143: -- reset the temp_line_num for each set of events fetched from header
30143: -- reset the temp_line_num for each set of events fetched from header
30144: -- cursor rather than doing it for each new event in line cursor
30145: -- Bug 3939231
30146: --
30147: xla_ae_lines_pkg.g_temp_line_num := 0;
30148:
30149:
30150:
30151: --
30204: END IF;
30205: --
30206: EXIT WHEN l_array_entity_id.count = 0;
30207:
30208: XLA_AE_LINES_PKG.g_rec_lines := null;
30209:
30210: --
30211: -- Bug 4458708
30212: --
30209:
30210: --
30211: -- Bug 4458708
30212: --
30213: XLA_AE_LINES_PKG.g_LineNumber := 0;
30214: --
30215: --
30216:
30217: FOR Idx IN 1..l_array_event_id.count LOOP
30281:
30282:
30283:
30284: --
30285: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
30286:
30287: l_acct_reversal_source := SUBSTR(NULL, 1,30);
30288:
30289: IF l_continue_with_lines THEN
30317: --
30318:
30319: -- No reversal code generated
30320:
30321: xla_ae_lines_pkg.SetAcctReversalAttrs
30322: (p_event_id => l_event_id
30323: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
30324: ,p_calculate_acctd_flag => l_calculate_acctd_flag
30325: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
30405:
30406: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
30407: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
30408: AND (l_actual_flag = 'A')) THEN
30409: XLA_AE_LINES_PKG.CreateGainOrLossLines(
30410: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
30411: ,p_application_id => p_application_id
30412: ,p_amb_context_code => 'DEFAULT'
30413: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
30438: END IF;
30439: END IF;
30440:
30441: END LOOP;
30442: l_result := XLA_AE_LINES_PKG.InsertLines ;
30443: end loop;
30444: close line_cur;
30445:
30446:
30952: l_first_event_id NUMBER;
30953: l_last_event_id NUMBER;
30954:
30955: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
30956: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
30957: --
30958: --
30959: l_result BOOLEAN := TRUE;
30960: l_rows NUMBER := 1000;
31234: EXIT WHEN l_array_entity_id.COUNT = 0;
31235:
31236: -- initialize arrays
31237: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
31238: XLA_AE_LINES_PKG.g_rec_lines := NULL;
31239:
31240: --
31241: -- Bug 4458708
31242: --
31239:
31240: --
31241: -- Bug 4458708
31242: --
31243: XLA_AE_LINES_PKG.g_LineNumber := 0;
31244:
31245:
31246: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
31247: g_last_hdr_idx := l_array_event_id.LAST;
31389: --
31390: -- following sets the accounting attributes needed to reverse
31391: -- accounting for a distributeion
31392: --
31393: xla_ae_lines_pkg.SetTrxReversalAttrs
31394: (p_event_id => l_event_id
31395: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
31396: ,p_trx_reversal_source => l_trx_reversal_source);
31397:
31467: --
31468: -- insert dummy rows into lines gt table that were created due to
31469: -- transaction reversals
31470: --
31471: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
31472: l_result := XLA_AE_LINES_PKG.InsertLines;
31473: END IF;
31474:
31475: --
31468: -- insert dummy rows into lines gt table that were created due to
31469: -- transaction reversals
31470: --
31471: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
31472: l_result := XLA_AE_LINES_PKG.InsertLines;
31473: END IF;
31474:
31475: --
31476: -- reset the temp_line_num for each set of events fetched from header
31476: -- reset the temp_line_num for each set of events fetched from header
31477: -- cursor rather than doing it for each new event in line cursor
31478: -- Bug 3939231
31479: --
31480: xla_ae_lines_pkg.g_temp_line_num := 0;
31481:
31482:
31483:
31484: --
31536: END IF;
31537: --
31538: EXIT WHEN l_array_entity_id.count = 0;
31539:
31540: XLA_AE_LINES_PKG.g_rec_lines := null;
31541:
31542: --
31543: -- Bug 4458708
31544: --
31541:
31542: --
31543: -- Bug 4458708
31544: --
31545: XLA_AE_LINES_PKG.g_LineNumber := 0;
31546: --
31547: --
31548:
31549: FOR Idx IN 1..l_array_event_id.count LOOP
31613:
31614:
31615:
31616: --
31617: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
31618:
31619: l_acct_reversal_source := SUBSTR(NULL, 1,30);
31620:
31621: IF l_continue_with_lines THEN
31649: --
31650:
31651: -- No reversal code generated
31652:
31653: xla_ae_lines_pkg.SetAcctReversalAttrs
31654: (p_event_id => l_event_id
31655: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
31656: ,p_calculate_acctd_flag => l_calculate_acctd_flag
31657: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
31701:
31702: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
31703: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
31704: AND (l_actual_flag = 'A')) THEN
31705: XLA_AE_LINES_PKG.CreateGainOrLossLines(
31706: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
31707: ,p_application_id => p_application_id
31708: ,p_amb_context_code => 'DEFAULT'
31709: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
31734: END IF;
31735: END IF;
31736:
31737: END LOOP;
31738: l_result := XLA_AE_LINES_PKG.InsertLines ;
31739: end loop;
31740: close line_cur;
31741:
31742:
32286: l_first_event_id NUMBER;
32287: l_last_event_id NUMBER;
32288:
32289: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
32290: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
32291: --
32292: --
32293: l_result BOOLEAN := TRUE;
32294: l_rows NUMBER := 1000;
32600: EXIT WHEN l_array_entity_id.COUNT = 0;
32601:
32602: -- initialize arrays
32603: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
32604: XLA_AE_LINES_PKG.g_rec_lines := NULL;
32605:
32606: --
32607: -- Bug 4458708
32608: --
32605:
32606: --
32607: -- Bug 4458708
32608: --
32609: XLA_AE_LINES_PKG.g_LineNumber := 0;
32610:
32611:
32612: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
32613: g_last_hdr_idx := l_array_event_id.LAST;
32774: --
32775: -- following sets the accounting attributes needed to reverse
32776: -- accounting for a distributeion
32777: --
32778: xla_ae_lines_pkg.SetTrxReversalAttrs
32779: (p_event_id => l_event_id
32780: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
32781: ,p_trx_reversal_source => l_trx_reversal_source);
32782:
32806: --
32807: -- insert dummy rows into lines gt table that were created due to
32808: -- transaction reversals
32809: --
32810: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
32811: l_result := XLA_AE_LINES_PKG.InsertLines;
32812: END IF;
32813:
32814: --
32807: -- insert dummy rows into lines gt table that were created due to
32808: -- transaction reversals
32809: --
32810: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
32811: l_result := XLA_AE_LINES_PKG.InsertLines;
32812: END IF;
32813:
32814: --
32815: -- reset the temp_line_num for each set of events fetched from header
32815: -- reset the temp_line_num for each set of events fetched from header
32816: -- cursor rather than doing it for each new event in line cursor
32817: -- Bug 3939231
32818: --
32819: xla_ae_lines_pkg.g_temp_line_num := 0;
32820:
32821:
32822:
32823: --
32876: END IF;
32877: --
32878: EXIT WHEN l_array_entity_id.count = 0;
32879:
32880: XLA_AE_LINES_PKG.g_rec_lines := null;
32881:
32882: --
32883: -- Bug 4458708
32884: --
32881:
32882: --
32883: -- Bug 4458708
32884: --
32885: XLA_AE_LINES_PKG.g_LineNumber := 0;
32886: --
32887: --
32888:
32889: FOR Idx IN 1..l_array_event_id.count LOOP
32953:
32954:
32955:
32956: --
32957: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
32958:
32959: l_acct_reversal_source := SUBSTR(NULL, 1,30);
32960:
32961: IF l_continue_with_lines THEN
32989: --
32990:
32991: -- No reversal code generated
32992:
32993: xla_ae_lines_pkg.SetAcctReversalAttrs
32994: (p_event_id => l_event_id
32995: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
32996: ,p_calculate_acctd_flag => l_calculate_acctd_flag
32997: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
33077:
33078: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
33079: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
33080: AND (l_actual_flag = 'A')) THEN
33081: XLA_AE_LINES_PKG.CreateGainOrLossLines(
33082: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
33083: ,p_application_id => p_application_id
33084: ,p_amb_context_code => 'DEFAULT'
33085: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
33110: END IF;
33111: END IF;
33112:
33113: END LOOP;
33114: l_result := XLA_AE_LINES_PKG.InsertLines ;
33115: end loop;
33116: close line_cur;
33117:
33118:
33662: l_first_event_id NUMBER;
33663: l_last_event_id NUMBER;
33664:
33665: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
33666: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
33667: --
33668: --
33669: l_result BOOLEAN := TRUE;
33670: l_rows NUMBER := 1000;
33976: EXIT WHEN l_array_entity_id.COUNT = 0;
33977:
33978: -- initialize arrays
33979: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
33980: XLA_AE_LINES_PKG.g_rec_lines := NULL;
33981:
33982: --
33983: -- Bug 4458708
33984: --
33981:
33982: --
33983: -- Bug 4458708
33984: --
33985: XLA_AE_LINES_PKG.g_LineNumber := 0;
33986:
33987:
33988: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
33989: g_last_hdr_idx := l_array_event_id.LAST;
34150: --
34151: -- following sets the accounting attributes needed to reverse
34152: -- accounting for a distributeion
34153: --
34154: xla_ae_lines_pkg.SetTrxReversalAttrs
34155: (p_event_id => l_event_id
34156: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
34157: ,p_trx_reversal_source => l_trx_reversal_source);
34158:
34182: --
34183: -- insert dummy rows into lines gt table that were created due to
34184: -- transaction reversals
34185: --
34186: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
34187: l_result := XLA_AE_LINES_PKG.InsertLines;
34188: END IF;
34189:
34190: --
34183: -- insert dummy rows into lines gt table that were created due to
34184: -- transaction reversals
34185: --
34186: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
34187: l_result := XLA_AE_LINES_PKG.InsertLines;
34188: END IF;
34189:
34190: --
34191: -- reset the temp_line_num for each set of events fetched from header
34191: -- reset the temp_line_num for each set of events fetched from header
34192: -- cursor rather than doing it for each new event in line cursor
34193: -- Bug 3939231
34194: --
34195: xla_ae_lines_pkg.g_temp_line_num := 0;
34196:
34197:
34198:
34199: --
34252: END IF;
34253: --
34254: EXIT WHEN l_array_entity_id.count = 0;
34255:
34256: XLA_AE_LINES_PKG.g_rec_lines := null;
34257:
34258: --
34259: -- Bug 4458708
34260: --
34257:
34258: --
34259: -- Bug 4458708
34260: --
34261: XLA_AE_LINES_PKG.g_LineNumber := 0;
34262: --
34263: --
34264:
34265: FOR Idx IN 1..l_array_event_id.count LOOP
34329:
34330:
34331:
34332: --
34333: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
34334:
34335: l_acct_reversal_source := SUBSTR(NULL, 1,30);
34336:
34337: IF l_continue_with_lines THEN
34365: --
34366:
34367: -- No reversal code generated
34368:
34369: xla_ae_lines_pkg.SetAcctReversalAttrs
34370: (p_event_id => l_event_id
34371: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
34372: ,p_calculate_acctd_flag => l_calculate_acctd_flag
34373: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
34453:
34454: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
34455: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
34456: AND (l_actual_flag = 'A')) THEN
34457: XLA_AE_LINES_PKG.CreateGainOrLossLines(
34458: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
34459: ,p_application_id => p_application_id
34460: ,p_amb_context_code => 'DEFAULT'
34461: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
34486: END IF;
34487: END IF;
34488:
34489: END LOOP;
34490: l_result := XLA_AE_LINES_PKG.InsertLines ;
34491: end loop;
34492: close line_cur;
34493:
34494:
35038: l_first_event_id NUMBER;
35039: l_last_event_id NUMBER;
35040:
35041: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
35042: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
35043: --
35044: --
35045: l_result BOOLEAN := TRUE;
35046: l_rows NUMBER := 1000;
35352: EXIT WHEN l_array_entity_id.COUNT = 0;
35353:
35354: -- initialize arrays
35355: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
35356: XLA_AE_LINES_PKG.g_rec_lines := NULL;
35357:
35358: --
35359: -- Bug 4458708
35360: --
35357:
35358: --
35359: -- Bug 4458708
35360: --
35361: XLA_AE_LINES_PKG.g_LineNumber := 0;
35362:
35363:
35364: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
35365: g_last_hdr_idx := l_array_event_id.LAST;
35526: --
35527: -- following sets the accounting attributes needed to reverse
35528: -- accounting for a distributeion
35529: --
35530: xla_ae_lines_pkg.SetTrxReversalAttrs
35531: (p_event_id => l_event_id
35532: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
35533: ,p_trx_reversal_source => l_trx_reversal_source);
35534:
35558: --
35559: -- insert dummy rows into lines gt table that were created due to
35560: -- transaction reversals
35561: --
35562: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
35563: l_result := XLA_AE_LINES_PKG.InsertLines;
35564: END IF;
35565:
35566: --
35559: -- insert dummy rows into lines gt table that were created due to
35560: -- transaction reversals
35561: --
35562: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
35563: l_result := XLA_AE_LINES_PKG.InsertLines;
35564: END IF;
35565:
35566: --
35567: -- reset the temp_line_num for each set of events fetched from header
35567: -- reset the temp_line_num for each set of events fetched from header
35568: -- cursor rather than doing it for each new event in line cursor
35569: -- Bug 3939231
35570: --
35571: xla_ae_lines_pkg.g_temp_line_num := 0;
35572:
35573:
35574:
35575: --
35628: END IF;
35629: --
35630: EXIT WHEN l_array_entity_id.count = 0;
35631:
35632: XLA_AE_LINES_PKG.g_rec_lines := null;
35633:
35634: --
35635: -- Bug 4458708
35636: --
35633:
35634: --
35635: -- Bug 4458708
35636: --
35637: XLA_AE_LINES_PKG.g_LineNumber := 0;
35638: --
35639: --
35640:
35641: FOR Idx IN 1..l_array_event_id.count LOOP
35705:
35706:
35707:
35708: --
35709: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
35710:
35711: l_acct_reversal_source := SUBSTR(NULL, 1,30);
35712:
35713: IF l_continue_with_lines THEN
35741: --
35742:
35743: -- No reversal code generated
35744:
35745: xla_ae_lines_pkg.SetAcctReversalAttrs
35746: (p_event_id => l_event_id
35747: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
35748: ,p_calculate_acctd_flag => l_calculate_acctd_flag
35749: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
35829:
35830: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
35831: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
35832: AND (l_actual_flag = 'A')) THEN
35833: XLA_AE_LINES_PKG.CreateGainOrLossLines(
35834: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
35835: ,p_application_id => p_application_id
35836: ,p_amb_context_code => 'DEFAULT'
35837: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
35862: END IF;
35863: END IF;
35864:
35865: END LOOP;
35866: l_result := XLA_AE_LINES_PKG.InsertLines ;
35867: end loop;
35868: close line_cur;
35869:
35870:
35997:
35998: --
35999: -- initialize array of lines with NULL
36000: --
36001: xla_ae_lines_pkg.SetNullLine;
36002:
36003: --
36004: -- initialize header extract count -- Bug 4865292
36005: --