The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT 'x'
FROM okl_ls_rt_fctr_sets_v
WHERE name = p_name;
SELECT end_of_term_ver_id
FROM okl_fe_eo_term_vers
WHERE end_of_term_id = p_eot_id
AND p_eff_from BETWEEN effective_from_date AND nvl(effective_to_date, p_eff_from + 1)
AND sts_code = 'ACTIVE';
okl_lrt_pvt.insert_row(p_api_version => g_api_version
,p_init_msg_list => g_false
,x_return_status => l_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
,p_lrtv_rec => lp_lrtv_rec
,x_lrtv_rec => x_lrtv_rec);
okl_lrv_pvt.insert_row(p_api_version => g_api_version
,p_init_msg_list => g_false
,x_return_status => l_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
,p_lrvv_rec => lp_lrvv_rec
,x_lrvv_rec => x_lrvv_rec);
PROCEDURE update_lease_rate_set(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_lrtv_rec IN lrtv_rec_type
,x_lrtv_rec OUT NOCOPY lrtv_rec_type
,p_lrvv_rec IN okl_lrvv_rec
,x_lrvv_rec OUT NOCOPY okl_lrvv_rec) IS
CURSOR get_eot_version(p_eot_id number
,p_eff_from IN date) IS
SELECT end_of_term_ver_id
FROM okl_fe_eo_term_vers
WHERE end_of_term_id = p_eot_id
AND p_eff_from BETWEEN effective_from_date AND nvl(effective_to_date, p_eff_from + 1)
AND sts_code = 'ACTIVE';
l_api_name CONSTANT varchar2(30) := 'update_lrs';
l_module CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.okl_lease_rate_sets_pvt.update_lease_rate_set';
,'begin debug OKLRECCB.pls call update_lease_rate_set');
okl_lease_rate_factors_pvt.delete_lease_rate_factors(p_api_version => p_api_version
,p_init_msg_list => okl_api.g_false
,x_return_status => l_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
,p_lrv_id => lp_lrvv_rec.rate_set_version_id);
okl_lrt_pvt.update_row(p_api_version => g_api_version
,p_init_msg_list => g_false
,x_return_status => l_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
,p_lrtv_rec => lp_lrtv_rec
,x_lrtv_rec => x_lrtv_rec);
okl_lrv_pvt.update_row(p_api_version => g_api_version
,p_init_msg_list => g_false
,x_return_status => l_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
,p_lrvv_rec => lp_lrvv_rec
,x_lrvv_rec => x_lrvv_rec);
,'end debug OKLPLRTB.pls.pls call update_lease_rate_set');
END update_lease_rate_set;
SELECT max(qte.expected_start_date) start_date
FROM okl_lease_quotes_b qte
,okl_fe_rate_set_versions lrv
WHERE qte.rate_card_id = lrv.rate_set_version_id
AND lrv.rate_set_version_id = p_lrv_id;
SELECT max(qte.expected_start_date) start_date
FROM okl_quick_quotes_b qte
,okl_fe_rate_set_versions lrv
WHERE qte.rate_card_id = lrv.rate_set_version_id
AND lrv.rate_set_version_id = p_lrv_id;
SELECT effective_from_date
,effective_to_date
FROM okl_fe_rate_set_versions
WHERE rate_set_version_id = p_lrv_id;
SELECT max(effective_from_date)
FROM okl_fe_criteria_set ech
,okl_fe_criteria ecl
WHERE ecl.criteria_set_id = ech.criteria_set_id
AND ech.source_id = p_lrv_id AND source_object_code = 'LRS';
SELECT id
,object_version_number
,sfwt_flag
,try_id
,pdt_id
,rate
,frq_code
,arrears_yn
,start_date
,end_date
,name
,description
,created_by
,creation_date
,last_updated_by
,last_update_date
,last_update_login
,attribute_category
,attribute1
,attribute2
,attribute3
,attribute4
,attribute5
,attribute6
,attribute7
,attribute8
,attribute9
,attribute10
,attribute11
,attribute12
,attribute13
,attribute14
,attribute15
,sts_code
,org_id
,currency_code
,lrs_type_code
,end_of_term_id
FROM okl_ls_rt_fctr_sets_v lrtv
WHERE id = p_id;
,l_lrtv_rec.last_updated_by
,l_lrtv_rec.last_update_date
,l_lrtv_rec.last_update_login
,l_lrtv_rec.attribute_category
,l_lrtv_rec.attribute1
,l_lrtv_rec.attribute2
,l_lrtv_rec.attribute3
,l_lrtv_rec.attribute4
,l_lrtv_rec.attribute5
,l_lrtv_rec.attribute6
,l_lrtv_rec.attribute7
,l_lrtv_rec.attribute8
,l_lrtv_rec.attribute9
,l_lrtv_rec.attribute10
,l_lrtv_rec.attribute11
,l_lrtv_rec.attribute12
,l_lrtv_rec.attribute13
,l_lrtv_rec.attribute14
,l_lrtv_rec.attribute15
,l_lrtv_rec.sts_code
,l_lrtv_rec.org_id
,l_lrtv_rec.currency_code
,l_lrtv_rec.lrs_type_code
,l_lrtv_rec.end_of_term_id ;
SELECT rate_set_version_id
,object_version_number
,arrears_yn
,effective_from_date
,effective_to_date
,rate_set_id
,end_of_term_ver_id
,std_rate_tmpl_ver_id
,adj_mat_version_id
,version_number
,lrs_rate
,rate_tolerance
,deferred_pmts
,advance_pmts
,sts_code
,created_by
,creation_date
,last_updated_by
,last_update_date
,last_update_login
,attribute_category
,attribute1
,attribute2
,attribute3
,attribute4
,attribute5
,attribute6
,attribute7
,attribute8
,attribute9
,attribute10
,attribute11
,attribute12
,attribute13
,attribute14
,attribute15
FROM okl_fe_rate_set_versions_v
WHERE rate_set_version_id = p_id;
,l_lrvv_rec.last_updated_by
,l_lrvv_rec.last_update_date
,l_lrvv_rec.last_update_login
,l_lrvv_rec.attribute_category
,l_lrvv_rec.attribute1
,l_lrvv_rec.attribute2
,l_lrvv_rec.attribute3
,l_lrvv_rec.attribute4
,l_lrvv_rec.attribute5
,l_lrvv_rec.attribute6
,l_lrvv_rec.attribute7
,l_lrvv_rec.attribute8
,l_lrvv_rec.attribute9
,l_lrvv_rec.attribute10
,l_lrvv_rec.attribute11
,l_lrvv_rec.attribute12
,l_lrvv_rec.attribute13
,l_lrvv_rec.attribute14
,l_lrvv_rec.attribute15 ;
SELECT rate_set_version_id
FROM okl_fe_rate_set_versions
WHERE rate_set_id = p_lrt_id AND version_number = p_version_number;
SELECT end_of_term_ver_id
FROM okl_fe_eo_term_vers
WHERE end_of_term_id = p_eot_id
AND p_eff_from BETWEEN effective_from_date AND nvl(effective_to_date, p_eff_from + 1)
AND sts_code = 'ACTIVE';
okl_lrt_pvt.update_row(p_api_version => g_api_version
,p_init_msg_list => g_false
,x_return_status => l_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
,p_lrtv_rec => lp_lrtv_rec
,x_lrtv_rec => x_lrtv_rec);
okl_lrv_pvt.insert_row(p_api_version => g_api_version
,p_init_msg_list => g_false
,x_return_status => l_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
,p_lrvv_rec => lp_lrvv_rec
,x_lrvv_rec => x_lrvv_rec);
SELECT rate_set_version_id
FROM okl_fe_rate_set_versions
WHERE rate_set_id = p_lrt_id AND version_number = p_version_number;
SELECT rate_set_id
,effective_from_date
FROM okl_fe_rate_set_versions
WHERE rate_set_version_id = p_rate_set_version_id;
SELECT version_number
FROM okl_fe_rate_set_versions
WHERE rate_set_version_id = p_lrv_id;
okl_lrv_pvt.update_row(p_api_version => g_api_version
,p_init_msg_list => g_false
,x_return_status => l_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
,p_lrvv_rec => lp_lrvv_rec
,x_lrvv_rec => x_lrvv_rec);
,'Procedure okl_lrv_pvt.update_row returned with status ' ||
l_return_status);
SELECT rate_set_id
FROM okl_fe_rate_set_versions
WHERE rate_set_version_id = p_lrv_id;
SELECT rate_set_version_id
FROM okl_fe_rate_set_versions
WHERE rate_set_id = p_lrt_id AND version_number = p_version_number;
SELECT nvl(lrs_rate,standard_rate) interest_rate
FROM okl_fe_rate_set_versions lrsv
WHERE lrsv.rate_set_version_id = p_lrv_id;
okl_ecc_values_pvt.delete_eligibility_criteria(p_api_version => p_api_version
,p_init_msg_list => okl_api.g_false
,x_return_status => l_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
,p_source_id => lp_lrvv_rec.rate_set_version_id
,p_source_type => 'LRS');
,'Procedure okl_ecc_values_pvt.delete_eligibility_criteria returned with status ' ||
l_return_status);
okl_lrv_pvt.update_row(p_api_version => g_api_version
,p_init_msg_list => g_false
,x_return_status => l_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
,p_lrvv_rec => l_prev_lrvv_rec
,x_lrvv_rec => x_lrvv_rec);
,'Procedure okl_lrv_pvt.update_row returned with status ' ||
l_return_status);
okl_lrt_pvt.update_row(p_api_version => g_api_version
,p_init_msg_list => g_false
,x_return_status => l_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
,p_lrtv_rec => lp_lrtv_rec
,x_lrtv_rec => x_lrtv_rec);
,'Procedure okl_lrt_pvt.update_row returned with status ' ||
l_return_status);
okl_lrv_pvt.update_row(p_api_version => g_api_version
,p_init_msg_list => g_false
,x_return_status => l_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
,p_lrvv_rec => lp_lrvv_rec
,x_lrvv_rec => x_lrvv_rec);
,'Procedure okl_lrv_pvt.update_row returned with status ' ||
l_return_status);
PROCEDURE update_lrs_gen_lrf(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_lrtv_rec IN lrtv_rec_type
,x_lrtv_rec OUT NOCOPY lrtv_rec_type
,p_lrvv_rec IN okl_lrvv_rec
,x_lrvv_rec OUT NOCOPY okl_lrvv_rec) IS
lp_lrvv_rec okl_lrvv_rec;
l_api_name CONSTANT varchar2(30) := 'update_lrs_gen';
l_module CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.okl_lease_rate_sets_pvt.update_lrs_gen_lrf';
,'begin debug OKLRECCB.pls call update_lrs_gen_lrf');
update_lease_rate_set(p_api_version => g_api_version
,p_init_msg_list => g_false
,x_return_status => l_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
,p_lrtv_rec => lp_lrtv_rec
,x_lrtv_rec => x_lrtv_rec
,p_lrvv_rec => lp_lrvv_rec
,x_lrvv_rec => x_lrvv_rec);
,'end debug OKLPLRTB.pls.pls call update_lrs_gen_lrf');
END update_lrs_gen_lrf;
PROCEDURE update_lrs_gen_lrf_submit(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_lrtv_rec IN lrtv_rec_type
,x_lrtv_rec OUT NOCOPY lrtv_rec_type
,p_lrvv_rec IN okl_lrvv_rec
,x_lrvv_rec OUT NOCOPY okl_lrvv_rec) IS
lp_lrvv_rec okl_lrvv_rec;
l_module CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.okl_lease_rate_sets_pvt.update_lrs_gen_lrf_submit';
,'begin debug OKLRECCB.pls call update_lrs_gen_lrf_submit');
update_lease_rate_set(p_api_version => g_api_version
,p_init_msg_list => g_false
,x_return_status => l_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
,p_lrtv_rec => lp_lrtv_rec
,x_lrtv_rec => x_lrtv_rec
,p_lrvv_rec => lp_lrvv_rec
,x_lrvv_rec => x_lrvv_rec);
,'end debug OKLPLRTB.pls.pls call update_lrs_gen_lrf_submit');
END update_lrs_gen_lrf_submit;
SELECT end_of_term_ver_id
,version_number
FROM okl_fe_eo_term_vers
WHERE end_of_term_id = p_eot_id
AND p_effective_from BETWEEN effective_from_date AND nvl(effective_to_date, p_effective_from + 1)
AND sts_code = 'ACTIVE';
okl_lease_rate_factors_pvt.delete_lease_rate_factors(p_api_version => p_api_version
,p_init_msg_list => okl_api.g_false
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
,p_lrv_id => p_rate_set_version_id);
SELECT 'X'
FROM okl_fe_rate_set_versions
WHERE version_number = (SELECT max(to_number(version_number))
FROM okl_fe_rate_set_versions
WHERE rate_set_id = p_rate_set_id)
AND rate_set_version_id = p_rate_set_version_id;
SELECT 'X'
FROM okl_fe_rate_set_versions
WHERE rate_set_id = p_rate_set_id
AND rate_set_version_id <> p_rate_set_version_id
AND sts_code <> 'ABANDONED';
l_update_header boolean;
l_update_version boolean;
l_update_header := false;
l_update_version := false;
l_update_version := true;
l_update_header := true;
l_update_version := true;
l_update_header := true;
l_update_version := true;
IF NOT l_update_header THEN
lp_lrtv_rec := get_lrtv_rec(lp_lrvv_rec.rate_set_id
,l_no_data_found);
l_update_header := true;
IF l_update_version THEN
okl_lrv_pvt.update_row(p_api_version => g_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_lrvv_rec => lp_lrvv_rec
,x_lrvv_rec => lx_lrvv_rec);
IF l_update_header THEN
okl_lrt_pvt.update_row(p_api_version => g_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_lrtv_rec => lp_lrtv_rec
,x_lrtv_rec => lx_lrtv_rec);