The following lines contain the word 'select', 'insert', 'update' or 'delete':
l_no_rows_updated EXCEPTION;
l_update_failure EXCEPTION;
SELECT nvl(upper(s.table_name), '!~') TABLE_NAME,
nvl(s.constant, '!~') CONSTANT,
s.segment
FROM JA_AU_ACCT_DEFAULT_SEGS s, ja_au_account_defaults d
WHERE s.gl_default_id = d.gl_default_id
AND d.set_of_books_id = l_set_of_books_id
ORDER BY d.type,s.segment_num ;
JA_AU_update_mtltrxacct( l_transaction_id,
l_ccid );
SELECT chart_of_accounts_id, set_of_books_id
INTO x_chart_of_accts_id, x_set_of_books_id
FROM org_organization_definitions
WHERE organization_id = x_org_id
AND nvl(disable_date, sysdate+1) > sysdate ;
SELECT nvl(expense_account, -1)
INTO x_subinv_ccid
FROM mtl_secondary_inventories
WHERE organization_id = x_org_id
AND secondary_inventory_name = x_subinv ;
SELECT nvl(expense_account, -1)
INTO x_item_ccid
FROM mtl_system_items
WHERE organization_id = x_org_id
AND inventory_item_id = x_item_id ;
SELECT nvl(segment30,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment29,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment28,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment27,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment26,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment25,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment24,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment23,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment22,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment21,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment20,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment19,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment18,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment17,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment16,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment15,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment14,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment13,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment12,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment11,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment10,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment9,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment8,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment7,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment6,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment5,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment4,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment3,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment2,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
SELECT nvl(segment1,'!@')
INTO l_value
FROM gl_code_combinations
WHERE code_combination_id = x_ccid ;
PROCEDURE JA_AU_UPDATE_MTLTRXACCT
(x_transaction_id IN
mtl_transaction_accounts.transaction_id%TYPE,
x_ccid IN
gl_code_combinations.code_combination_id%TYPE)
IS
BEGIN
UPDATE mtl_transaction_accounts
SET reference_account = x_ccid
WHERE transaction_id = x_transaction_id
AND accounting_line_type = 2;
RAISE l_no_rows_updated;
WHEN l_no_rows_updated THEN
l_error_msg := 'AUTOGL ERROR - Update of charge_account_id in po_requisitions_interface
failed.';
END JA_AU_UPDATE_MTLTRXACCT;