[Home] [Help]
283: ,p_security_id_char_2 => p_security_id_char_2
284: ,p_security_id_char_3 => p_security_id_char_3);
285:
286: g_nodata_flag := C_NO; --bug13258048
287: -- Populate xla_ae_headers_gt table for processing.
288:
289: Populate_Journal_Entries;
290:
291: --To check if any events to process are present.bug13258048
640:
641:
642: --============================================================================
643: --
644: -- Private API which populates the xla_ae_headers_gt table with journal
645: -- entries to be completed and reset its status to 'Incomplete'.
646: --
647: -- The accounting entries to be completed must fullfill the following
648: -- conditions:
666: l_err_num number;
667:
668: Cursor C_SEL_HDRS is
669: Select accounting_entry_status_code
670: from xla_ae_headers
671: where ae_header_id in (Select /*+ cardinality(XLA_AE_HEADERS_GT,1) */ --bug9174950
672: ae_header_id from xla_ae_headers_gt)
673: and application_id = g_application_id
674: for update nowait;
667:
668: Cursor C_SEL_HDRS is
669: Select accounting_entry_status_code
670: from xla_ae_headers
671: where ae_header_id in (Select /*+ cardinality(XLA_AE_HEADERS_GT,1) */ --bug9174950
672: ae_header_id from xla_ae_headers_gt)
673: and application_id = g_application_id
674: for update nowait;
675:
668: Cursor C_SEL_HDRS is
669: Select accounting_entry_status_code
670: from xla_ae_headers
671: where ae_header_id in (Select /*+ cardinality(XLA_AE_HEADERS_GT,1) */ --bug9174950
672: ae_header_id from xla_ae_headers_gt)
673: and application_id = g_application_id
674: for update nowait;
675:
676: BEGIN
723: ,p_level => C_LEVEL_STATEMENT
724: ,p_module => l_log_module);
725: End If;
726:
727: -- Insert the journal entries to be completed into xla_ae_headers_gt.
728:
729: l_stmt := 'INSERT INTO xla_ae_headers_gt
730: (ae_header_id
731: ,ledger_id
725: End If;
726:
727: -- Insert the journal entries to be completed into xla_ae_headers_gt.
728:
729: l_stmt := 'INSERT INTO xla_ae_headers_gt
730: (ae_header_id
731: ,ledger_id
732: ,entity_id
733: ,event_id
741: ,doc_category_code
742: ,gl_transfer_status_code
743: ,accrual_reversal_flag
744: ,accounting_entry_status_code)
745: SELECT /*+ INDEX(xah xla_ae_headers_n7) */ xah.ae_header_id
746: ,xah.ledger_id
747: ,xah.entity_id
748: ,xah.event_id
749: ,xah.accounting_date
756: ,xah.doc_category_code
757: ,xah.gl_transfer_status_code
758: ,xah.accrual_reversal_flag
759: ,''F''
760: FROM xla_ae_headers xah
761: , xla_ae_headers xah2
762: , xla_subledgers xs
763: , xla_event_types_b xet
764: , xla_event_class_attrs xec
757: ,xah.gl_transfer_status_code
758: ,xah.accrual_reversal_flag
759: ,''F''
760: FROM xla_ae_headers xah
761: , xla_ae_headers xah2
762: , xla_subledgers xs
763: , xla_event_types_b xet
764: , xla_event_class_attrs xec
765: , xla_transaction_entities xte
798: ,p_level => C_LEVEL_STATEMENT
799: ,p_module => l_log_module);
800: End If;
801:
802: print_logfile('- Dynamic stmt to populate xla_ae_headers_gt table built');
803:
804: EXECUTE IMMEDIATE l_stmt
805: USING g_application_id
806: ,g_end_date
815: p_module => l_log_module,
816: p_level => C_LEVEL_STATEMENT);
817: END IF;
818:
819: print_logfile('- xla_ae_headers_gt table populuated');
820:
821: If (l_count = 0) then
822: If (C_LEVEL_EVENT >= g_log_level) THEN
823: trace
843: --
844: -- Reset journal entry status for the journal entry to be completed
845: --
846:
847: Update xla_ae_headers
848: Set accounting_entry_status_code = 'N'
849: , request_id = g_request_id
850: , accounting_batch_id = g_accounting_batch_id
851: , last_update_date = sysdate
851: , last_update_date = sysdate
852: , last_updated_by = xla_environment_pkg.g_usr_id
853: , last_update_login = xla_environment_pkg.g_login_id
854: Where application_id = g_application_id
855: and ae_header_id in (Select ae_header_id from xla_ae_headers_gt)
856: RETURNING ae_header_id BULK COLLECT INTO g_array_ae_header_id; -- 5115223
857:
858: -- Lock rows in main headers table selected for processing.
859:
943: ,p_module => l_log_module);
944: END IF;
945:
946: FORALL i IN 1..g_array_ae_header_id.COUNT -- 5115223
947: UPDATE xla_ae_headers xah
948: SET accounting_entry_status_code = 'F'
949: ,completed_date = sysdate
950: WHERE xah.request_id = g_request_id
951: AND xah.accounting_batch_id = g_accounting_batch_id
1027: ,g_ledger_id
1028: ,h.entity_id
1029: ,t.entity_code
1030: ,h.event_id
1031: FROM xla_ae_headers_gt h,
1032: xla_transaction_entities t
1033: WHERE h.entity_id = t.entity_id
1034: AND h.ledger_id = t.ledger_id
1035: AND t.application_id = g_application_id
1080: END IF;
1081:
1082: fun_seq_batch.batch_init
1083: (p_application_id => 602
1084: ,p_table_name => 'XLA_AE_HEADERS'
1085: ,p_event_code => 'COMPLETION'
1086: ,p_context_type => 'LEDGER_AND_CURRENCY'
1087: ,p_context_value_tbl => l_seq_context_value
1088: ,p_request_id => g_request_id