The following lines contain the word 'select', 'insert', 'update' or 'delete':
l_component_code := 'COST_UPDATE';
l_entity_code := 'COST_UPDATE';
l_event_class_code := 'COST_UPDATE';
l_event_type_code := 'COST_UPDATE_ALL';
l_line_definition_code := 'COST_UPDATE';
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
(p_hdr_idx => g_array_event(p_event_id).array_value_num('header_index')
,p_balance_type_code => l_balance_type_code
);
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
(p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
,p_balance_type_code => l_balance_type_code);
l_entity_code := 'COST_UPDATE';
l_event_class_code := 'COST_UPDATE';
l_event_type_code := 'COST_UPDATE_ALL';
l_line_definition_code := 'COST_UPDATE';
p_accounting_class_code => 'COST_UPDATE_ADJUSTMENT'
, p_ae_header_id => l_ae_header_id
);
'COST_UPDATE_ADJUSTMENT';
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
(p_hdr_idx => g_array_event(p_event_id).array_value_num('header_index')
,p_balance_type_code => l_balance_type_code
);
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
(p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
,p_balance_type_code => l_balance_type_code);
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
(p_hdr_idx => g_array_event(p_event_id).array_value_num('header_index')
,p_balance_type_code => l_balance_type_code
);
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
(p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
,p_balance_type_code => l_balance_type_code);
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
(p_hdr_idx => g_array_event(p_event_id).array_value_num('header_index')
,p_balance_type_code => l_balance_type_code
);
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
(p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
,p_balance_type_code => l_balance_type_code);
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
(p_hdr_idx => g_array_event(p_event_id).array_value_num('header_index')
,p_balance_type_code => l_balance_type_code
);
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
(p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
,p_balance_type_code => l_balance_type_code);
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
(p_hdr_idx => g_array_event(p_event_id).array_value_num('header_index')
,p_balance_type_code => l_balance_type_code
);
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
(p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
,p_balance_type_code => l_balance_type_code);
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
(p_hdr_idx => g_array_event(p_event_id).array_value_num('header_index')
,p_balance_type_code => l_balance_type_code
);
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
(p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
,p_balance_type_code => l_balance_type_code);
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
(p_hdr_idx => g_array_event(p_event_id).array_value_num('header_index')
,p_balance_type_code => l_balance_type_code
);
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
(p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
,p_balance_type_code => l_balance_type_code);
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
(p_hdr_idx => g_array_event(p_event_id).array_value_num('header_index')
,p_balance_type_code => l_balance_type_code
);
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
(p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
,p_balance_type_code => l_balance_type_code);
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
(p_hdr_idx => g_array_event(p_event_id).array_value_num('header_index')
,p_balance_type_code => l_balance_type_code
);
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
(p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
,p_balance_type_code => l_balance_type_code);
PROCEDURE insert_sources_18(
p_target_ledger_id IN NUMBER
, p_language IN VARCHAR2
, p_sla_ledger_id IN NUMBER
, p_pad_start_date IN DATE
, p_pad_end_date IN DATE
)
IS
C_EVENT_TYPE_CODE CONSTANT VARCHAR2(30) := 'COST_UPDATE_ALL';
C_EVENT_CLASS_CODE CONSTANT VARCHAR2(30) := 'COST_UPDATE';
l_log_module := C_DEFAULT_MODULE||'.insert_sources_18';
(p_msg => 'BEGIN of insert_sources_18'
,p_level => C_LEVEL_PROCEDURE
,p_module => l_log_module);
SELECT oracle_username
INTO p_apps_owner
FROM fnd_oracle_userid
WHERE read_only_flag = 'U'
;
INSERT INTO xla_diag_sources --hdr2
(
event_id
, ledger_id
, sla_ledger_id
, description_language
, object_name
, object_type_code
, line_number
, source_application_id
, source_type_code
, source_code
, source_value
, source_meaning
, created_by
, creation_date
, last_update_date
, last_updated_by
, last_update_login
, program_update_date
, program_application_id
, program_id
, request_id
)
SELECT
event_id
, p_target_ledger_id
, p_sla_ledger_id
, p_language
, object_name
, object_type_code
, line_number
, source_application_id
, source_type_code
, source_code
, SUBSTR(source_value ,1,1996)
, SUBSTR(source_meaning ,1,200)
, xla_environment_pkg.g_Usr_Id
, TRUNC(SYSDATE)
, TRUNC(SYSDATE)
, xla_environment_pkg.g_Usr_Id
, xla_environment_pkg.g_Login_Id
, TRUNC(SYSDATE)
, xla_environment_pkg.g_Prog_Appl_Id
, xla_environment_pkg.g_Prog_Id
, xla_environment_pkg.g_Req_Id
FROM (
SELECT xet.event_id event_id
, 0 line_number
, CASE r
WHEN 1 THEN 'DPP_XLA_INV_HEADERS_V'
WHEN 2 THEN 'DPP_XLA_INV_HEADERS_V'
WHEN 3 THEN 'DPP_XLA_INV_HEADERS_V'
WHEN 4 THEN 'DPP_XLA_INV_HEADERS_V'
WHEN 5 THEN 'DPP_XLA_INV_HEADERS_V'
ELSE null
END object_name
, CASE r
WHEN 1 THEN 'HEADER'
WHEN 2 THEN 'HEADER'
WHEN 3 THEN 'HEADER'
WHEN 4 THEN 'HEADER'
WHEN 5 THEN 'HEADER'
ELSE null
END object_type_code
, CASE r
WHEN 1 THEN '9000'
WHEN 2 THEN '9000'
WHEN 3 THEN '9000'
WHEN 4 THEN '9000'
WHEN 5 THEN '9000'
ELSE null
END source_application_id
, 'S' source_type_code
, CASE r
WHEN 1 THEN 'PP_TXN_NUMBER'
WHEN 2 THEN 'PP_ACCRUAL_CCID'
WHEN 3 THEN 'PP_COST_ADJ_CCID'
WHEN 4 THEN 'DISTRIBUTION_TYPE'
WHEN 5 THEN 'TRANSFER_TO_GL_INDICATOR'
ELSE null
END source_code
, CASE r
WHEN 1 THEN TO_CHAR(h1.PP_TXN_NUMBER)
WHEN 2 THEN TO_CHAR(h1.PP_ACCRUAL_CCID)
WHEN 3 THEN TO_CHAR(h1.PP_COST_ADJ_CCID)
WHEN 4 THEN TO_CHAR(h1.DISTRIBUTION_TYPE)
WHEN 5 THEN TO_CHAR(h1.TRANSFER_TO_GL_INDICATOR)
ELSE null
END source_value
, null source_meaning
FROM xla_events_gt xet
, DPP_XLA_INV_HEADERS_V h1
,(select rownum r from all_objects where rownum <= 5 and owner = p_apps_owner)
WHERE xet.event_date between p_pad_start_date AND p_pad_end_date
AND xet.event_class_code = C_EVENT_CLASS_CODE
AND h1.event_id = xet.event_id
)
;
(p_msg => 'number of header sources inserted = '||SQL%ROWCOUNT
,p_level => C_LEVEL_STATEMENT
,p_module => l_log_module);
INSERT INTO xla_diag_sources --line2
(
event_id
, ledger_id
, sla_ledger_id
, description_language
, object_name
, object_type_code
, line_number
, source_application_id
, source_type_code
, source_code
, source_value
, source_meaning
, created_by
, creation_date
, last_update_date
, last_updated_by
, last_update_login
, program_update_date
, program_application_id
, program_id
, request_id
)
SELECT event_id
, p_target_ledger_id
, p_sla_ledger_id
, p_language
, object_name
, object_type_code
, line_number
, source_application_id
, source_type_code
, source_code
, SUBSTR(source_value,1,1996)
, SUBSTR(source_meaning ,1,200)
, xla_environment_pkg.g_Usr_Id
, TRUNC(SYSDATE)
, TRUNC(SYSDATE)
, xla_environment_pkg.g_Usr_Id
, xla_environment_pkg.g_Login_Id
, TRUNC(SYSDATE)
, xla_environment_pkg.g_Prog_Appl_Id
, xla_environment_pkg.g_Prog_Id
, xla_environment_pkg.g_Req_Id
FROM (
SELECT xet.event_id event_id
, l2.line_number line_number
, CASE r
WHEN 1 THEN 'DPP_XLA_INV_LINES_V'
WHEN 2 THEN 'DPP_XLA_INV_LINES_V'
WHEN 3 THEN 'DPP_XLA_INV_LINES_V'
WHEN 4 THEN 'DPP_XLA_INV_LINES_V'
WHEN 5 THEN 'DPP_XLA_INV_LINES_V'
ELSE null
END object_name
, CASE r
WHEN 1 THEN 'LINE'
WHEN 2 THEN 'LINE'
WHEN 3 THEN 'LINE'
WHEN 4 THEN 'LINE'
WHEN 5 THEN 'LINE'
ELSE null
END object_type_code
, CASE r
WHEN 1 THEN '9000'
WHEN 2 THEN '9000'
WHEN 3 THEN '9000'
WHEN 4 THEN '9000'
WHEN 5 THEN '9000'
ELSE null
END source_application_id
, 'S' source_type_code
, CASE r
WHEN 1 THEN 'ITEM_NUMBER'
WHEN 2 THEN 'DISTRIBUTION_IDENTIFIER'
WHEN 3 THEN 'ENTERED_AMOUNT'
WHEN 4 THEN 'CURRENCY_CODE'
WHEN 5 THEN 'ACCOUNTED_AMOUNT'
ELSE null
END source_code
, CASE r
WHEN 1 THEN TO_CHAR(l2.ITEM_NUMBER)
WHEN 2 THEN TO_CHAR(l2.DISTRIBUTION_IDENTIFIER)
WHEN 3 THEN TO_CHAR(l2.ENTERED_AMOUNT)
WHEN 4 THEN TO_CHAR(l2.CURRENCY_CODE)
WHEN 5 THEN TO_CHAR(l2.ACCOUNTED_AMOUNT)
ELSE null
END source_value
, null source_meaning
FROM xla_events_gt xet
, DPP_XLA_INV_LINES_V l2
, (select rownum r from all_objects where rownum <= 5 and owner = p_apps_owner)
WHERE xet.event_date between p_pad_start_date AND p_pad_end_date
AND xet.event_class_code = C_EVENT_CLASS_CODE
AND l2.event_id = xet.event_id
)
;
(p_msg => 'number of line sources inserted = '||SQL%ROWCOUNT
,p_level => C_LEVEL_STATEMENT
,p_module => l_log_module);
(p_msg => 'END of insert_sources_18'
,p_level => C_LEVEL_PROCEDURE
,p_module => l_log_module);
(p_location => 'XLA_09000_AAD_S_000015_PKG.insert_sources_18');
END insert_sources_18;
C_EVENT_TYPE_CODE CONSTANT VARCHAR2(30) := 'COST_UPDATE_ALL';
C_EVENT_CLASS_CODE CONSTANT VARCHAR2(30) := 'COST_UPDATE';
l_event_class_name VARCHAR2(80) := 'Cost Update';
SELECT /*+ leading(xet) cardinality(xet,1) */
-- Event Class Code: COST_UPDATE
xet.entity_id
,xet.legal_entity_id
,xet.entity_code
,xet.transaction_number
,xet.event_id
,xet.event_class_code
,xet.event_type_code
,xet.event_number
,xet.event_date
,xet.transaction_date
,xet.reference_num_1
,xet.reference_num_2
,xet.reference_num_3
,xet.reference_num_4
,xet.reference_char_1
,xet.reference_char_2
,xet.reference_char_3
,xet.reference_char_4
,xet.reference_date_1
,xet.reference_date_2
,xet.reference_date_3
,xet.reference_date_4
,xet.event_created_by
,xet.budgetary_control_flag
, h1.PP_TXN_NUMBER source_1
, h1.PP_ACCRUAL_CCID source_4
, h1.PP_COST_ADJ_CCID source_8
, h1.DISTRIBUTION_TYPE source_10
, h1.TRANSFER_TO_GL_INDICATOR source_18
FROM xla_events_gt xet
, DPP_XLA_INV_HEADERS_V h1
WHERE xet.event_date between p_pad_start_date and p_pad_end_date
and xet.event_class_code = C_EVENT_CLASS_CODE
and xet.event_status_code <> 'N' AND h1.event_id = xet.event_id
ORDER BY event_id
;
SELECT /*+ leading(xet) cardinality(xet,1) */
-- Event Class Code: COST_UPDATE
xet.entity_id
,xet.legal_entity_id
,xet.entity_code
,xet.transaction_number
,xet.event_id
,xet.event_class_code
,xet.event_type_code
,xet.event_number
,xet.event_date
,xet.transaction_date
,xet.reference_num_1
,xet.reference_num_2
,xet.reference_num_3
,xet.reference_num_4
,xet.reference_char_1
,xet.reference_char_2
,xet.reference_char_3
,xet.reference_char_4
,xet.reference_date_1
,xet.reference_date_2
,xet.reference_date_3
,xet.reference_date_4
,xet.event_created_by
,xet.budgetary_control_flag
, l2.LINE_NUMBER
, l2.ITEM_NUMBER source_3
, l2.DISTRIBUTION_IDENTIFIER source_9
, l2.ENTERED_AMOUNT source_11
, l2.CURRENCY_CODE source_12
, l2.ACCOUNTED_AMOUNT source_13
FROM xla_events_gt xet
, DPP_XLA_INV_LINES_V l2
WHERE xet.event_id between x_first_event_id and x_last_event_id
and xet.event_date between p_pad_start_date and p_pad_end_date
and xet.event_class_code = C_EVENT_CLASS_CODE
and xet.event_status_code <> 'N' AND l2.event_id = xet.event_id
;
g_array_event.DELETE;
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus (p_hdr_idx => hdr_idx);
l_result := XLA_AE_LINES_PKG.InsertLines;
l_result := XLA_AE_LINES_PKG.InsertLines ;
l_result := XLA_AE_HEADER_PKG.InsertHeaders ;
PROCEDURE insert_sources_19(
p_target_ledger_id IN NUMBER
, p_language IN VARCHAR2
, p_sla_ledger_id IN NUMBER
, p_pad_start_date IN DATE
, p_pad_end_date IN DATE
)
IS
C_EVENT_TYPE_CODE CONSTANT VARCHAR2(30) := 'CUST_CLAIM';
l_log_module := C_DEFAULT_MODULE||'.insert_sources_19';
(p_msg => 'BEGIN of insert_sources_19'
,p_level => C_LEVEL_PROCEDURE
,p_module => l_log_module);
SELECT oracle_username
INTO p_apps_owner
FROM fnd_oracle_userid
WHERE read_only_flag = 'U'
;
INSERT INTO xla_diag_sources --hdr1
(
event_id
, ledger_id
, sla_ledger_id
, description_language
, object_name
, object_type_code
, line_number
, source_application_id
, source_type_code
, source_code
, source_value
, source_meaning
, created_by
, creation_date
, last_update_date
, last_updated_by
, last_update_login
, program_update_date
, program_application_id
, program_id
, request_id
)
SELECT
event_id
, p_target_ledger_id
, p_sla_ledger_id
, p_language
, object_name
, object_type_code
, line_number
, source_application_id
, source_type_code
, source_code
, SUBSTR(source_value ,1,1996)
, SUBSTR(source_meaning,1,200)
, xla_environment_pkg.g_Usr_Id
, TRUNC(SYSDATE)
, TRUNC(SYSDATE)
, xla_environment_pkg.g_Usr_Id
, xla_environment_pkg.g_Login_Id
, TRUNC(SYSDATE)
, xla_environment_pkg.g_Prog_Appl_Id
, xla_environment_pkg.g_Prog_Id
, xla_environment_pkg.g_Req_Id
FROM (
SELECT xet.event_id event_id
, 0 line_number
, CASE r
WHEN 1 THEN 'DPP_XLA_CLAIM_HEADERS_V'
WHEN 2 THEN 'DPP_XLA_CLAIM_HEADERS_V'
WHEN 3 THEN 'DPP_XLA_CLAIM_HEADERS_V'
WHEN 4 THEN 'DPP_XLA_CLAIM_HEADERS_V'
WHEN 5 THEN 'DPP_XLA_CLAIM_HEADERS_V'
WHEN 6 THEN 'DPP_XLA_CLAIM_HEADERS_V'
WHEN 7 THEN 'DPP_XLA_CLAIM_HEADERS_V'
ELSE null
END object_name
, CASE r
WHEN 1 THEN 'HEADER'
WHEN 2 THEN 'HEADER'
WHEN 3 THEN 'HEADER'
WHEN 4 THEN 'HEADER'
WHEN 5 THEN 'HEADER'
WHEN 6 THEN 'HEADER'
WHEN 7 THEN 'HEADER'
ELSE null
END object_type_code
, CASE r
WHEN 1 THEN '9000'
WHEN 2 THEN '9000'
WHEN 3 THEN '9000'
WHEN 4 THEN '9000'
WHEN 5 THEN '9000'
WHEN 6 THEN '9000'
WHEN 7 THEN '9000'
ELSE null
END source_application_id
, 'S' source_type_code
, CASE r
WHEN 1 THEN 'PP_TXN_NUMBER'
WHEN 2 THEN 'PP_AR_CLEARING_CCID'
WHEN 3 THEN 'PP_CONTRA_LIAB_CCID'
WHEN 4 THEN 'DISTRIBUTION_TYPE'
WHEN 5 THEN 'PARTY_ID'
WHEN 6 THEN 'PARTY_SITE_ID'
WHEN 7 THEN 'PARTY_TYPE'
ELSE null
END source_code
, CASE r
WHEN 1 THEN TO_CHAR(h1.PP_TXN_NUMBER)
WHEN 2 THEN TO_CHAR(h1.PP_AR_CLEARING_CCID)
WHEN 3 THEN TO_CHAR(h1.PP_CONTRA_LIAB_CCID)
WHEN 4 THEN TO_CHAR(h1.DISTRIBUTION_TYPE)
WHEN 5 THEN TO_CHAR(h1.PARTY_ID)
WHEN 6 THEN TO_CHAR(h1.PARTY_SITE_ID)
WHEN 7 THEN TO_CHAR(h1.PARTY_TYPE)
ELSE null
END source_value
, null source_meaning
FROM xla_events_gt xet
, DPP_XLA_CLAIM_HEADERS_V h1
,(select rownum r from all_objects where rownum <= 7 and owner = p_apps_owner)
WHERE xet.event_date between p_pad_start_date AND p_pad_end_date
AND xet.event_type_code = C_EVENT_TYPE_CODE
AND h1.event_id = xet.event_id
)
;
(p_msg => 'number of header sources inserted = '||SQL%ROWCOUNT
,p_level => C_LEVEL_STATEMENT
,p_module => l_log_module);
INSERT INTO xla_diag_sources --line1
(
event_id
, ledger_id
, sla_ledger_id
, description_language
, object_name
, object_type_code
, line_number
, source_application_id
, source_type_code
, source_code
, source_value
, source_meaning
, created_by
, creation_date
, last_update_date
, last_updated_by
, last_update_login
, program_update_date
, program_application_id
, program_id
, request_id
)
SELECT event_id
, p_target_ledger_id
, p_sla_ledger_id
, p_language
, object_name
, object_type_code
, line_number
, source_application_id
, source_type_code
, source_code
, SUBSTR(source_value,1,1996)
, SUBSTR(source_meaning,1,200)
, xla_environment_pkg.g_Usr_Id
, TRUNC(SYSDATE)
, TRUNC(SYSDATE)
, xla_environment_pkg.g_Usr_Id
, xla_environment_pkg.g_Login_Id
, TRUNC(SYSDATE)
, xla_environment_pkg.g_Prog_Appl_Id
, xla_environment_pkg.g_Prog_Id
, xla_environment_pkg.g_Req_Id
FROM (
SELECT xet.event_id event_id
, l2.line_number line_number
, CASE r
WHEN 1 THEN 'DPP_XLA_CLAIM_LINES_V'
WHEN 2 THEN 'DPP_XLA_CLAIM_LINES_V'
WHEN 3 THEN 'DPP_XLA_CLAIM_LINES_V'
WHEN 4 THEN 'DPP_XLA_CLAIM_LINES_V'
WHEN 5 THEN 'DPP_XLA_CLAIM_LINES_V'
WHEN 6 THEN 'DPP_XLA_CLAIM_LINES_V'
ELSE null
END object_name
, CASE r
WHEN 1 THEN 'LINE'
WHEN 2 THEN 'LINE'
WHEN 3 THEN 'LINE'
WHEN 4 THEN 'LINE'
WHEN 5 THEN 'LINE'
WHEN 6 THEN 'LINE'
ELSE null
END object_type_code
, CASE r
WHEN 1 THEN '9000'
WHEN 2 THEN '9000'
WHEN 3 THEN '9000'
WHEN 4 THEN '9000'
WHEN 5 THEN '9000'
WHEN 6 THEN '9000'
ELSE null
END source_application_id
, 'S' source_type_code
, CASE r
WHEN 1 THEN 'CLAIM_NUMBER'
WHEN 2 THEN 'ITEM_NUMBER'
WHEN 3 THEN 'DISTRIBUTION_IDENTIFIER'
WHEN 4 THEN 'ENTERED_AMOUNT'
WHEN 5 THEN 'CURRENCY_CODE'
WHEN 6 THEN 'ACCOUNTED_AMOUNT'
ELSE null
END source_code
, CASE r
WHEN 1 THEN TO_CHAR(l2.CLAIM_NUMBER)
WHEN 2 THEN TO_CHAR(l2.ITEM_NUMBER)
WHEN 3 THEN TO_CHAR(l2.DISTRIBUTION_IDENTIFIER)
WHEN 4 THEN TO_CHAR(l2.ENTERED_AMOUNT)
WHEN 5 THEN TO_CHAR(l2.CURRENCY_CODE)
WHEN 6 THEN TO_CHAR(l2.ACCOUNTED_AMOUNT)
ELSE null
END source_value
, null source_meaning
FROM xla_events_gt xet
, DPP_XLA_CLAIM_LINES_V l2
,(select rownum r from all_objects where rownum <= 6 and owner = p_apps_owner)
WHERE xet.event_date between p_pad_start_date AND p_pad_end_date
AND xet.event_type_code = C_EVENT_TYPE_CODE
AND l2.event_id = xet.event_id
)
;
(p_msg => 'number of line sources inserted = '||SQL%ROWCOUNT
,p_level => C_LEVEL_STATEMENT
,p_module => l_log_module);
(p_msg => 'END of insert_sources_19'
,p_level => C_LEVEL_PROCEDURE
,p_module => l_log_module);
(p_location => 'XLA_09000_AAD_S_000015_PKG.insert_sources_19');
END insert_sources_19;
SELECT /*+ leading(xet) cardinality(xet,1) */
-- Event Type Code: CUST_CLAIM
-- Event Class Code: CLAIM_SETTLEMENT
xet.entity_id
, xet.legal_entity_id
, xet.entity_code
, xet.transaction_number
, xet.event_id
, xet.event_class_code
, xet.event_type_code
, xet.event_number
, xet.event_date
, xet.transaction_date
, xet.reference_num_1
, xet.reference_num_2
, xet.reference_num_3
, xet.reference_num_4
, xet.reference_char_1
, xet.reference_char_2
, xet.reference_char_3
, xet.reference_char_4
, xet.reference_date_1
, xet.reference_date_2
, xet.reference_date_3
, xet.reference_date_4
, xet.event_created_by
, xet.budgetary_control_flag
, h1.PP_TXN_NUMBER source_1
, h1.PP_AR_CLEARING_CCID source_6
, h1.PP_CONTRA_LIAB_CCID source_7
, h1.DISTRIBUTION_TYPE source_10
, h1.PARTY_ID source_14
, h1.PARTY_SITE_ID source_15
, h1.PARTY_TYPE source_16
FROM xla_events_gt xet
, DPP_XLA_CLAIM_HEADERS_V h1
WHERE xet.event_date between p_pad_start_date and p_pad_end_date
and xet.event_type_code = C_EVENT_TYPE_CODE
and xet.event_status_code <> 'N' AND h1.event_id = xet.event_id
ORDER BY event_id
;
SELECT /*+ leading(xet) cardinality(xet,1) */
-- Event Type Code: CUST_CLAIM
-- Event Class Code: CLAIM_SETTLEMENT
xet.entity_id
,xet.legal_entity_id
,xet.entity_code
,xet.transaction_number
,xet.event_id
,xet.event_class_code
,xet.event_type_code
,xet.event_number
,xet.event_date
,xet.transaction_date
,xet.reference_num_1
,xet.reference_num_2
,xet.reference_num_3
,xet.reference_num_4
,xet.reference_char_1
,xet.reference_char_2
,xet.reference_char_3
,xet.reference_char_4
,xet.reference_date_1
,xet.reference_date_2
,xet.reference_date_3
,xet.reference_date_4
,xet.event_created_by
,xet.budgetary_control_flag , l2.LINE_NUMBER
, l2.CLAIM_NUMBER source_2
, l2.ITEM_NUMBER source_3
, l2.DISTRIBUTION_IDENTIFIER source_9
, l2.ENTERED_AMOUNT source_11
, l2.CURRENCY_CODE source_12
, l2.ACCOUNTED_AMOUNT source_13
FROM xla_events_gt xet
, DPP_XLA_CLAIM_LINES_V l2
WHERE xet.event_id between x_first_event_id and x_last_event_id
and xet.event_date between p_pad_start_date and p_pad_end_date
and xet.event_type_code = C_EVENT_TYPE_CODE
and xet.event_status_code <> 'N' AND l2.event_id = xet.event_id
;
g_array_event.DELETE;
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus (p_hdr_idx => hdr_idx);
l_result := XLA_AE_LINES_PKG.InsertLines;
l_result := XLA_AE_LINES_PKG.InsertLines ;
l_result := XLA_AE_HEADER_PKG.InsertHeaders ;
PROCEDURE insert_sources_20(
p_target_ledger_id IN NUMBER
, p_language IN VARCHAR2
, p_sla_ledger_id IN NUMBER
, p_pad_start_date IN DATE
, p_pad_end_date IN DATE
)
IS
C_EVENT_TYPE_CODE CONSTANT VARCHAR2(30) := 'SUPPLIER_CUST_CLAIM';
l_log_module := C_DEFAULT_MODULE||'.insert_sources_20';
(p_msg => 'BEGIN of insert_sources_20'
,p_level => C_LEVEL_PROCEDURE
,p_module => l_log_module);
SELECT oracle_username
INTO p_apps_owner
FROM fnd_oracle_userid
WHERE read_only_flag = 'U'
;
INSERT INTO xla_diag_sources --hdr1
(
event_id
, ledger_id
, sla_ledger_id
, description_language
, object_name
, object_type_code
, line_number
, source_application_id
, source_type_code
, source_code
, source_value
, source_meaning
, created_by
, creation_date
, last_update_date
, last_updated_by
, last_update_login
, program_update_date
, program_application_id
, program_id
, request_id
)
SELECT
event_id
, p_target_ledger_id
, p_sla_ledger_id
, p_language
, object_name
, object_type_code
, line_number
, source_application_id
, source_type_code
, source_code
, SUBSTR(source_value ,1,1996)
, SUBSTR(source_meaning,1,200)
, xla_environment_pkg.g_Usr_Id
, TRUNC(SYSDATE)
, TRUNC(SYSDATE)
, xla_environment_pkg.g_Usr_Id
, xla_environment_pkg.g_Login_Id
, TRUNC(SYSDATE)
, xla_environment_pkg.g_Prog_Appl_Id
, xla_environment_pkg.g_Prog_Id
, xla_environment_pkg.g_Req_Id
FROM (
SELECT xet.event_id event_id
, 0 line_number
, CASE r
WHEN 1 THEN 'DPP_XLA_CLAIM_HEADERS_V'
WHEN 2 THEN 'DPP_XLA_CLAIM_HEADERS_V'
WHEN 3 THEN 'DPP_XLA_CLAIM_HEADERS_V'
WHEN 4 THEN 'DPP_XLA_CLAIM_HEADERS_V'
WHEN 5 THEN 'DPP_XLA_CLAIM_HEADERS_V'
WHEN 6 THEN 'DPP_XLA_CLAIM_HEADERS_V'
ELSE null
END object_name
, CASE r
WHEN 1 THEN 'HEADER'
WHEN 2 THEN 'HEADER'
WHEN 3 THEN 'HEADER'
WHEN 4 THEN 'HEADER'
WHEN 5 THEN 'HEADER'
WHEN 6 THEN 'HEADER'
ELSE null
END object_type_code
, CASE r
WHEN 1 THEN '9000'
WHEN 2 THEN '9000'
WHEN 3 THEN '9000'
WHEN 4 THEN '9000'
WHEN 5 THEN '9000'
WHEN 6 THEN '9000'
ELSE null
END source_application_id
, 'S' source_type_code
, CASE r
WHEN 1 THEN 'PP_AP_CLEARING_CCID'
WHEN 2 THEN 'PP_CONTRA_LIAB_CCID'
WHEN 3 THEN 'DISTRIBUTION_TYPE'
WHEN 4 THEN 'PARTY_ID'
WHEN 5 THEN 'PARTY_SITE_ID'
WHEN 6 THEN 'PARTY_TYPE'
ELSE null
END source_code
, CASE r
WHEN 1 THEN TO_CHAR(h1.PP_AP_CLEARING_CCID)
WHEN 2 THEN TO_CHAR(h1.PP_CONTRA_LIAB_CCID)
WHEN 3 THEN TO_CHAR(h1.DISTRIBUTION_TYPE)
WHEN 4 THEN TO_CHAR(h1.PARTY_ID)
WHEN 5 THEN TO_CHAR(h1.PARTY_SITE_ID)
WHEN 6 THEN TO_CHAR(h1.PARTY_TYPE)
ELSE null
END source_value
, null source_meaning
FROM xla_events_gt xet
, DPP_XLA_CLAIM_HEADERS_V h1
,(select rownum r from all_objects where rownum <= 6 and owner = p_apps_owner)
WHERE xet.event_date between p_pad_start_date AND p_pad_end_date
AND xet.event_type_code = C_EVENT_TYPE_CODE
AND h1.event_id = xet.event_id
)
;
(p_msg => 'number of header sources inserted = '||SQL%ROWCOUNT
,p_level => C_LEVEL_STATEMENT
,p_module => l_log_module);
INSERT INTO xla_diag_sources --line1
(
event_id
, ledger_id
, sla_ledger_id
, description_language
, object_name
, object_type_code
, line_number
, source_application_id
, source_type_code
, source_code
, source_value
, source_meaning
, created_by
, creation_date
, last_update_date
, last_updated_by
, last_update_login
, program_update_date
, program_application_id
, program_id
, request_id
)
SELECT event_id
, p_target_ledger_id
, p_sla_ledger_id
, p_language
, object_name
, object_type_code
, line_number
, source_application_id
, source_type_code
, source_code
, SUBSTR(source_value,1,1996)
, SUBSTR(source_meaning,1,200)
, xla_environment_pkg.g_Usr_Id
, TRUNC(SYSDATE)
, TRUNC(SYSDATE)
, xla_environment_pkg.g_Usr_Id
, xla_environment_pkg.g_Login_Id
, TRUNC(SYSDATE)
, xla_environment_pkg.g_Prog_Appl_Id
, xla_environment_pkg.g_Prog_Id
, xla_environment_pkg.g_Req_Id
FROM (
SELECT xet.event_id event_id
, l2.line_number line_number
, CASE r
WHEN 1 THEN 'DPP_XLA_CLAIM_LINES_V'
WHEN 2 THEN 'DPP_XLA_CLAIM_LINES_V'
WHEN 3 THEN 'DPP_XLA_CLAIM_LINES_V'
WHEN 4 THEN 'DPP_XLA_CLAIM_LINES_V'
ELSE null
END object_name
, CASE r
WHEN 1 THEN 'LINE'
WHEN 2 THEN 'LINE'
WHEN 3 THEN 'LINE'
WHEN 4 THEN 'LINE'
ELSE null
END object_type_code
, CASE r
WHEN 1 THEN '9000'
WHEN 2 THEN '9000'
WHEN 3 THEN '9000'
WHEN 4 THEN '9000'
ELSE null
END source_application_id
, 'S' source_type_code
, CASE r
WHEN 1 THEN 'DISTRIBUTION_IDENTIFIER'
WHEN 2 THEN 'ENTERED_AMOUNT'
WHEN 3 THEN 'CURRENCY_CODE'
WHEN 4 THEN 'ACCOUNTED_AMOUNT'
ELSE null
END source_code
, CASE r
WHEN 1 THEN TO_CHAR(l2.DISTRIBUTION_IDENTIFIER)
WHEN 2 THEN TO_CHAR(l2.ENTERED_AMOUNT)
WHEN 3 THEN TO_CHAR(l2.CURRENCY_CODE)
WHEN 4 THEN TO_CHAR(l2.ACCOUNTED_AMOUNT)
ELSE null
END source_value
, null source_meaning
FROM xla_events_gt xet
, DPP_XLA_CLAIM_LINES_V l2
,(select rownum r from all_objects where rownum <= 4 and owner = p_apps_owner)
WHERE xet.event_date between p_pad_start_date AND p_pad_end_date
AND xet.event_type_code = C_EVENT_TYPE_CODE
AND l2.event_id = xet.event_id
)
;
(p_msg => 'number of line sources inserted = '||SQL%ROWCOUNT
,p_level => C_LEVEL_STATEMENT
,p_module => l_log_module);
(p_msg => 'END of insert_sources_20'
,p_level => C_LEVEL_PROCEDURE
,p_module => l_log_module);
(p_location => 'XLA_09000_AAD_S_000015_PKG.insert_sources_20');
END insert_sources_20;
SELECT /*+ leading(xet) cardinality(xet,1) */
-- Event Type Code: SUPPLIER_CUST_CLAIM
-- Event Class Code: CLAIM_SETTLEMENT
xet.entity_id
, xet.legal_entity_id
, xet.entity_code
, xet.transaction_number
, xet.event_id
, xet.event_class_code
, xet.event_type_code
, xet.event_number
, xet.event_date
, xet.transaction_date
, xet.reference_num_1
, xet.reference_num_2
, xet.reference_num_3
, xet.reference_num_4
, xet.reference_char_1
, xet.reference_char_2
, xet.reference_char_3
, xet.reference_char_4
, xet.reference_date_1
, xet.reference_date_2
, xet.reference_date_3
, xet.reference_date_4
, xet.event_created_by
, xet.budgetary_control_flag
, h1.PP_AP_CLEARING_CCID source_5
, h1.PP_CONTRA_LIAB_CCID source_7
, h1.DISTRIBUTION_TYPE source_10
, h1.PARTY_ID source_14
, h1.PARTY_SITE_ID source_15
, h1.PARTY_TYPE source_16
FROM xla_events_gt xet
, DPP_XLA_CLAIM_HEADERS_V h1
WHERE xet.event_date between p_pad_start_date and p_pad_end_date
and xet.event_type_code = C_EVENT_TYPE_CODE
and xet.event_status_code <> 'N' AND h1.event_id = xet.event_id
ORDER BY event_id
;
SELECT /*+ leading(xet) cardinality(xet,1) */
-- Event Type Code: SUPPLIER_CUST_CLAIM
-- Event Class Code: CLAIM_SETTLEMENT
xet.entity_id
,xet.legal_entity_id
,xet.entity_code
,xet.transaction_number
,xet.event_id
,xet.event_class_code
,xet.event_type_code
,xet.event_number
,xet.event_date
,xet.transaction_date
,xet.reference_num_1
,xet.reference_num_2
,xet.reference_num_3
,xet.reference_num_4
,xet.reference_char_1
,xet.reference_char_2
,xet.reference_char_3
,xet.reference_char_4
,xet.reference_date_1
,xet.reference_date_2
,xet.reference_date_3
,xet.reference_date_4
,xet.event_created_by
,xet.budgetary_control_flag , l2.LINE_NUMBER
, l2.DISTRIBUTION_IDENTIFIER source_9
, l2.ENTERED_AMOUNT source_11
, l2.CURRENCY_CODE source_12
, l2.ACCOUNTED_AMOUNT source_13
FROM xla_events_gt xet
, DPP_XLA_CLAIM_LINES_V l2
WHERE xet.event_id between x_first_event_id and x_last_event_id
and xet.event_date between p_pad_start_date and p_pad_end_date
and xet.event_type_code = C_EVENT_TYPE_CODE
and xet.event_status_code <> 'N' AND l2.event_id = xet.event_id
;
g_array_event.DELETE;
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus (p_hdr_idx => hdr_idx);
l_result := XLA_AE_LINES_PKG.InsertLines;
l_result := XLA_AE_LINES_PKG.InsertLines ;
l_result := XLA_AE_HEADER_PKG.InsertHeaders ;
PROCEDURE insert_sources_21(
p_target_ledger_id IN NUMBER
, p_language IN VARCHAR2
, p_sla_ledger_id IN NUMBER
, p_pad_start_date IN DATE
, p_pad_end_date IN DATE
)
IS
C_EVENT_TYPE_CODE CONSTANT VARCHAR2(30) := 'SUPPLIER_DSTR_CLAIM';
l_log_module := C_DEFAULT_MODULE||'.insert_sources_21';
(p_msg => 'BEGIN of insert_sources_21'
,p_level => C_LEVEL_PROCEDURE
,p_module => l_log_module);
SELECT oracle_username
INTO p_apps_owner
FROM fnd_oracle_userid
WHERE read_only_flag = 'U'
;
INSERT INTO xla_diag_sources --hdr1
(
event_id
, ledger_id
, sla_ledger_id
, description_language
, object_name
, object_type_code
, line_number
, source_application_id
, source_type_code
, source_code
, source_value
, source_meaning
, created_by
, creation_date
, last_update_date
, last_updated_by
, last_update_login
, program_update_date
, program_application_id
, program_id
, request_id
)
SELECT
event_id
, p_target_ledger_id
, p_sla_ledger_id
, p_language
, object_name
, object_type_code
, line_number
, source_application_id
, source_type_code
, source_code
, SUBSTR(source_value ,1,1996)
, SUBSTR(source_meaning,1,200)
, xla_environment_pkg.g_Usr_Id
, TRUNC(SYSDATE)
, TRUNC(SYSDATE)
, xla_environment_pkg.g_Usr_Id
, xla_environment_pkg.g_Login_Id
, TRUNC(SYSDATE)
, xla_environment_pkg.g_Prog_Appl_Id
, xla_environment_pkg.g_Prog_Id
, xla_environment_pkg.g_Req_Id
FROM (
SELECT xet.event_id event_id
, 0 line_number
, CASE r
WHEN 1 THEN 'DPP_XLA_CLAIM_HEADERS_V'
WHEN 2 THEN 'DPP_XLA_CLAIM_HEADERS_V'
WHEN 3 THEN 'DPP_XLA_CLAIM_HEADERS_V'
WHEN 4 THEN 'DPP_XLA_CLAIM_HEADERS_V'
WHEN 5 THEN 'DPP_XLA_CLAIM_HEADERS_V'
WHEN 6 THEN 'DPP_XLA_CLAIM_HEADERS_V'
WHEN 7 THEN 'DPP_XLA_CLAIM_HEADERS_V'
ELSE null
END object_name
, CASE r
WHEN 1 THEN 'HEADER'
WHEN 2 THEN 'HEADER'
WHEN 3 THEN 'HEADER'
WHEN 4 THEN 'HEADER'
WHEN 5 THEN 'HEADER'
WHEN 6 THEN 'HEADER'
WHEN 7 THEN 'HEADER'
ELSE null
END object_type_code
, CASE r
WHEN 1 THEN '9000'
WHEN 2 THEN '9000'
WHEN 3 THEN '9000'
WHEN 4 THEN '9000'
WHEN 5 THEN '9000'
WHEN 6 THEN '9000'
WHEN 7 THEN '9000'
ELSE null
END source_application_id
, 'S' source_type_code
, CASE r
WHEN 1 THEN 'PP_TXN_NUMBER'
WHEN 2 THEN 'PP_ACCRUAL_CCID'
WHEN 3 THEN 'PP_AP_CLEARING_CCID'
WHEN 4 THEN 'DISTRIBUTION_TYPE'
WHEN 5 THEN 'PARTY_ID'
WHEN 6 THEN 'PARTY_SITE_ID'
WHEN 7 THEN 'PARTY_TYPE'
ELSE null
END source_code
, CASE r
WHEN 1 THEN TO_CHAR(h1.PP_TXN_NUMBER)
WHEN 2 THEN TO_CHAR(h1.PP_ACCRUAL_CCID)
WHEN 3 THEN TO_CHAR(h1.PP_AP_CLEARING_CCID)
WHEN 4 THEN TO_CHAR(h1.DISTRIBUTION_TYPE)
WHEN 5 THEN TO_CHAR(h1.PARTY_ID)
WHEN 6 THEN TO_CHAR(h1.PARTY_SITE_ID)
WHEN 7 THEN TO_CHAR(h1.PARTY_TYPE)
ELSE null
END source_value
, null source_meaning
FROM xla_events_gt xet
, DPP_XLA_CLAIM_HEADERS_V h1
,(select rownum r from all_objects where rownum <= 7 and owner = p_apps_owner)
WHERE xet.event_date between p_pad_start_date AND p_pad_end_date
AND xet.event_type_code = C_EVENT_TYPE_CODE
AND h1.event_id = xet.event_id
)
;
(p_msg => 'number of header sources inserted = '||SQL%ROWCOUNT
,p_level => C_LEVEL_STATEMENT
,p_module => l_log_module);
INSERT INTO xla_diag_sources --line1
(
event_id
, ledger_id
, sla_ledger_id
, description_language
, object_name
, object_type_code
, line_number
, source_application_id
, source_type_code
, source_code
, source_value
, source_meaning
, created_by
, creation_date
, last_update_date
, last_updated_by
, last_update_login
, program_update_date
, program_application_id
, program_id
, request_id
)
SELECT event_id
, p_target_ledger_id
, p_sla_ledger_id
, p_language
, object_name
, object_type_code
, line_number
, source_application_id
, source_type_code
, source_code
, SUBSTR(source_value,1,1996)
, SUBSTR(source_meaning,1,200)
, xla_environment_pkg.g_Usr_Id
, TRUNC(SYSDATE)
, TRUNC(SYSDATE)
, xla_environment_pkg.g_Usr_Id
, xla_environment_pkg.g_Login_Id
, TRUNC(SYSDATE)
, xla_environment_pkg.g_Prog_Appl_Id
, xla_environment_pkg.g_Prog_Id
, xla_environment_pkg.g_Req_Id
FROM (
SELECT xet.event_id event_id
, l2.line_number line_number
, CASE r
WHEN 1 THEN 'DPP_XLA_CLAIM_LINES_V'
WHEN 2 THEN 'DPP_XLA_CLAIM_LINES_V'
WHEN 3 THEN 'DPP_XLA_CLAIM_LINES_V'
WHEN 4 THEN 'DPP_XLA_CLAIM_LINES_V'
WHEN 5 THEN 'DPP_XLA_CLAIM_LINES_V'
WHEN 6 THEN 'DPP_XLA_CLAIM_LINES_V'
ELSE null
END object_name
, CASE r
WHEN 1 THEN 'LINE'
WHEN 2 THEN 'LINE'
WHEN 3 THEN 'LINE'
WHEN 4 THEN 'LINE'
WHEN 5 THEN 'LINE'
WHEN 6 THEN 'LINE'
ELSE null
END object_type_code
, CASE r
WHEN 1 THEN '9000'
WHEN 2 THEN '9000'
WHEN 3 THEN '9000'
WHEN 4 THEN '9000'
WHEN 5 THEN '9000'
WHEN 6 THEN '9000'
ELSE null
END source_application_id
, 'S' source_type_code
, CASE r
WHEN 1 THEN 'CLAIM_NUMBER'
WHEN 2 THEN 'ITEM_NUMBER'
WHEN 3 THEN 'DISTRIBUTION_IDENTIFIER'
WHEN 4 THEN 'ENTERED_AMOUNT'
WHEN 5 THEN 'CURRENCY_CODE'
WHEN 6 THEN 'ACCOUNTED_AMOUNT'
ELSE null
END source_code
, CASE r
WHEN 1 THEN TO_CHAR(l2.CLAIM_NUMBER)
WHEN 2 THEN TO_CHAR(l2.ITEM_NUMBER)
WHEN 3 THEN TO_CHAR(l2.DISTRIBUTION_IDENTIFIER)
WHEN 4 THEN TO_CHAR(l2.ENTERED_AMOUNT)
WHEN 5 THEN TO_CHAR(l2.CURRENCY_CODE)
WHEN 6 THEN TO_CHAR(l2.ACCOUNTED_AMOUNT)
ELSE null
END source_value
, null source_meaning
FROM xla_events_gt xet
, DPP_XLA_CLAIM_LINES_V l2
,(select rownum r from all_objects where rownum <= 6 and owner = p_apps_owner)
WHERE xet.event_date between p_pad_start_date AND p_pad_end_date
AND xet.event_type_code = C_EVENT_TYPE_CODE
AND l2.event_id = xet.event_id
)
;
(p_msg => 'number of line sources inserted = '||SQL%ROWCOUNT
,p_level => C_LEVEL_STATEMENT
,p_module => l_log_module);
(p_msg => 'END of insert_sources_21'
,p_level => C_LEVEL_PROCEDURE
,p_module => l_log_module);
(p_location => 'XLA_09000_AAD_S_000015_PKG.insert_sources_21');
END insert_sources_21;
SELECT /*+ leading(xet) cardinality(xet,1) */
-- Event Type Code: SUPPLIER_DSTR_CLAIM
-- Event Class Code: CLAIM_SETTLEMENT
xet.entity_id
, xet.legal_entity_id
, xet.entity_code
, xet.transaction_number
, xet.event_id
, xet.event_class_code
, xet.event_type_code
, xet.event_number
, xet.event_date
, xet.transaction_date
, xet.reference_num_1
, xet.reference_num_2
, xet.reference_num_3
, xet.reference_num_4
, xet.reference_char_1
, xet.reference_char_2
, xet.reference_char_3
, xet.reference_char_4
, xet.reference_date_1
, xet.reference_date_2
, xet.reference_date_3
, xet.reference_date_4
, xet.event_created_by
, xet.budgetary_control_flag
, h1.PP_TXN_NUMBER source_1
, h1.PP_ACCRUAL_CCID source_4
, h1.PP_AP_CLEARING_CCID source_5
, h1.DISTRIBUTION_TYPE source_10
, h1.PARTY_ID source_14
, h1.PARTY_SITE_ID source_15
, h1.PARTY_TYPE source_16
FROM xla_events_gt xet
, DPP_XLA_CLAIM_HEADERS_V h1
WHERE xet.event_date between p_pad_start_date and p_pad_end_date
and xet.event_type_code = C_EVENT_TYPE_CODE
and xet.event_status_code <> 'N' AND h1.event_id = xet.event_id
ORDER BY event_id
;
SELECT /*+ leading(xet) cardinality(xet,1) */
-- Event Type Code: SUPPLIER_DSTR_CLAIM
-- Event Class Code: CLAIM_SETTLEMENT
xet.entity_id
,xet.legal_entity_id
,xet.entity_code
,xet.transaction_number
,xet.event_id
,xet.event_class_code
,xet.event_type_code
,xet.event_number
,xet.event_date
,xet.transaction_date
,xet.reference_num_1
,xet.reference_num_2
,xet.reference_num_3
,xet.reference_num_4
,xet.reference_char_1
,xet.reference_char_2
,xet.reference_char_3
,xet.reference_char_4
,xet.reference_date_1
,xet.reference_date_2
,xet.reference_date_3
,xet.reference_date_4
,xet.event_created_by
,xet.budgetary_control_flag , l2.LINE_NUMBER
, l2.CLAIM_NUMBER source_2
, l2.ITEM_NUMBER source_3
, l2.DISTRIBUTION_IDENTIFIER source_9
, l2.ENTERED_AMOUNT source_11
, l2.CURRENCY_CODE source_12
, l2.ACCOUNTED_AMOUNT source_13
FROM xla_events_gt xet
, DPP_XLA_CLAIM_LINES_V l2
WHERE xet.event_id between x_first_event_id and x_last_event_id
and xet.event_date between p_pad_start_date and p_pad_end_date
and xet.event_type_code = C_EVENT_TYPE_CODE
and xet.event_status_code <> 'N' AND l2.event_id = xet.event_id
;
g_array_event.DELETE;
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus (p_hdr_idx => hdr_idx);
l_result := XLA_AE_LINES_PKG.InsertLines;
l_result := XLA_AE_LINES_PKG.InsertLines ;
l_result := XLA_AE_HEADER_PKG.InsertHeaders ;
PROCEDURE insert_sources_22(
p_target_ledger_id IN NUMBER
, p_language IN VARCHAR2
, p_sla_ledger_id IN NUMBER
, p_pad_start_date IN DATE
, p_pad_end_date IN DATE
)
IS
C_EVENT_TYPE_CODE CONSTANT VARCHAR2(30) := 'SUPPLIER_DSTR_INC_CLAIM';
l_log_module := C_DEFAULT_MODULE||'.insert_sources_22';
(p_msg => 'BEGIN of insert_sources_22'
,p_level => C_LEVEL_PROCEDURE
,p_module => l_log_module);
SELECT oracle_username
INTO p_apps_owner
FROM fnd_oracle_userid
WHERE read_only_flag = 'U'
;
INSERT INTO xla_diag_sources --hdr1
(
event_id
, ledger_id
, sla_ledger_id
, description_language
, object_name
, object_type_code
, line_number
, source_application_id
, source_type_code
, source_code
, source_value
, source_meaning
, created_by
, creation_date
, last_update_date
, last_updated_by
, last_update_login
, program_update_date
, program_application_id
, program_id
, request_id
)
SELECT
event_id
, p_target_ledger_id
, p_sla_ledger_id
, p_language
, object_name
, object_type_code
, line_number
, source_application_id
, source_type_code
, source_code
, SUBSTR(source_value ,1,1996)
, SUBSTR(source_meaning,1,200)
, xla_environment_pkg.g_Usr_Id
, TRUNC(SYSDATE)
, TRUNC(SYSDATE)
, xla_environment_pkg.g_Usr_Id
, xla_environment_pkg.g_Login_Id
, TRUNC(SYSDATE)
, xla_environment_pkg.g_Prog_Appl_Id
, xla_environment_pkg.g_Prog_Id
, xla_environment_pkg.g_Req_Id
FROM (
SELECT xet.event_id event_id
, 0 line_number
, CASE r
WHEN 1 THEN 'DPP_XLA_CLAIM_HEADERS_V'
WHEN 2 THEN 'DPP_XLA_CLAIM_HEADERS_V'
WHEN 3 THEN 'DPP_XLA_CLAIM_HEADERS_V'
WHEN 4 THEN 'DPP_XLA_CLAIM_HEADERS_V'
WHEN 5 THEN 'DPP_XLA_CLAIM_HEADERS_V'
WHEN 6 THEN 'DPP_XLA_CLAIM_HEADERS_V'
WHEN 7 THEN 'DPP_XLA_CLAIM_HEADERS_V'
ELSE null
END object_name
, CASE r
WHEN 1 THEN 'HEADER'
WHEN 2 THEN 'HEADER'
WHEN 3 THEN 'HEADER'
WHEN 4 THEN 'HEADER'
WHEN 5 THEN 'HEADER'
WHEN 6 THEN 'HEADER'
WHEN 7 THEN 'HEADER'
ELSE null
END object_type_code
, CASE r
WHEN 1 THEN '9000'
WHEN 2 THEN '9000'
WHEN 3 THEN '9000'
WHEN 4 THEN '9000'
WHEN 5 THEN '9000'
WHEN 6 THEN '9000'
WHEN 7 THEN '9000'
ELSE null
END source_application_id
, 'S' source_type_code
, CASE r
WHEN 1 THEN 'PP_TXN_NUMBER'
WHEN 2 THEN 'PP_ACCRUAL_CCID'
WHEN 3 THEN 'PP_AP_CLEARING_CCID'
WHEN 4 THEN 'DISTRIBUTION_TYPE'
WHEN 5 THEN 'PARTY_ID'
WHEN 6 THEN 'PARTY_SITE_ID'
WHEN 7 THEN 'PARTY_TYPE'
ELSE null
END source_code
, CASE r
WHEN 1 THEN TO_CHAR(h1.PP_TXN_NUMBER)
WHEN 2 THEN TO_CHAR(h1.PP_ACCRUAL_CCID)
WHEN 3 THEN TO_CHAR(h1.PP_AP_CLEARING_CCID)
WHEN 4 THEN TO_CHAR(h1.DISTRIBUTION_TYPE)
WHEN 5 THEN TO_CHAR(h1.PARTY_ID)
WHEN 6 THEN TO_CHAR(h1.PARTY_SITE_ID)
WHEN 7 THEN TO_CHAR(h1.PARTY_TYPE)
ELSE null
END source_value
, null source_meaning
FROM xla_events_gt xet
, DPP_XLA_CLAIM_HEADERS_V h1
,(select rownum r from all_objects where rownum <= 7 and owner = p_apps_owner)
WHERE xet.event_date between p_pad_start_date AND p_pad_end_date
AND xet.event_type_code = C_EVENT_TYPE_CODE
AND h1.event_id = xet.event_id
)
;
(p_msg => 'number of header sources inserted = '||SQL%ROWCOUNT
,p_level => C_LEVEL_STATEMENT
,p_module => l_log_module);
INSERT INTO xla_diag_sources --line1
(
event_id
, ledger_id
, sla_ledger_id
, description_language
, object_name
, object_type_code
, line_number
, source_application_id
, source_type_code
, source_code
, source_value
, source_meaning
, created_by
, creation_date
, last_update_date
, last_updated_by
, last_update_login
, program_update_date
, program_application_id
, program_id
, request_id
)
SELECT event_id
, p_target_ledger_id
, p_sla_ledger_id
, p_language
, object_name
, object_type_code
, line_number
, source_application_id
, source_type_code
, source_code
, SUBSTR(source_value,1,1996)
, SUBSTR(source_meaning,1,200)
, xla_environment_pkg.g_Usr_Id
, TRUNC(SYSDATE)
, TRUNC(SYSDATE)
, xla_environment_pkg.g_Usr_Id
, xla_environment_pkg.g_Login_Id
, TRUNC(SYSDATE)
, xla_environment_pkg.g_Prog_Appl_Id
, xla_environment_pkg.g_Prog_Id
, xla_environment_pkg.g_Req_Id
FROM (
SELECT xet.event_id event_id
, l2.line_number line_number
, CASE r
WHEN 1 THEN 'DPP_XLA_CLAIM_LINES_V'
WHEN 2 THEN 'DPP_XLA_CLAIM_LINES_V'
WHEN 3 THEN 'DPP_XLA_CLAIM_LINES_V'
WHEN 4 THEN 'DPP_XLA_CLAIM_LINES_V'
WHEN 5 THEN 'DPP_XLA_CLAIM_LINES_V'
WHEN 6 THEN 'DPP_XLA_CLAIM_LINES_V'
ELSE null
END object_name
, CASE r
WHEN 1 THEN 'LINE'
WHEN 2 THEN 'LINE'
WHEN 3 THEN 'LINE'
WHEN 4 THEN 'LINE'
WHEN 5 THEN 'LINE'
WHEN 6 THEN 'LINE'
ELSE null
END object_type_code
, CASE r
WHEN 1 THEN '9000'
WHEN 2 THEN '9000'
WHEN 3 THEN '9000'
WHEN 4 THEN '9000'
WHEN 5 THEN '9000'
WHEN 6 THEN '9000'
ELSE null
END source_application_id
, 'S' source_type_code
, CASE r
WHEN 1 THEN 'CLAIM_NUMBER'
WHEN 2 THEN 'ITEM_NUMBER'
WHEN 3 THEN 'DISTRIBUTION_IDENTIFIER'
WHEN 4 THEN 'ENTERED_AMOUNT'
WHEN 5 THEN 'CURRENCY_CODE'
WHEN 6 THEN 'ACCOUNTED_AMOUNT'
ELSE null
END source_code
, CASE r
WHEN 1 THEN TO_CHAR(l2.CLAIM_NUMBER)
WHEN 2 THEN TO_CHAR(l2.ITEM_NUMBER)
WHEN 3 THEN TO_CHAR(l2.DISTRIBUTION_IDENTIFIER)
WHEN 4 THEN TO_CHAR(l2.ENTERED_AMOUNT)
WHEN 5 THEN TO_CHAR(l2.CURRENCY_CODE)
WHEN 6 THEN TO_CHAR(l2.ACCOUNTED_AMOUNT)
ELSE null
END source_value
, null source_meaning
FROM xla_events_gt xet
, DPP_XLA_CLAIM_LINES_V l2
,(select rownum r from all_objects where rownum <= 6 and owner = p_apps_owner)
WHERE xet.event_date between p_pad_start_date AND p_pad_end_date
AND xet.event_type_code = C_EVENT_TYPE_CODE
AND l2.event_id = xet.event_id
)
;
(p_msg => 'number of line sources inserted = '||SQL%ROWCOUNT
,p_level => C_LEVEL_STATEMENT
,p_module => l_log_module);
(p_msg => 'END of insert_sources_22'
,p_level => C_LEVEL_PROCEDURE
,p_module => l_log_module);
(p_location => 'XLA_09000_AAD_S_000015_PKG.insert_sources_22');
END insert_sources_22;
SELECT /*+ leading(xet) cardinality(xet,1) */
-- Event Type Code: SUPPLIER_DSTR_INC_CLAIM
-- Event Class Code: CLAIM_SETTLEMENT
xet.entity_id
, xet.legal_entity_id
, xet.entity_code
, xet.transaction_number
, xet.event_id
, xet.event_class_code
, xet.event_type_code
, xet.event_number
, xet.event_date
, xet.transaction_date
, xet.reference_num_1
, xet.reference_num_2
, xet.reference_num_3
, xet.reference_num_4
, xet.reference_char_1
, xet.reference_char_2
, xet.reference_char_3
, xet.reference_char_4
, xet.reference_date_1
, xet.reference_date_2
, xet.reference_date_3
, xet.reference_date_4
, xet.event_created_by
, xet.budgetary_control_flag
, h1.PP_TXN_NUMBER source_1
, h1.PP_ACCRUAL_CCID source_4
, h1.PP_AP_CLEARING_CCID source_5
, h1.DISTRIBUTION_TYPE source_10
, h1.PARTY_ID source_14
, h1.PARTY_SITE_ID source_15
, h1.PARTY_TYPE source_16
FROM xla_events_gt xet
, DPP_XLA_CLAIM_HEADERS_V h1
WHERE xet.event_date between p_pad_start_date and p_pad_end_date
and xet.event_type_code = C_EVENT_TYPE_CODE
and xet.event_status_code <> 'N' AND h1.event_id = xet.event_id
ORDER BY event_id
;
SELECT /*+ leading(xet) cardinality(xet,1) */
-- Event Type Code: SUPPLIER_DSTR_INC_CLAIM
-- Event Class Code: CLAIM_SETTLEMENT
xet.entity_id
,xet.legal_entity_id
,xet.entity_code
,xet.transaction_number
,xet.event_id
,xet.event_class_code
,xet.event_type_code
,xet.event_number
,xet.event_date
,xet.transaction_date
,xet.reference_num_1
,xet.reference_num_2
,xet.reference_num_3
,xet.reference_num_4
,xet.reference_char_1
,xet.reference_char_2
,xet.reference_char_3
,xet.reference_char_4
,xet.reference_date_1
,xet.reference_date_2
,xet.reference_date_3
,xet.reference_date_4
,xet.event_created_by
,xet.budgetary_control_flag , l2.LINE_NUMBER
, l2.CLAIM_NUMBER source_2
, l2.ITEM_NUMBER source_3
, l2.DISTRIBUTION_IDENTIFIER source_9
, l2.ENTERED_AMOUNT source_11
, l2.CURRENCY_CODE source_12
, l2.ACCOUNTED_AMOUNT source_13
FROM xla_events_gt xet
, DPP_XLA_CLAIM_LINES_V l2
WHERE xet.event_id between x_first_event_id and x_last_event_id
and xet.event_date between p_pad_start_date and p_pad_end_date
and xet.event_type_code = C_EVENT_TYPE_CODE
and xet.event_status_code <> 'N' AND l2.event_id = xet.event_id
;
g_array_event.DELETE;
XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus (p_hdr_idx => hdr_idx);
l_result := XLA_AE_LINES_PKG.InsertLines;
l_result := XLA_AE_LINES_PKG.InsertLines ;
l_result := XLA_AE_HEADER_PKG.InsertHeaders ;
insert_sources_18(
p_target_ledger_id => p_target_ledger_id
, p_language => l_language
, p_sla_ledger_id => l_sla_ledger_id
, p_pad_start_date => p_pad_start_date
, p_pad_end_date => p_pad_end_date
);
insert_sources_19(
p_target_ledger_id => p_target_ledger_id
, p_language => l_language
, p_sla_ledger_id => l_sla_ledger_id
, p_pad_start_date => p_pad_start_date
, p_pad_end_date => p_pad_end_date
);
insert_sources_20(
p_target_ledger_id => p_target_ledger_id
, p_language => l_language
, p_sla_ledger_id => l_sla_ledger_id
, p_pad_start_date => p_pad_start_date
, p_pad_end_date => p_pad_end_date
);
insert_sources_21(
p_target_ledger_id => p_target_ledger_id
, p_language => l_language
, p_sla_ledger_id => l_sla_ledger_id
, p_pad_start_date => p_pad_start_date
, p_pad_end_date => p_pad_end_date
);
insert_sources_22(
p_target_ledger_id => p_target_ledger_id
, p_language => l_language
, p_sla_ledger_id => l_sla_ledger_id
, p_pad_start_date => p_pad_start_date
, p_pad_end_date => p_pad_end_date
);