The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE delete_fee_service(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_id IN NUMBER) IS
BEGIN
null;
END delete_fee_service;
PROCEDURE delete_usage(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_id IN NUMBER) IS
BEGIN
null;
END delete_usage;
PROCEDURE delete_insurance(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_id IN NUMBER) IS
BEGIN
null;
END delete_insurance;
SELECT cleb_fin.id fin_asset_id,
clet_fin.name asset_number,
clet_fin.item_description description,
NVL(kle_fin.oec,0) oec
FROM okc_k_lines_b cleb_fin,
okc_k_lines_tl clet_fin,
okl_k_lines kle_fin,
okc_line_styles_b lse_fin,
okc_statuses_b sts
WHERE cleb_fin.dnz_chr_id = p_chr_id
AND cleb_fin.chr_id = p_chr_id
AND clet_fin.id = cleb_fin.id
AND clet_fin.language = USERENV('LANG')
AND cleb_fin.id = kle_fin.id
AND lse_fin.id = cleb_fin.lse_id
AND lse_fin.lty_code = 'FREE_FORM1'
AND cleb_fin.sts_code = sts.code
AND sts.ste_code NOT IN ('HOLD','EXPIRED','CANCELLED','TERMINATED');
SELECT SUM(NVL(kle_cov_asset.capital_amount,kle_cov_asset.amount)) amount
FROM okc_k_lines_b cleb_cov_asset,
okl_k_lines kle_cov_asset
WHERE cleb_cov_asset.dnz_chr_id = p_chr_id
AND cleb_cov_asset.cle_id = p_cle_id
AND cleb_cov_asset.sts_code = 'TERMINATED'
AND kle_cov_asset.id = cleb_cov_asset.id;
SELECT cov_ast_cle.id cov_ast_cle_id,
cov_ast_cim.id cov_ast_cim_id
FROM okc_k_lines_b cov_ast_cle,
okc_k_items cov_ast_cim
WHERE cov_ast_cle.dnz_chr_id = p_chr_id
AND cov_ast_cle.cle_id = p_cle_id
AND cov_ast_cim.cle_id = cov_ast_cle.id
AND cov_ast_cim.object1_id1 = TO_CHAR(p_fin_ast_id)
AND cov_ast_cim.object1_id2 = '#'
and cov_ast_cim.jtot_object1_code = 'OKX_COVASST';
IF p_mode = 'UPDATE' THEN
OPEN c_cov_asset_line(p_chr_id => l_chr_id,
p_cle_id => l_cle_id,
p_fin_ast_id => l_asset.fin_asset_id);
IF p_mode = 'UPDATE' THEN
-- Exclude Terminated line covered asset amounts from
-- total amount available for allocation
l_term_lines_cov_asset_amt := 0;
SELECT currency_code
INTO l_currency_code
FROM okc_k_headers_b
WHERE id = l_chr_id;
PROCEDURE update_fee (
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_fee_rec IN fee_rec_type,
x_fee_rec OUT NOCOPY fee_rec_type) IS
l_api_name CONSTANT VARCHAR2(30) := 'update_fee';
OKL_MAINTAIN_FEE_PVT.update_fee_type(
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_fee_types_rec => l_fee_types_rec,
x_fee_types_rec => x_fee_types_rec);
END update_fee;