The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT id
FROM okl_cash_flow_levels
WHERE caf_id = p_cf_header_id
ORDER BY start_date;
IF UPPER(p_cashflow_level_tbl(i).record_mode) NOT IN ('CREATE', 'UPDATE') OR p_cashflow_level_tbl(i).record_mode IS NULL THEN
OKL_API.SET_MESSAGE (
p_app_name => G_APP_NAME
,p_msg_name => 'OKL_INVALID_VALUE2'
,p_token1 => 'API_NAME'
,p_token1_value => UPPER(l_api_name)
,p_token2 => 'NAME'
,p_token2_value => '('||i||') record_mode'
,p_token3 => 'VALUE'
,p_token3_value => UPPER(p_cashflow_level_tbl(i).record_mode)
);
SELECT
lop.currency_code
,lsq.expected_start_date
,lsq.term
,lsq.pricing_method
FROM
okl_lease_quotes_b lsq
,okl_lease_opportunities_b lop
WHERE lsq.id = p_quote_id
AND lsq.parent_object_code = 'LEASEOPP'
AND lsq.parent_object_id = lop.id;
SELECT
lap.currency_code
,lsq.expected_start_date
,lsq.term
,lsq.pricing_method
FROM
okl_lease_quotes_b lsq
,okl_lease_applications_b lap
WHERE lsq.id = p_quote_id
AND lsq.parent_object_code = 'LEASEAPP'
AND lsq.parent_object_id = lap.id;
SELECT
currency_code
,expected_start_date
,term
,pricing_method
FROM
okl_quick_quotes_b
WHERE id = p_quote_id;
PROCEDURE insert_rows (
p_cashflow_header_rec IN OUT NOCOPY cashflow_header_rec_type
,p_cashflow_level_tbl IN OUT NOCOPY cashflow_level_tbl_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_rows';
okl_cfo_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_cfov_rec => l_cfov_rec
,x_cfov_rec => lx_cfov_rec
);
okl_caf_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_cafv_rec => l_cafv_rec
,x_cafv_rec => lx_cafv_rec
);
okl_cfl_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_cflv_tbl => l_cflv_tbl
,x_cflv_tbl => lx_cflv_tbl
);
END insert_rows;
PROCEDURE insert_update_rows (
p_cashflow_header_rec IN OUT NOCOPY cashflow_header_rec_type
,p_cashflow_level_tbl IN OUT NOCOPY cashflow_level_tbl_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_update_rows';
okl_caf_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_cafv_rec => l_cafv_rec
,x_cafv_rec => lx_cafv_rec
);
ELSIF UPPER(p_cashflow_level_tbl(i).record_mode) = 'UPDATE' THEN
l_cflv_upd_tbl(i).id := p_cashflow_level_tbl(i).cashflow_level_id;
okl_cfl_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_cflv_tbl => l_cflv_ins_tbl
,x_cflv_tbl => lx_cflv_tbl
);
okl_cfl_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_cflv_tbl => l_cflv_upd_tbl
,x_cflv_tbl => lx_cflv_tbl
);
END insert_update_rows;
PROCEDURE get_deleted_cashflow_levels (p_cashflow_header_id IN NUMBER,
p_cashflow_level_tbl IN cashflow_level_tbl_type,
x_deleted_cashflow_level_tbl OUT NOCOPY cflv_tbl_type,
x_return_status OUT NOCOPY VARCHAR2) IS
l_program_name CONSTANT VARCHAR2(30) := 'get_deleted_cashflow_levels';
SELECT id
FROM okl_cash_flow_levels
WHERE caf_id = p_cashflow_header_id;
l_delete_flag VARCHAR2(1);
l_delete_flag := 'Y';
l_delete_flag := 'N';
IF l_delete_flag = 'Y' THEN
l_cashflow_level_tbl(i).id := l_db_cashflow_levels.id;
x_deleted_cashflow_level_tbl := l_cashflow_level_tbl;
END get_deleted_cashflow_levels;
l_deleted_cf_level_tbl cflv_tbl_type;
get_deleted_cashflow_levels (
p_cashflow_header_id => p_cashflow_header_rec.cashflow_header_id
,p_cashflow_level_tbl => p_cashflow_level_tbl
,x_deleted_cashflow_level_tbl => l_deleted_cf_level_tbl
,x_return_status => x_return_status
);
IF l_deleted_cf_level_tbl.COUNT > 0 THEN
okl_cfl_pvt.delete_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_cflv_tbl => l_deleted_cf_level_tbl
);
okl_caf_pvt.delete_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_cafv_rec => l_cafv_rec
);
okl_cfo_pvt.delete_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_cfov_rec => l_cfov_rec
);
insert_rows (
p_cashflow_header_rec => p_cashflow_header_rec
,p_cashflow_level_tbl => p_cashflow_level_tbl
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
);
PROCEDURE update_cashflow (
p_api_version IN NUMBER
,p_init_msg_list IN VARCHAR2
,p_transaction_control IN VARCHAR2
,p_cashflow_header_rec IN OUT NOCOPY cashflow_header_rec_type
,p_cashflow_level_tbl IN OUT NOCOPY cashflow_level_tbl_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';
insert_update_rows (
p_cashflow_header_rec => p_cashflow_header_rec
,p_cashflow_level_tbl => p_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 pricing_method,status,parent_object_code
FROM OKL_LEASE_QUOTES_B
where id = p_lease_quote_id;
SELECT id
FROM okl_cash_flow_objects
WHERE
oty_code = p_oty_code
AND source_table = p_source_table
AND source_id = p_source_id;
SELECT id, sty_id, due_arrears_yn, cft_code , sts_code
FROM okl_cash_flows
WHERE cfo_id = p_cfo_id;
SELECT amount, number_of_periods, fqy_code, stub_days, stub_amount, rate , missing_pmt_flag
FROM OKL_CASH_FLOW_LEVELS
WHERE caf_id = p_caf_id;
SELECT parent_object_code
INTO lv_parent_object_code
FROM okl_lease_quotes_b
WHERE id = p_quote_id;*/
l_cashflow_level_tbl.delete;
PROCEDURE delete_cashflows (
p_api_version IN NUMBER
,p_init_msg_list IN VARCHAR2
,p_transaction_control IN VARCHAR2
,p_source_object_code IN VARCHAR2
,p_source_object_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_cashflows';
DELETE FROM okl_cash_flow_levels WHERE caf_id IN
(SELECT id FROM okl_cash_flows WHERE cfo_id IN
(SELECT id
FROM okl_cash_flow_objects
WHERE oty_code = p_source_object_code AND source_table = l_source_table AND source_id = p_source_object_id
)
);
DELETE FROM okl_cash_flows WHERE cfo_id IN
(SELECT id
FROM okl_cash_flow_objects
WHERE oty_code = p_source_object_code AND source_table = l_source_table AND source_id = p_source_object_id
);
DELETE FROM okl_cash_flow_objects
WHERE oty_code = p_source_object_code AND source_table = l_source_table AND source_id = p_source_object_id;
END delete_cashflows;
PROCEDURE delete_cashflow (
p_api_version IN NUMBER
,p_init_msg_list IN VARCHAR2
,p_transaction_control IN VARCHAR2
,p_cashflow_header_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_cashflow';
DELETE FROM okl_cash_flow_levels WHERE caf_id = p_cashflow_header_id;
DELETE FROM okl_cash_flows WHERE id = p_cashflow_header_id;
END delete_cashflow;
PROCEDURE delete_cashflow_level (
p_api_version IN NUMBER
,p_init_msg_list IN VARCHAR2
,p_transaction_control IN VARCHAR2
,p_cashflow_level_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_cashflow_level';
DELETE FROM okl_cash_flow_levels WHERE id = p_cashflow_level_id;
END delete_cashflow_level;
l_deleted_cf_level_tbl cflv_tbl_type;
SELECT id
FROM okl_cash_flows
WHERE sts_code = 'WORK'
AND DNZ_QTE_ID = p_quote_id;
SELECT distinct a.id
FROM okl_cash_flow_levels a,
okl_cash_flows b
WHERE a.caf_id = b.id
AND b.sts_code = 'WORK'
AND B.DNZ_QTE_ID = p_quote_id;
SELECT cfo_id
FROM okl_cash_flows
WHERE sts_code = 'WORK'
AND DNZ_QTE_ID = p_quote_id;
SELECT distinct a.id, a.object_version_number
FROM okl_cash_flow_levels a,
okl_cash_flows b,
okl_lease_quotes_b qte
WHERE a.caf_id = b.id
AND a.missing_pmt_flag = 'Y'
AND B.DNZ_QTE_ID = p_quote_id
AND B.DNZ_QTE_ID = qte.id
AND qte.pricing_method = 'SM';
select cdj.id
from okl_cost_adjustments_b cdj,
okl_assets_b ast
where cdj.adjustment_source_type = p_adj_src_type
and cdj.parent_object_code ='ASSET'
and cdj.parent_object_id = ast.id
and ast.parent_object_code = 'LEASEQUOTE'
and ast.parent_object_id = p_qte_id;
l_deleted_cf_level_tbl(i).id := l_db_cashflow_levels.id;
IF l_deleted_cf_level_tbl.COUNT > 0 THEN
okl_cfl_pvt.delete_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_cflv_tbl => l_deleted_cf_level_tbl
);
okl_cfo_pvt.delete_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_cfov_rec => l_cfov_rec
);
okl_caf_pvt.delete_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_cafv_rec => l_cafv_rec
);
okl_cfl_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_cflv_tbl => l_sm_cashflow_levels_tbl
,x_cflv_tbl => x_sm_cashflow_levels_tbl
);
SELECT pricing_method
INTO l_pricing_method
FROM okl_lease_quotes_b
WHERE ID = p_quote_id;
okl_cdj_pvt.delete_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_cdjv_tbl => l_cdjv_tbl
);
OKL_LEASE_QUOTE_PVT.update_lease_qte (
p_api_version => G_API_VERSION
,p_init_msg_list => G_FALSE
,p_transaction_control => G_TRUE
,p_lease_qte_rec => l_lease_qte_rec
,x_lease_qte_rec => x_lease_qte_rec
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data);
SELECT id,
expected_start_date,
term,
end_of_term_option_id,
pricing_method,
structured_pricing,
rate_template_id,
rate_card_id,
target_amount,
target_arrears,
target_frequency,
lease_rate_factor,
target_rate,
target_rate_type,
target_periods
FROM okl_quick_quotes_b where
id = p_estimate_id;
SELECT
attribute_category
,attribute1
,attribute2
,attribute3
,attribute4
,attribute5
,attribute6
,attribute7
,attribute8
,attribute9
,attribute10
,attribute11
,attribute12
,attribute13
,attribute14
,attribute15
,reference_number
,object_version_number
,parent_object_id
,parent_object_code
,valid_from
,valid_to
,customer_bookclass
,customer_taxowner
,expected_start_date
,expected_funding_date
,expected_delivery_date
,pricing_method
,term
,product_id
,end_of_term_option_id
,usage_category
,usage_industry_class
,usage_industry_code
,usage_amount
,usage_location_id
,property_tax_applicable
,property_tax_billing_type
,upfront_tax_treatment
,upfront_tax_stream_type
,transfer_of_title
,age_of_equipment
,purchase_of_lease
,sale_and_lease_back
,interest_disclosed
,target_rate_type
,target_rate
,target_amount
,target_frequency
,target_arrears_yn
,target_periods
,structured_pricing
,line_level_pricing
,lease_rate_factor
,rate_card_id
,rate_template_id
,iir
,booking_yield
,pirr
,airr
,sub_iir
,sub_booking_yield
,sub_pirr
,sub_airr
,primary_quote
,short_description
,description
,comments
FROM okl_lease_quotes_v
where id= p_quote_id;
SELECT STRM.STY_ID PAYMENT_TYPE_ID,
STRM.STY_NAME PAYMENT_TYPE,
STRM.START_DATE,
STRM.END_DATE,
STRM.STY_PURPOSE
FROM OKL_STRM_TMPT_PRIMARY_UV STRM
WHERE STY_PURPOSE = strm_purpose
AND START_DATE <= expStartDate
AND NVL(END_DATE, expStartDate) >= expStartDate
AND STRM.PDT_ID = pdtId;
SELECT id
FROM okl_cash_flow_objects
WHERE
oty_code = p_oty_code
AND source_table = p_source_table
AND source_id = p_source_id;
SELECT id, sty_id, due_arrears_yn, cft_code
FROM okl_cash_flows
WHERE cfo_id = p_cfo_id;
SELECT amount, number_of_periods, fqy_code, stub_days, stub_amount, rate
FROM OKL_CASH_FLOW_LEVELS
WHERE caf_id = p_caf_id;
l_cashflow_level_tbl.delete;
OKL_LEASE_QUOTE_PVT.update_lease_qte (
p_api_version => G_API_VERSION
,p_init_msg_list => G_FALSE
,p_transaction_control => G_TRUE
,p_lease_qte_rec => l_lease_qte_rec
,x_lease_qte_rec => x_lease_qte_rec
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data);