The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT
object_version_number
,attribute_category
,attribute1
,attribute2
,attribute3
,attribute4
,attribute5
,attribute6
,attribute7
,attribute8
,attribute9
,attribute10
,attribute11
,attribute12
,attribute13
,attribute14
,attribute15
,lease_quote_id
,policy_term
,short_description
,description
,comments
INTO
x_l_ins_est_rec.object_version_number
,x_l_ins_est_rec.attribute_category
,x_l_ins_est_rec.attribute1
,x_l_ins_est_rec.attribute2
,x_l_ins_est_rec.attribute3
,x_l_ins_est_rec.attribute4
,x_l_ins_est_rec.attribute5
,x_l_ins_est_rec.attribute6
,x_l_ins_est_rec.attribute7
,x_l_ins_est_rec.attribute8
,x_l_ins_est_rec.attribute9
,x_l_ins_est_rec.attribute10
,x_l_ins_est_rec.attribute11
,x_l_ins_est_rec.attribute12
,x_l_ins_est_rec.attribute13
,x_l_ins_est_rec.attribute14
,x_l_ins_est_rec.attribute15
,x_l_ins_est_rec.lease_quote_id
,x_l_ins_est_rec.policy_term
,x_l_ins_est_rec.short_description
,x_l_ins_est_rec.description
,x_l_ins_est_rec.comments
FROM OKL_INSURANCE_ESTIMATES_V
WHERE id = p_insurance_estimate_id;
PROCEDURE insert_row (
p_insurance_estimate_rec IN OUT NOCOPY ins_est_rec_type
,x_return_status OUT NOCOPY VARCHAR2
,x_msg_count OUT NOCOPY NUMBER
,x_msg_data OUT NOCOPY VARCHAR2
) IS
l_program_name CONSTANT VARCHAR2(30) := 'insert_row';
okl_que_pvt.insert_row (
p_api_version => G_API_VERSION
,p_init_msg_list => G_FALSE
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
,p_quev_rec => l_quev_rec
,x_quev_rec => lx_quev_rec
);
END insert_row;
PROCEDURE update_row (
p_insurance_estimate_rec IN ins_est_rec_type
,x_return_status OUT NOCOPY VARCHAR2
,x_msg_count OUT NOCOPY NUMBER
,x_msg_data OUT NOCOPY VARCHAR2
) IS
l_program_name CONSTANT VARCHAR2(30) := 'update_row';
okl_que_pvt.update_row (
p_api_version => G_API_VERSION
,p_init_msg_list => G_FALSE
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
,p_quev_rec => l_quev_rec
,x_quev_rec => lx_quev_rec
);
END update_row;
PROCEDURE update_cashflow (
p_insurance_estimate_rec IN ins_est_rec_type
,x_return_status OUT NOCOPY VARCHAR2
,x_msg_count OUT NOCOPY NUMBER
,x_msg_data OUT NOCOPY VARCHAR2
) IS
l_program_name CONSTANT VARCHAR2(30) := 'update_cashflow';
l_cashflow_level_tbl(1).record_mode := 'UPDATE';
okl_lease_quote_cashflow_pvt.update_cashflow (
p_api_version => G_API_VERSION
,p_init_msg_list => G_FALSE
,p_transaction_control => G_FALSE
,p_cashflow_header_rec => l_cashflow_header_rec
,p_cashflow_level_tbl => l_cashflow_level_tbl
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
);
END update_cashflow;
SELECT parent_object_code
FROM okl_lease_quotes_b
WHERE id = p_insurance_estimate_rec.lease_quote_id;
insert_row (
p_insurance_estimate_rec => l_insurance_estimate_rec
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
);
PROCEDURE update_insurance_estimate (
p_api_version IN NUMBER
,p_init_msg_list IN VARCHAR2
,p_transaction_control IN VARCHAR2
,p_insurance_estimate_rec IN ins_est_rec_type
,x_return_status OUT NOCOPY VARCHAR2
,x_msg_count OUT NOCOPY NUMBER
,x_msg_data OUT NOCOPY VARCHAR2
) IS
l_program_name CONSTANT VARCHAR2(30) := 'update_insurance_estimate';
SELECT parent_object_code
FROM okl_lease_quotes_b
WHERE id = p_insurance_estimate_rec.lease_quote_id;
update_row (
p_insurance_estimate_rec => l_insurance_estimate_rec
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
);
update_cashflow (
p_insurance_estimate_rec => l_insurance_estimate_rec
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
);
END update_insurance_estimate;
PROCEDURE delete_insurance_estimate (
p_api_version IN NUMBER
,p_init_msg_list IN VARCHAR2
,p_transaction_control IN VARCHAR2
,p_insurance_estimate_id IN NUMBER
,x_return_status OUT NOCOPY VARCHAR2
,x_msg_count OUT NOCOPY NUMBER
,x_msg_data OUT NOCOPY VARCHAR2
) IS
l_program_name CONSTANT VARCHAR2(30) := 'delete_insurance_estimate';
okl_lease_quote_cashflow_pvt.delete_cashflows (
p_api_version => G_API_VERSION
,p_init_msg_list => G_FALSE
,p_transaction_control => G_FALSE
,p_source_object_code => 'QUOTED_INSURANCE'
,p_source_object_id => p_insurance_estimate_id
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
);
DELETE FROM okl_insurance_estimates_tl WHERE id = p_insurance_estimate_id;
DELETE FROM okl_insurance_estimates_b WHERE id = p_insurance_estimate_id;
END delete_insurance_estimate;
okl_que_pvt.insert_row (
p_api_version => G_API_VERSION
,p_init_msg_list => G_FALSE
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
,p_quev_rec => l_ins_est_rec
,x_quev_rec => lx_ins_est_rec
);