The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT 'X'
FROM fnd_lookups fndlup
WHERE fndlup.lookup_type = p_lookup_type
AND fndlup.lookup_code = p_lookup_code
AND l_sysdate BETWEEN
NVL(fndlup.start_date_active,l_sysdate)
AND NVL(fndlup.end_date_active,l_sysdate);
SELECT
KHR_ID,
PARAMETER_TYPE_CODE,
EFFECTIVE_FROM_DATE,
EFFECTIVE_TO_DATE,
INTEREST_INDEX_ID,
BASE_RATE,
INTEREST_START_DATE,
ADDER_RATE,
MAXIMUM_RATE,
MINIMUM_RATE,
PRINCIPAL_BASIS_CODE,
DAYS_IN_A_MONTH_CODE,
DAYS_IN_A_YEAR_CODE,
INTEREST_BASIS_CODE,
RATE_DELAY_CODE,
RATE_DELAY_FREQUENCY,
COMPOUNDING_FREQUENCY_CODE,
CALCULATION_FORMULA_ID,
CATCHUP_BASIS_CODE,
CATCHUP_START_DATE,
CATCHUP_SETTLEMENT_CODE,
RATE_CHANGE_START_DATE,
RATE_CHANGE_FREQUENCY_CODE,
RATE_CHANGE_VALUE,
CONVERSION_OPTION_CODE,
NEXT_CONVERSION_DATE,
CONVERSION_TYPE_CODE,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
CATCHUP_FREQUENCY_CODE
FROM Okl_K_Rate_Params_V
WHERE okl_k_rate_params_v.effective_from_date = p_effective_from_date
AND okl_k_rate_params_v.khr_id = p_khr_id
AND okl_k_rate_params_v.parameter_type_code = p_parameter_type_code;
l_krpv_rec.last_updated_by,
l_krpv_rec.last_update_date,
l_krpv_rec.last_update_login,
l_krpv_rec.catchup_frequency_code;
SELECT
KHR_ID,
PARAMETER_TYPE_CODE,
EFFECTIVE_FROM_DATE,
EFFECTIVE_TO_DATE,
INTEREST_INDEX_ID,
BASE_RATE,
INTEREST_START_DATE,
ADDER_RATE,
MAXIMUM_RATE,
MINIMUM_RATE,
PRINCIPAL_BASIS_CODE,
DAYS_IN_A_MONTH_CODE,
DAYS_IN_A_YEAR_CODE,
INTEREST_BASIS_CODE,
RATE_DELAY_CODE,
RATE_DELAY_FREQUENCY,
COMPOUNDING_FREQUENCY_CODE,
CALCULATION_FORMULA_ID,
CATCHUP_BASIS_CODE,
CATCHUP_START_DATE,
CATCHUP_SETTLEMENT_CODE,
RATE_CHANGE_START_DATE,
RATE_CHANGE_FREQUENCY_CODE,
RATE_CHANGE_VALUE,
CONVERSION_OPTION_CODE,
NEXT_CONVERSION_DATE,
CONVERSION_TYPE_CODE,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
CATCHUP_FREQUENCY_CODE
FROM Okl_K_Rate_Params
WHERE okl_k_rate_params.parameter_type_code = p_parameter_type_code
AND okl_k_rate_params.effective_from_date = p_effective_from_date
AND okl_k_rate_params.khr_id = p_khr_id;
l_krp_rec.last_updated_by,
l_krp_rec.last_update_date,
l_krp_rec.last_update_login,
l_krp_rec.catchup_frequency_code;
IF (l_krpv_rec.last_updated_by = OKC_API.G_MISS_NUM ) THEN
l_krpv_rec.last_updated_by := NULL;
IF (l_krpv_rec.last_update_date = OKC_API.G_MISS_DATE ) THEN
l_krpv_rec.last_update_date := NULL;
IF (l_krpv_rec.last_update_login = OKC_API.G_MISS_NUM ) THEN
l_krpv_rec.last_update_login := NULL;
SELECT ID from OKL_FORMULAE_B
WHERE ID = p_id;
SELECT ID from OKL_INDICES
WHERE ID = p_id;
p_to.last_updated_by := p_from.last_updated_by;
p_to.last_update_date := p_from.last_update_date;
p_to.last_update_login := p_from.last_update_login;
p_to.last_updated_by := p_from.last_updated_by;
p_to.last_update_date := p_from.last_update_date;
p_to.last_update_login := p_from.last_update_login;
PROCEDURE insert_row(
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_krp_rec IN krp_rec_type,
x_krp_rec OUT NOCOPY krp_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'B_insert_row';
INSERT INTO OKL_K_RATE_PARAMS(
khr_id,
parameter_type_code,
effective_from_date,
effective_to_date,
interest_index_id,
base_rate,
interest_start_date,
adder_rate,
maximum_rate,
minimum_rate,
principal_basis_code,
days_in_a_month_code,
days_in_a_year_code,
interest_basis_code,
rate_delay_code,
rate_delay_frequency,
compounding_frequency_code,
calculation_formula_id,
catchup_basis_code,
catchup_start_date,
catchup_settlement_code,
rate_change_start_date,
rate_change_frequency_code,
rate_change_value,
conversion_option_code,
next_conversion_date,
conversion_type_code,
attribute_category,
attribute1,
attribute2,
attribute3,
attribute4,
attribute5,
attribute6,
attribute7,
attribute8,
attribute9,
attribute10,
attribute11,
attribute12,
attribute13,
attribute14,
attribute15,
created_by,
creation_date,
last_updated_by,
last_update_date,
last_update_login,
catchup_frequency_code)
VALUES (
l_krp_rec.khr_id,
l_krp_rec.parameter_type_code,
l_krp_rec.effective_from_date,
l_krp_rec.effective_to_date,
l_krp_rec.interest_index_id,
l_krp_rec.base_rate,
l_krp_rec.interest_start_date,
l_krp_rec.adder_rate,
l_krp_rec.maximum_rate,
l_krp_rec.minimum_rate,
l_krp_rec.principal_basis_code,
l_krp_rec.days_in_a_month_code,
l_krp_rec.days_in_a_year_code,
l_krp_rec.interest_basis_code,
l_krp_rec.rate_delay_code,
l_krp_rec.rate_delay_frequency,
l_krp_rec.compounding_frequency_code,
l_krp_rec.calculation_formula_id,
l_krp_rec.catchup_basis_code,
l_krp_rec.catchup_start_date,
l_krp_rec.catchup_settlement_code,
l_krp_rec.rate_change_start_date,
l_krp_rec.rate_change_frequency_code,
l_krp_rec.rate_change_value,
l_krp_rec.conversion_option_code,
l_krp_rec.next_conversion_date,
l_krp_rec.conversion_type_code,
l_krp_rec.attribute_category,
l_krp_rec.attribute1,
l_krp_rec.attribute2,
l_krp_rec.attribute3,
l_krp_rec.attribute4,
l_krp_rec.attribute5,
l_krp_rec.attribute6,
l_krp_rec.attribute7,
l_krp_rec.attribute8,
l_krp_rec.attribute9,
l_krp_rec.attribute10,
l_krp_rec.attribute11,
l_krp_rec.attribute12,
l_krp_rec.attribute13,
l_krp_rec.attribute14,
l_krp_rec.attribute15,
l_krp_rec.created_by,
l_krp_rec.creation_date,
l_krp_rec.last_updated_by,
l_krp_rec.last_update_date,
l_krp_rec.last_update_login,
l_krp_rec.catchup_frequency_code);
END insert_row;
PROCEDURE insert_row(
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_krpv_rec IN krpv_rec_type,
x_krpv_rec OUT NOCOPY krpv_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_insert_row';
l_krpv_rec.LAST_UPDATE_DATE := l_krpv_rec.CREATION_DATE;
l_krpv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
l_krpv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
insert_row(
p_init_msg_list,
l_return_status,
x_msg_count,
x_msg_data,
l_krp_rec,
lx_krp_rec
);
END insert_row;
PROCEDURE insert_row(
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_krpv_tbl IN krpv_tbl_type,
x_krpv_tbl OUT NOCOPY krpv_tbl_type,
px_error_tbl IN OUT NOCOPY OKC_API.ERROR_TBL_TYPE) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_insert_row';
insert_row (
p_api_version => p_api_version,
p_init_msg_list => OKC_API.G_FALSE,
x_return_status => l_error_rec.error_type,
x_msg_count => l_error_rec.msg_count,
x_msg_data => l_error_rec.msg_data,
p_krpv_rec => p_krpv_tbl(i),
x_krpv_rec => x_krpv_tbl(i));
END insert_row;
PROCEDURE insert_row(
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_krpv_tbl IN krpv_tbl_type,
x_krpv_tbl OUT NOCOPY krpv_tbl_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
insert_row (
p_api_version => p_api_version,
p_init_msg_list => OKC_API.G_FALSE,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_krpv_tbl => p_krpv_tbl,
x_krpv_tbl => x_krpv_tbl,
px_error_tbl => l_error_tbl);
END insert_row;
SELECT *
FROM OKL_K_RATE_PARAMS
WHERE PARAMETER_TYPE_CODE = p_krp_rec.parameter_type_code
AND EFFECTIVE_FROM_DATE = p_krp_rec.effective_from_date
AND KHR_ID = p_krp_rec.khr_id
FOR UPDATE NOWAIT;
OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
IF (l_lock_var.last_updated_by <> p_krp_rec.last_updated_by) THEN
OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
IF (l_lock_var.last_update_date <> p_krp_rec.last_update_date) THEN
OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
IF (l_lock_var.last_update_login <> p_krp_rec.last_update_login) THEN
OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
PROCEDURE update_row(
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_krp_rec IN krp_rec_type,
x_krp_rec OUT NOCOPY krp_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'B_update_row';
IF (x_krp_rec.last_updated_by = OKC_API.G_MISS_NUM)
THEN
x_krp_rec.last_updated_by := l_krp_rec.last_updated_by;
IF (x_krp_rec.last_update_date = OKC_API.G_MISS_DATE)
THEN
x_krp_rec.last_update_date := l_krp_rec.last_update_date;
IF (x_krp_rec.last_update_login = OKC_API.G_MISS_NUM)
THEN
x_krp_rec.last_update_login := l_krp_rec.last_update_login;
UPDATE OKL_K_RATE_PARAMS
SET EFFECTIVE_TO_DATE = l_def_krp_rec.effective_to_date,
INTEREST_INDEX_ID = l_def_krp_rec.interest_index_id,
BASE_RATE = l_def_krp_rec.base_rate,
INTEREST_START_DATE = l_def_krp_rec.interest_start_date,
ADDER_RATE = l_def_krp_rec.adder_rate,
MAXIMUM_RATE = l_def_krp_rec.maximum_rate,
MINIMUM_RATE = l_def_krp_rec.minimum_rate,
PRINCIPAL_BASIS_CODE = l_def_krp_rec.principal_basis_code,
DAYS_IN_A_MONTH_CODE = l_def_krp_rec.days_in_a_month_code,
DAYS_IN_A_YEAR_CODE = l_def_krp_rec.days_in_a_year_code,
INTEREST_BASIS_CODE = l_def_krp_rec.interest_basis_code,
RATE_DELAY_CODE = l_def_krp_rec.rate_delay_code,
RATE_DELAY_FREQUENCY = l_def_krp_rec.rate_delay_frequency,
COMPOUNDING_FREQUENCY_CODE = l_def_krp_rec.compounding_frequency_code,
CALCULATION_FORMULA_ID = l_def_krp_rec.calculation_formula_id,
CATCHUP_BASIS_CODE = l_def_krp_rec.catchup_basis_code,
CATCHUP_START_DATE = l_def_krp_rec.catchup_start_date,
CATCHUP_SETTLEMENT_CODE = l_def_krp_rec.catchup_settlement_code,
RATE_CHANGE_START_DATE = l_def_krp_rec.rate_change_start_date,
RATE_CHANGE_FREQUENCY_CODE = l_def_krp_rec.rate_change_frequency_code,
RATE_CHANGE_VALUE = l_def_krp_rec.rate_change_value,
CONVERSION_OPTION_CODE = l_def_krp_rec.conversion_option_code,
NEXT_CONVERSION_DATE = l_def_krp_rec.next_conversion_date,
CONVERSION_TYPE_CODE = l_def_krp_rec.conversion_type_code,
ATTRIBUTE_CATEGORY = l_def_krp_rec.attribute_category,
ATTRIBUTE1 = l_def_krp_rec.attribute1,
ATTRIBUTE2 = l_def_krp_rec.attribute2,
ATTRIBUTE3 = l_def_krp_rec.attribute3,
ATTRIBUTE4 = l_def_krp_rec.attribute4,
ATTRIBUTE5 = l_def_krp_rec.attribute5,
ATTRIBUTE6 = l_def_krp_rec.attribute6,
ATTRIBUTE7 = l_def_krp_rec.attribute7,
ATTRIBUTE8 = l_def_krp_rec.attribute8,
ATTRIBUTE9 = l_def_krp_rec.attribute9,
ATTRIBUTE10 = l_def_krp_rec.attribute10,
ATTRIBUTE11 = l_def_krp_rec.attribute11,
ATTRIBUTE12 = l_def_krp_rec.attribute12,
ATTRIBUTE13 = l_def_krp_rec.attribute13,
ATTRIBUTE14 = l_def_krp_rec.attribute14,
ATTRIBUTE15 = l_def_krp_rec.attribute15,
CREATED_BY = l_def_krp_rec.created_by,
CREATION_DATE = l_def_krp_rec.creation_date,
LAST_UPDATED_BY = l_def_krp_rec.last_updated_by,
LAST_UPDATE_DATE = l_def_krp_rec.last_update_date,
LAST_UPDATE_LOGIN = l_def_krp_rec.last_update_login,
CATCHUP_FREQUENCY_CODE = l_def_krp_rec.catchup_frequency_code
WHERE PARAMETER_TYPE_CODE = l_def_krp_rec.parameter_type_code AND EFFECTIVE_FROM_DATE = l_def_krp_rec.effective_from_date AND KHR_ID = l_def_krp_rec.khr_id;
END update_row;
PROCEDURE update_row(
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_krpv_rec IN krpv_rec_type,
x_krpv_rec OUT NOCOPY krpv_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
l_krpv_rec.LAST_UPDATE_DATE := SYSDATE;
l_krpv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
l_krpv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
IF (x_krpv_rec.last_updated_by = OKC_API.G_MISS_NUM)
THEN
x_krpv_rec.last_updated_by := l_db_krpv_rec.last_updated_by;
IF (x_krpv_rec.last_update_date = OKC_API.G_MISS_DATE)
THEN
x_krpv_rec.last_update_date := l_db_krpv_rec.last_update_date;
IF (x_krpv_rec.last_update_login = OKC_API.G_MISS_NUM)
THEN
x_krpv_rec.last_update_login := l_db_krpv_rec.last_update_login;
update_row(
p_init_msg_list,
l_return_status,
x_msg_count,
x_msg_data,
l_krp_rec,
lx_krp_rec
);
END update_row;
PROCEDURE update_row(
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_krpv_tbl IN krpv_tbl_type,
x_krpv_tbl OUT NOCOPY krpv_tbl_type,
px_error_tbl IN OUT NOCOPY OKC_API.ERROR_TBL_TYPE) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_update_row';
update_row (
p_api_version => p_api_version,
p_init_msg_list => OKC_API.G_FALSE,
x_return_status => l_error_rec.error_type,
x_msg_count => l_error_rec.msg_count,
x_msg_data => l_error_rec.msg_data,
p_krpv_rec => p_krpv_tbl(i),
x_krpv_rec => x_krpv_tbl(i));
END update_row;
PROCEDURE update_row(
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_krpv_tbl IN krpv_tbl_type,
x_krpv_tbl OUT NOCOPY krpv_tbl_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
update_row (
p_api_version => p_api_version,
p_init_msg_list => OKC_API.G_FALSE,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_krpv_tbl => p_krpv_tbl,
x_krpv_tbl => x_krpv_tbl,
px_error_tbl => l_error_tbl);
END update_row;
PROCEDURE delete_row(
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_krp_rec IN krp_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'B_delete_row';
DELETE FROM OKL_K_RATE_PARAMS
WHERE PARAMETER_TYPE_CODE = p_krp_rec.parameter_type_code
AND EFFECTIVE_FROM_DATE = p_krp_rec.effective_from_date
AND KHR_ID = p_krp_rec.khr_id;
END delete_row;
PROCEDURE delete_row(
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_krpv_rec IN krpv_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
delete_row(
p_init_msg_list,
l_return_status,
x_msg_count,
x_msg_data,
l_krp_rec
);
END delete_row;
PROCEDURE delete_row(
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_krpv_tbl IN krpv_tbl_type,
px_error_tbl IN OUT NOCOPY OKC_API.ERROR_TBL_TYPE) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_delete_row';
delete_row (
p_api_version => p_api_version,
p_init_msg_list => OKC_API.G_FALSE,
x_return_status => l_error_rec.error_type,
x_msg_count => l_error_rec.msg_count,
x_msg_data => l_error_rec.msg_data,
p_krpv_rec => p_krpv_tbl(i));
END delete_row;
PROCEDURE delete_row(
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_krpv_tbl IN krpv_tbl_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
delete_row (
p_api_version => p_api_version,
p_init_msg_list => OKC_API.G_FALSE,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_krpv_tbl => p_krpv_tbl,
px_error_tbl => l_error_tbl);
END delete_row;