The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT DECODE(tryb.accounting_event_class_code
,'ACCRUAL', 'TRANSACTIONS'
,'GENERAL_LOSS_PROVISION', 'TRANSACTIONS'
,'SPECIFIC_LOSS_PROVISION', 'TRANSACTIONS'
,'RECEIPT_APPLICATION', 'TRANSACTIONS'
,'PRINCIPAL_ADJUSTMENT', 'TRANSACTIONS'
,'EVERGREEN', 'CONTRACTS'
,'BOOKING', 'CONTRACTS'
,'REBOOK', 'CONTRACTS'
,'RE_LEASE', 'CONTRACTS'
,'TERMINATION', 'CONTRACTS'
,'UPFRONT_TAX', 'CONTRACTS'
,'ASSET_DISPOSITION', 'CONTRACTS'
,'SPLIT_ASSET', 'CONTRACTS'
,'INVESTOR', 'INVESTOR_AGREEMENTS'
,'UNKNOWN') entity_type_code,
tryb.accounting_event_class_code
INTO l_entity_type_code,
l_event_class_code
FROM okl_trx_types_b tryb
WHERE tryb.id = p_try_id;
SELECT name
INTO l_trx_type_name
FROM okl_trx_types_tl
WHERE id = p_try_id
AND LANGUAGE = USERENV('LANG');
SELECT set_of_books_id,
legal_entity_id,
trunc(date_transaction_occurred) transaction_date,
trunc(canceled_date) cancelled_date,
trx_number,
try_id
FROM okl_trx_contracts
WHERE id = p_tcn_id;
PROCEDURE update_event_status(
p_api_version IN NUMBER
,p_init_msg_list IN VARCHAR2
,x_return_status OUT NOCOPY VARCHAR2
,x_msg_count OUT NOCOPY NUMBER
,x_msg_data OUT NOCOPY VARCHAR2
,p_tcn_id IN NUMBER
,p_gl_date IN DATE
,p_action_type IN VARCHAR2
,p_representation_code IN VARCHAR2
,p_event_status_code IN VARCHAR2) IS
CURSOR get_tcn_csr is
SELECT set_of_books_id,
legal_entity_id,
TRUNC(date_transaction_occurred) transaction_date,
TRUNC(canceled_date) cancelled_date,
trx_number,
try_id
FROM okl_trx_contracts
WHERE id = p_tcn_id;
l_api_name VARCHAR2(30) := 'UPDATE_EVENT_STATUS';
l_sla_api_name := 'UPDATE_EVENT_STATUS';
xla_events_pub_pkg.update_event_status(p_event_source_info => l_event_source_info
,p_event_class_code => l_event_class_code
,p_event_type_code => l_event_type_code
,p_event_date => p_gl_date
,p_event_status_code => p_event_status_code
,p_valuation_method => p_representation_code
,p_security_context => l_security_context);
END update_event_status;
PROCEDURE update_event(
p_api_version IN NUMBER
,p_init_msg_list IN VARCHAR2
,x_return_status OUT NOCOPY VARCHAR2
,x_msg_count OUT NOCOPY NUMBER
,x_msg_data OUT NOCOPY VARCHAR2
,p_tcn_id IN NUMBER
,p_gl_date IN DATE
,p_action_type IN VARCHAR2
,p_event_id IN NUMBER
,p_event_type_code IN VARCHAR2
,p_event_status_code IN VARCHAR2
,p_event_number IN NUMBER
,p_update_ref_info IN VARCHAR2
,p_reference_info IN xla_events_pub_pkg.t_event_reference_info
,p_representation_code IN VARCHAR2) IS
CURSOR get_tcn_csr is
SELECT set_of_books_id,
legal_entity_id,
trunc(date_transaction_occurred) transaction_date,
trunc(canceled_date) cancelled_date,
trx_number,
try_id
FROM okl_trx_contracts
WHERE id = p_tcn_id;
l_api_name VARCHAR2(20) := 'UPDATE_EVENT';
WRITE_TO_LOG('p_update_ref_info : ' || p_update_ref_info);
IF NVL(p_update_ref_info, 'N') = 'N' AND p_event_number IS NULL THEN
l_sla_api_name := 'UPDATE_EVENT';
xla_events_pub_pkg.update_event(p_event_source_info => l_event_source_info
,p_event_id => p_event_id
,p_event_type_code => p_event_type_code
,p_event_date => p_gl_date
,p_event_status_code => p_event_status_code
,p_valuation_method => p_representation_code
,p_security_context => l_security_context
,p_transaction_date => l_transaction_date);
ELSIF NVL(p_update_ref_info, 'N') = 'N' AND p_event_number IS NOT NULL THEN
l_sla_api_name := 'UPDATE_EVENT FOR EVENT NUMBER';
xla_events_pub_pkg.update_event(p_event_source_info => l_event_source_info
,p_event_id => p_event_id
,p_event_type_code => p_event_type_code
,p_event_date => p_gl_date
,p_event_status_code => p_event_status_code
,p_event_number => p_event_number
,p_valuation_method => p_representation_code
,p_security_context => l_security_context
,p_transaction_date => l_transaction_date);
ELSIF NVL(p_update_ref_info, 'N') = 'Y' AND p_event_number IS NULL THEN
l_sla_api_name := 'UPDATE_EVENT FOR REF INFO';
xla_events_pub_pkg.update_event(p_event_source_info => l_event_source_info
,p_event_id => p_event_id
,p_event_type_code => p_event_type_code
,p_event_date => p_gl_date
,p_event_status_code => p_event_status_code
,p_reference_info => p_reference_info
,p_valuation_method => p_representation_code
,p_security_context => l_security_context
,p_transaction_date => l_transaction_date);
ELSIF NVL(p_update_ref_info, 'N') = 'Y' AND p_event_number IS NOT NULL THEN
l_sla_api_name := 'UPDATE_EVENT FOR EVENT NUMBER AND REF INFO';
xla_events_pub_pkg.update_event(p_event_source_info => l_event_source_info
,p_event_id => p_event_id
,p_event_type_code => p_event_type_code
,p_event_date => p_gl_date
,p_event_status_code => p_event_status_code
,p_event_number => p_event_number
,p_reference_info => p_reference_info
,p_valuation_method => p_representation_code
,p_security_context => l_security_context
,p_transaction_date => l_transaction_date);
END update_event;
PROCEDURE update_event(
p_api_version IN NUMBER
,p_init_msg_list IN VARCHAR2
,x_return_status OUT NOCOPY VARCHAR2
,x_msg_count OUT NOCOPY NUMBER
,x_msg_data OUT NOCOPY VARCHAR2
,p_tcn_id IN NUMBER
,p_event_id IN NUMBER
,p_gl_date IN DATE) IS
CURSOR get_tcn_csr is
SELECT set_of_books_id,
legal_entity_id,
trunc(date_transaction_occurred) transaction_date,
trunc(canceled_date) cancelled_date,
trx_number,
try_id,
representation_code
FROM okl_trx_contracts_all
WHERE id = p_tcn_id;
l_api_name VARCHAR2(20) := 'UPDATE_EVENT';
xla_events_pub_pkg.update_event(p_event_source_info => l_event_source_info
,p_event_id => p_event_id
,p_event_date => p_gl_date
,p_valuation_method => get_tcn_rec.representation_code
,p_security_context => l_security_context);
END update_event;
PROCEDURE update_bulk_event_statuses(
p_api_version IN NUMBER
,p_init_msg_list IN VARCHAR2
,x_return_status OUT NOCOPY VARCHAR2
,x_msg_count OUT NOCOPY NUMBER
,x_msg_data OUT NOCOPY VARCHAR2
,p_tcn_tbl IN tcn_tbl_type
,p_try_id IN NUMBER
,p_ledger_id IN NUMBER
,p_action_type IN VARCHAR2
,p_event_status_code IN VARCHAR2) IS
l_entity_type_code VARCHAR2(30);
l_api_name VARCHAR2(30) := 'UPDATE_BULK_EVENT_STATUSES';
INSERT INTO xla_events_int_gt(
application_id,
entity_code,
ledger_id,
event_id,
event_status_code)
SELECT g_application_id,
l_entity_type_code,
p_ledger_id,
xe.event_id,
p_event_status_code
FROM xla_events xe,
xla_transaction_entities xte
WHERE xe.entity_id = xte.entity_id
AND xte.application_id = g_application_id
AND xte.ledger_id = p_ledger_id
AND xte.source_id_int_1 = p_tcn_tbl(i)
AND xe.application_id = g_application_id
AND xe.event_type_code = NVL(l_event_type_code, xe.event_type_code);
l_sla_api_name := 'UPDATE_BULK_EVENT_STATUSES';
XLA_EVENTS_PUB_PKG.update_bulk_event_statuses(p_application_id => g_application_id);
END update_bulk_event_statuses;
PROCEDURE delete_event(
p_api_version IN NUMBER
,p_init_msg_list IN VARCHAR2
,x_return_status OUT NOCOPY VARCHAR2
,x_msg_count OUT NOCOPY NUMBER
,x_msg_data OUT NOCOPY VARCHAR2
,p_tcn_id IN NUMBER
,p_event_id IN NUMBER
,p_representation_code IN VARCHAR2) IS
CURSOR get_tcn_csr is
SELECT set_of_books_id,
legal_entity_id,
trunc(date_transaction_occurred) transaction_date,
trunc(canceled_date) cancelled_date,
trx_number,
try_id
FROM okl_trx_contracts
WHERE id = p_tcn_id;
l_api_name VARCHAR2(30) := 'DELETE_EVENT';
xla_events_pub_pkg.delete_event(p_event_source_info => l_event_source_info
,p_event_id => p_event_id
,p_valuation_method => p_representation_code
,p_security_context => l_security_context);
END delete_event;
FUNCTION delete_events(
p_api_version IN NUMBER
,p_init_msg_list IN VARCHAR2
,x_return_status OUT NOCOPY VARCHAR2
,x_msg_count OUT NOCOPY NUMBER
,x_msg_data OUT NOCOPY VARCHAR2
,p_tcn_id IN NUMBER
,p_action_type IN VARCHAR2
,p_gl_date IN DATE
,p_representation_code IN VARCHAR2)
RETURN INTEGER IS
CURSOR get_tcn_csr is
SELECT set_of_books_id,
legal_entity_id,
TRUNC(date_transaction_occurred) transaction_date,
TRUNC(canceled_date) cancelled_date,
trx_number,
try_id
FROM okl_trx_contracts
WHERE id = p_tcn_id;
l_api_name VARCHAR2(30) := 'DELETE_EVENTS';
l_events_deleted NUMBER;
l_events_deleted :=
xla_events_pub_pkg.delete_events(p_event_source_info => l_event_source_info
,p_event_class_code => l_event_class_code
,p_event_type_code => l_event_type_code
,p_event_date => p_gl_date
,p_valuation_method => p_representation_code
,p_security_context => l_security_context);
return l_events_deleted;
END delete_events;
SELECT set_of_books_id,
legal_entity_id,
TRUNC(date_transaction_occurred) transaction_date,
TRUNC(canceled_date) cancelled_date,
trx_number,
try_id
FROM okl_trx_contracts
WHERE id = p_tcn_id;
SELECT set_of_books_id,
legal_entity_id,
TRUNC(date_transaction_occurred) transaction_date,
TRUNC(canceled_date) cancelled_date,
trx_number,
try_id
FROM okl_trx_contracts
WHERE id = p_tcn_id;
SELECT set_of_books_id,
legal_entity_id,
TRUNC(date_transaction_occurred) transaction_date,
TRUNC(canceled_date) cancelled_date,
trx_number,
try_id
FROM okl_trx_contracts
WHERE id = p_tcn_id;
SELECT accounting_event_id, gl_date
FROM okl_trns_acc_dstrs
WHERE original_dist_id IS NULL
AND source_table = 'OKL_TXL_CNTRCT_LNS'
AND source_id = (SELECT id
FROM okl_txl_cntrct_lns
WHERE tcn_id = p_tcn_id
AND rownum = 1)
AND accounting_event_id is not null
AND rownum = 1;
SELECT accounting_event_id, gl_date
FROM okl_trns_acc_dstrs
WHERE original_dist_id IS NOT NULL
AND source_table = 'OKL_TXL_CNTRCT_LNS'
AND source_id = (SELECT id
FROM okl_txl_cntrct_lns
WHERE tcn_id = p_tcn_id
AND rownum = 1)
AND accounting_event_id IS NOT NULL
AND rownum = 1;
SELECT accounting_event_id, gl_date
FROM okl_trns_acc_dstrs
WHERE source_table = 'OKL_TXL_CNTRCT_LNS'
AND source_id = (SELECT id
FROM okl_txl_cntrct_lns
WHERE tcn_id = p_tcn_id
AND rownum = 1)
AND accounting_event_id IS NOT NULL
AND rownum = 1;