The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT TRXB.GL_DATE,
TRXB.CURRENCY_CODE,
TRXB.EXCHANGE_RATE_TYPE,
TRXH.TO_LEDGER_ID
INTO l_gl_date, l_currency_code,
l_exchange_rate_type, l_to_ledger_id
FROM FUN_TRX_HEADERS TRXH,
FUN_TRX_BATCHES TRXB
WHERE TRXB.BATCH_ID = TRXH.BATCH_ID
AND TRXH.TRX_ID = p_trx_id;
SELECT nvl(min(authorization_limit), -1)
INTO l_limit
FROM GL_AUTHORIZATION_LIMITS GAL, FUN_TRX_HEADERS TRXH
WHERE employee_id = (SELECT EMPLOYEE_ID
FROM FND_USER
WHERE USER_ID = fnd_global.user_id)
AND GAL.ledger_id = TRXH.TO_LEDGER_ID
AND TRXH.TRX_ID = l_transaction_id;
SELECT ABS(NVL(INIT_AMOUNT_DR, 0) - NVL(INIT_AMOUNT_CR, 0))
INTO l_trx_amount
FROM FUN_TRX_HEADERS
WHERE TRX_ID = l_transaction_id;
fun_trx_pvt.update_trx_status
(p_api_version => 1.0,
x_return_status => l_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
p_trx_id => l_transaction_id,
p_update_status_to => 'ERROR');
SELECT nvl(min(authorization_limit), -1)
INTO l_limit
FROM GL_AUTHORIZATION_LIMITS GAL, FUN_TRX_HEADERS TRXH
WHERE employee_id = (SELECT EMPLOYEE_ID
FROM FND_USER
WHERE USER_ID = fnd_global.user_id)
AND GAL.ledger_id = TRXH.TO_LEDGER_ID
AND TRXH.TRX_ID = l_transaction_id;
SELECT ABS(NVL(INIT_AMOUNT_DR, 0) - NVL(INIT_AMOUNT_CR, 0))
INTO l_trx_amount
FROM FUN_TRX_HEADERS
WHERE TRX_ID = l_transaction_id;