The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE update_ctr_group(
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_cgpv_rec IN cgpv_rec_type,
x_cgpv_rec OUT NOCOPY cgpv_rec_type,
p_cgcv_tbl IN cgcv_tbl_type,
x_cgcv_tbl OUT NOCOPY cgcv_tbl_type) IS
l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
update_contract_group(
p_api_version,
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
p_cgpv_rec,
x_cgpv_rec);
update_contract_grpngs(
p_api_version,
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
p_cgcv_tbl,
x_cgcv_tbl);
END update_ctr_group;
okc_cgp_pvt.insert_row(
p_api_version,
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
p_cgpv_rec,
x_cgpv_rec);
okc_cgp_pvt.insert_row(
p_api_version,
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
p_cgpv_tbl,
x_cgpv_tbl);
PROCEDURE update_contract_group(
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_cgpv_rec IN cgpv_rec_type,
x_cgpv_rec OUT NOCOPY cgpv_rec_type) IS
BEGIN
okc_cgp_pvt.update_row(
p_api_version,
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
p_cgpv_rec,
x_cgpv_rec);
END update_contract_group;
PROCEDURE update_contract_group(
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_cgpv_tbl IN cgpv_tbl_type,
x_cgpv_tbl OUT NOCOPY cgpv_tbl_type) IS
BEGIN
okc_cgp_pvt.update_row(
p_api_version,
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
p_cgpv_tbl,
x_cgpv_tbl);
END update_contract_group;
PROCEDURE delete_contract_group(
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_cgpv_rec IN cgpv_rec_type) IS
l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
FUNCTION delete_parentgroups(
p_cgpv_rec IN cgpv_rec_type
) RETURN VARCHAR2 IS
CURSOR okc_cgcv_included_csr (p_included_cgp_id IN NUMBER) IS
SELECT id
FROM OKC_K_GRPINGS
WHERE included_cgp_id = p_included_cgp_id;
okc_contract_group_pub.delete_contract_grpngs(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => l_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_cgcv_tbl => l_cgcv_tbl);
END delete_parentgroups;
FUNCTION delete_subgroups(
p_cgpv_rec IN cgpv_rec_type
) RETURN VARCHAR2 IS
child_record_error EXCEPTION;
SELECT id
FROM OKC_K_GRPINGS
WHERE cgp_parent_id = p_cgp_parent_id;
okc_contract_group_pub.delete_contract_grpngs(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => l_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_cgcv_tbl => l_cgcv_tbl);
END delete_subgroups;
l_return_status := delete_subgroups(p_cgpv_rec);
l_return_status := delete_parentgroups(p_cgpv_rec);
okc_cgp_pvt.delete_row(
p_api_version,
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
p_cgpv_rec);
END delete_contract_group;
PROCEDURE delete_contract_group(
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_cgpv_tbl IN cgpv_tbl_type) IS
i NUMBER := 0;
delete_contract_group(
p_api_version,
p_init_msg_list,
l_return_status,
x_msg_count,
x_msg_data,
p_cgpv_tbl(i));
END delete_contract_group;
SELECT 'x'
FROM OKC_K_GRPINGS
WHERE included_cgp_id = p_cgp_parent_id
START WITH cgp_parent_id = p_included_cgp_id and included_cgp_id > 0
CONNECT BY PRIOR included_cgp_id = cgp_parent_id and included_cgp_id > 0; --bug 11881768
SELECT public_yn,
user_id
FROM OKC_K_GROUPS_B
WHERE id = p_id;
okc_cgc_pvt.insert_row(
p_api_version,
p_init_msg_list,
l_return_status,
x_msg_count,
x_msg_data,
p_cgcv_rec,
x_cgcv_rec);
PROCEDURE update_contract_grpngs(
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_cgcv_rec IN cgcv_rec_type,
x_cgcv_rec OUT NOCOPY cgcv_rec_type) IS
l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
okc_cgc_pvt.update_row(
p_api_version,
p_init_msg_list,
l_return_status,
x_msg_count,
x_msg_data,
p_cgcv_rec,
x_cgcv_rec);
END update_contract_grpngs;
PROCEDURE update_contract_grpngs(
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_cgcv_tbl IN cgcv_tbl_type,
x_cgcv_tbl OUT NOCOPY cgcv_tbl_type) IS
i NUMBER := 0;
update_contract_grpngs(
p_api_version,
p_init_msg_list,
l_return_status,
x_msg_count,
x_msg_data,
p_cgcv_tbl(i),
x_cgcv_tbl(i));
END update_contract_grpngs;
PROCEDURE delete_contract_grpngs(
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_cgcv_rec IN cgcv_rec_type) IS
BEGIN
okc_cgc_pvt.delete_row(
p_api_version,
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
p_cgcv_rec);
END delete_contract_grpngs;
PROCEDURE delete_contract_grpngs(
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_cgcv_tbl IN cgcv_tbl_type) IS
BEGIN
okc_cgc_pvt.delete_row(
p_api_version,
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
p_cgcv_tbl);
END delete_contract_grpngs;