The following lines contain the word 'select', 'insert', 'update' or 'delete':
select 'Y'
from okc_k_party_roles_b cplb
where id = p_cpl_id
and object1_id1 = to_char(p_vendor_id);
SELECT cle_id
FROM okc_k_party_roles_b cpl
WHERE cpl.id = p_cpl_id;
OKL_LLA_UTIL_PVT.check_line_update_allowed
(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_cle_id => l_cpl_rec.cle_id);
OKL_PYD_PVT.insert_row(p_api_version,
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
p_srfvv_rec,
x_srfvv_rec);
PROCEDURE delete_refund_dtls(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_srfvv_rec IN srfvv_rec_type
) IS
l_api_name CONSTANT VARCHAR2(30) := 'DELETE_SUBSIDY_REFUND';
SELECT cpl.cle_id
FROM okc_k_party_roles_b cpl,
okl_party_payment_dtls pyd
WHERE pyd.id = p_pyd_id
AND cpl.id = pyd.cpl_id;
OKL_LLA_UTIL_PVT.check_line_update_allowed
(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_cle_id => l_cpl_rec.cle_id);
OKL_PYD_PVT.delete_row(p_api_version,
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
p_srfvv_rec);
END delete_refund_dtls;
PROCEDURE delete_refund_dtls(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_srfvv_tbl IN srfvv_tbl_type
) IS
l_api_name CONSTANT VARCHAR2(30) := 'DELETE_SUBSIDY_REFUND';
delete_refund_dtls(p_api_version,
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
p_srfvv_tbl(i));
END delete_refund_dtls;
PROCEDURE update_refund_dtls(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_srfvv_rec IN srfvv_rec_type,
x_srfvv_rec OUT NOCOPY srfvv_rec_type
) IS
l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_SUBSIDY_REFUND';
SELECT cle_id
FROM okc_k_party_roles_b cpl
WHERE cpl.id = p_cpl_id;
OKL_LLA_UTIL_PVT.check_line_update_allowed
(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_cle_id => l_cpl_rec.cle_id);
OKL_PYD_PVT.update_row(p_api_version,
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
p_srfvv_rec,
x_srfvv_rec);
END update_refund_dtls;
PROCEDURE update_refund_dtls(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_srfvv_tbl IN srfvv_tbl_type,
x_srfvv_tbl OUT NOCOPY srfvv_tbl_type
) IS
l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_SUBSIDY_REFUND';
update_refund_dtls(p_api_version,
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
p_srfvv_tbl(i),
x_srfvv_tbl(i));
END update_refund_dtls;