The following lines contain the word 'select', 'insert', 'update' or 'delete':
OKE_POOL_PVT.Insert_Row(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_pool_rec => l_pool_rec,
x_pool_rec => x_pool_rec);
OKE_POOL_PVT.Insert_Row(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_pool_tbl => p_pool_tbl,
x_pool_tbl => x_pool_tbl);
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_pool_rec IN oke_pool_pvt.pool_rec_type,
x_pool_rec OUT NOCOPY oke_pool_pvt.pool_rec_type) IS
l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_POOL';
OKE_POOL_PVT.Update_Row(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_pool_rec => p_pool_rec,
x_pool_rec => x_pool_rec);
END update_pool;
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_pool_tbl IN oke_pool_pvt.pool_tbl_type,
x_pool_tbl OUT NOCOPY oke_pool_pvt.pool_tbl_type) IS
l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_POOL';
OKE_POOL_PVT.Update_Row(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_pool_tbl => p_pool_tbl,
x_pool_tbl => x_pool_tbl);
END update_pool;
PROCEDURE delete_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_funding_pool_id IN NUMBER) IS
l_pool_rec oke_pool_pvt.pool_rec_type;
l_api_name CONSTANT VARCHAR2(30) := 'DELETE_POOL';
SELECT POOL_PARTY_ID
FROM OKE_POOL_PARTIES
WHERE FUNDING_POOL_ID = p_funding_pool_id;
select funding_pool_id
from oke_funding_pools
where funding_pool_id=p_funding_pool_id;
delete_party(p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_pool_party_id => l_current_id);
OKE_POOL_PVT.delete_row(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_pool_rec => l_pool_rec);
END delete_pool;
PROCEDURE delete_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_pool_rec IN oke_pool_pvt.pool_rec_type) IS
l_pool_rec oke_pool_pvt.pool_rec_type;
l_api_name CONSTANT VARCHAR2(30) := 'DELETE_POOL';
delete_pool(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_funding_pool_id => p_pool_rec.funding_pool_id);
END delete_pool;
PROCEDURE delete_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_pool_tbl IN oke_pool_pvt.pool_tbl_type) IS
l_api_name CONSTANT VARCHAR2(30) := 'DELETE_POOL';
Delete_Pool(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_funding_pool_id => p_pool_tbl(i).funding_pool_id);
END delete_pool;
OKE_PARTY_PVT.Insert_Row(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_party_rec => l_party_rec,
x_party_rec => x_party_rec);
OKE_PARTY_PVT.Insert_Row(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_party_tbl => p_party_tbl,
x_party_tbl => x_party_tbl);
PROCEDURE update_party(
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_party_rec IN oke_party_pvt.party_rec_type,
x_party_rec OUT NOCOPY oke_party_pvt.party_rec_type) IS
l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_PARTY';
SELECT 'x'
FROM OKE_K_FUNDING_SOURCES
WHERE POOL_PARTY_ID = p_party_rec.POOL_PARTY_ID;
OKE_PARTY_PVT.Update_Row(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_party_rec => p_party_rec,
x_party_rec => x_party_rec);
END update_party;
PROCEDURE update_party(
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_party_tbl IN oke_party_pvt.party_tbl_type,
x_party_tbl OUT NOCOPY oke_party_pvt.party_tbl_type) IS
l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_PARTY';
SELECT 'x'
FROM OKE_K_FUNDING_SOURCES
WHERE POOL_PARTY_ID = p_party_tbl(p_row).POOL_PARTY_ID;
OKE_PARTY_PVT.Update_Row(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_party_tbl => p_party_tbl,
x_party_tbl => x_party_tbl);
END update_party;
PROCEDURE delete_party(
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_party_rec IN oke_party_pvt.party_rec_type) IS
l_party_rec oke_party_pvt.party_rec_type;
l_api_name CONSTANT VARCHAR2(30) := 'DELETE_PARTY';
delete_party(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_pool_party_id => p_party_rec.pool_party_id);
END delete_party;
PROCEDURE delete_party(
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_pool_party_id IN NUMBER) IS
l_party_rec oke_party_pvt.party_rec_type;
l_api_name CONSTANT VARCHAR2(30) := 'DELETE_PARTY';
SELECT FUNDING_SOURCE_ID
FROM OKE_K_FUNDING_SOURCES
WHERE POOL_PARTY_ID = p_pool_party_id;
select pool_party_id
from oke_pool_parties
where pool_party_id=p_pool_party_id;
oke_funding_pub.delete_funding(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
p_commit => OKE_API.G_FALSE,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_funding_source_id => l_current_id);
OKE_PARTY_PVT.delete_row(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_party_rec => l_party_rec);
END delete_party;
PROCEDURE delete_party(
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_party_tbl IN oke_party_pvt.party_tbl_type) IS
l_api_name CONSTANT VARCHAR2(30) := 'DELETE_PARTY';
Delete_Party(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_pool_party_id => p_party_tbl(i).pool_party_id);
END delete_party;