The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE update_pool(
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_polv_rec IN polv_rec_type
,x_polv_rec OUT NOCOPY polv_rec_type
) IS
l_api_version NUMBER ;
l_api_name CONSTANT VARCHAR2(30) := 'update_pool';
SAVEPOINT trx_update_pool;
p_action => 'update_pool',
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data
);
Okl_Pool_Pvt.update_pool(
p_api_version => l_api_version,
p_init_msg_list => l_init_msg_list,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
p_polv_rec => l_polv_rec,
x_polv_rec => lx_polv_rec);
ROLLBACK TO trx_update_pool;
ROLLBACK TO trx_update_pool;
ROLLBACK TO trx_update_pool;
FND_MSG_PUB.ADD_EXC_MSG('OKL_POOL_PUB','update_pool');
END update_pool;