The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT 'x'
FROM OKE_K_HEADERS
WHERE K_HEADER_ID = p_term_rec.K_HEADER_ID;
SELECT 'x'
FROM OKE_K_LINES
WHERE K_LINE_ID = p_term_rec.K_LINE_ID;
SELECT 'x'
FROM OKE_TERM_VALUES_V
WHERE TERM_CODE = p_term_rec.TERM_CODE;
SELECT 'x'
FROM OKE_TERM_VALUES_V
WHERE TERM_VALUE_PK1 = p_term_rec.TERM_VALUE_PK1;
SELECT 'x'
FROM OKE_TERM_VALUES_V
WHERE TERM_VALUE_PK2 = p_term_rec.TERM_VALUE_PK2;
SELECT 'x'
FROM OKE_TERM_VALUES_V
WHERE TERM_CODE = p_term_rec.TERM_CODE AND
TERM_VALUE_PK1 = p_term_rec.TERM_VALUE_PK1 AND
TERM_VALUE_PK2 = p_term_rec.TERM_VALUE_PK2;
IF l_term_rec.LAST_UPDATED_BY = OKE_API.G_MISS_NUM THEN
l_term_rec.LAST_UPDATED_BY := NULL;
IF l_term_rec.LAST_UPDATE_LOGIN = OKE_API.G_MISS_NUM THEN
l_term_rec.LAST_UPDATE_LOGIN := NULL;
IF l_term_rec.LAST_UPDATE_DATE = OKE_API.G_MISS_DATE THEN
l_term_rec.LAST_UPDATE_DATE := NULL;
SELECT
K_HEADER_ID,
K_LINE_ID,
TERM_CODE,
TERM_VALUE_PK1,
TERM_VALUE_PK2,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1 ,
ATTRIBUTE2 ,
ATTRIBUTE3 ,
ATTRIBUTE4 ,
ATTRIBUTE5 ,
ATTRIBUTE6 ,
ATTRIBUTE7 ,
ATTRIBUTE8 ,
ATTRIBUTE9 ,
ATTRIBUTE10 ,
ATTRIBUTE11 ,
ATTRIBUTE12 ,
ATTRIBUTE13 ,
ATTRIBUTE14 ,
ATTRIBUTE15
FROM OKE_K_TERMS a
WHERE
(a.K_HEADER_ID = chr_id)AND(a.TERM_CODE=trm_cd)
AND (a.TERM_VALUE_PK1=TERM_VALUE_PK1)
AND (a.TERM_VALUE_PK2=TERM_VALUE_PK2)
AND(
((a.K_LINE_ID IS NULL)AND(cle_id IS NULL)) OR
(a.K_LINE_ID = cle_id));
l_term_rec.LAST_UPDATE_DATE ,
l_term_rec.LAST_UPDATED_BY ,
l_term_rec.LAST_UPDATE_LOGIN ,
l_term_rec.ATTRIBUTE_CATEGORY ,
l_term_rec.ATTRIBUTE1 ,
l_term_rec.ATTRIBUTE2 ,
l_term_rec.ATTRIBUTE3 ,
l_term_rec.ATTRIBUTE4 ,
l_term_rec.ATTRIBUTE5 ,
l_term_rec.ATTRIBUTE6 ,
l_term_rec.ATTRIBUTE7 ,
l_term_rec.ATTRIBUTE8 ,
l_term_rec.ATTRIBUTE9 ,
l_term_rec.ATTRIBUTE10 ,
l_term_rec.ATTRIBUTE11 ,
l_term_rec.ATTRIBUTE12 ,
l_term_rec.ATTRIBUTE13 ,
l_term_rec.ATTRIBUTE14 ,
l_term_rec.ATTRIBUTE15 ;
-- row level insert
PROCEDURE insert_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_term_rec IN term_rec_type,
x_term_rec OUT NOCOPY term_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'B_insert_row';
l_term_rec.LAST_UPDATE_DATE := SYSDATE;
l_term_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
l_term_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
BEGIN -- insert
l_return_status := OKE_API.START_ACTIVITY(l_api_name,
G_PKG_NAME,
p_init_msg_list,
l_api_version,
p_api_version,
'_PVT',
x_return_status);
INSERT INTO OKE_K_TERMS(
K_HEADER_ID ,
K_LINE_ID ,
TERM_CODE ,
TERM_VALUE_PK1 ,
TERM_VALUE_PK2 ,
CREATION_DATE ,
CREATED_BY ,
LAST_UPDATE_DATE ,
LAST_UPDATED_BY ,
LAST_UPDATE_LOGIN ,
ATTRIBUTE_CATEGORY ,
ATTRIBUTE1 ,
ATTRIBUTE2 ,
ATTRIBUTE3 ,
ATTRIBUTE4 ,
ATTRIBUTE5 ,
ATTRIBUTE6 ,
ATTRIBUTE7 ,
ATTRIBUTE8 ,
ATTRIBUTE9 ,
ATTRIBUTE10 ,
ATTRIBUTE11 ,
ATTRIBUTE12 ,
ATTRIBUTE13 ,
ATTRIBUTE14 ,
ATTRIBUTE15
)
VALUES(
l_def_term_rec.K_HEADER_ID ,
l_def_term_rec.K_LINE_ID ,
l_def_term_rec.TERM_CODE ,
l_def_term_rec.TERM_VALUE_PK1 ,
l_def_term_rec.TERM_VALUE_PK2 ,
l_def_term_rec.CREATION_DATE ,
l_def_term_rec.CREATED_BY ,
l_def_term_rec.LAST_UPDATE_DATE ,
l_def_term_rec.LAST_UPDATED_BY ,
l_def_term_rec.LAST_UPDATE_LOGIN ,
l_def_term_rec.ATTRIBUTE_CATEGORY ,
l_def_term_rec.ATTRIBUTE1 ,
l_def_term_rec.ATTRIBUTE2 ,
l_def_term_rec.ATTRIBUTE3 ,
l_def_term_rec.ATTRIBUTE4 ,
l_def_term_rec.ATTRIBUTE5 ,
l_def_term_rec.ATTRIBUTE6 ,
l_def_term_rec.ATTRIBUTE7 ,
l_def_term_rec.ATTRIBUTE8 ,
l_def_term_rec.ATTRIBUTE9 ,
l_def_term_rec.ATTRIBUTE10 ,
l_def_term_rec.ATTRIBUTE11 ,
l_def_term_rec.ATTRIBUTE12 ,
l_def_term_rec.ATTRIBUTE13 ,
l_def_term_rec.ATTRIBUTE14 ,
l_def_term_rec.ATTRIBUTE15
);
END insert_row; -- row level
-- table level insert
PROCEDURE insert_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_term_tbl IN term_tbl_type,
x_term_tbl OUT NOCOPY term_tbl_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'TBL_insert_row';
insert_row (
p_api_version => p_api_version,
p_init_msg_list => OKE_API.G_FALSE,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_term_rec => p_term_tbl(i),
x_term_rec => x_term_tbl(i));
END insert_row; -- table level
PROCEDURE update_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_term_rec IN term_rec_type,
x_term_rec OUT NOCOPY term_rec_type) IS
l_api_version CONSTANT NUMBER := 1.0;
l_api_name CONSTANT VARCHAR2(30) := 'B_update_row';
l_term_rec.LAST_UPDATE_DATE := SYSDATE;
l_term_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
l_term_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
OKE_API.set_message(G_APP_NAME,G_FORM_RECORD_DELETED);
IF x_term_rec.LAST_UPDATE_DATE = OKE_API.G_MISS_DATE THEN
x_term_rec.LAST_UPDATE_DATE := l_term_rec.LAST_UPDATE_DATE;
IF x_term_rec.LAST_UPDATED_BY = OKE_API.G_MISS_NUM THEN
x_term_rec.LAST_UPDATED_BY := l_term_rec.LAST_UPDATED_BY ;
IF x_term_rec.LAST_UPDATE_LOGIN = OKE_API.G_MISS_NUM THEN
x_term_rec.LAST_UPDATE_LOGIN := l_term_rec.LAST_UPDATE_LOGIN;
BEGIN -- update row
l_return_status := OKE_API.START_ACTIVITY(l_api_name,
G_PKG_NAME,
p_init_msg_list,
l_api_version,
p_api_version,
'_PVT',
x_return_status);
UPDATE OKE_K_TERMS
SET
CREATION_DATE = l_def_term_rec.CREATION_DATE,
CREATED_BY = l_def_term_rec.CREATED_BY,
LAST_UPDATE_DATE = l_def_term_rec.LAST_UPDATE_DATE,
LAST_UPDATED_BY = l_def_term_rec.LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = l_def_term_rec.LAST_UPDATE_LOGIN,
ATTRIBUTE_CATEGORY = l_def_term_rec.ATTRIBUTE_CATEGORY,
ATTRIBUTE1 = l_def_term_rec.ATTRIBUTE1,
ATTRIBUTE2 = l_def_term_rec.ATTRIBUTE2,
ATTRIBUTE3 = l_def_term_rec.ATTRIBUTE3,
ATTRIBUTE4 = l_def_term_rec.ATTRIBUTE4,
ATTRIBUTE5 = l_def_term_rec.ATTRIBUTE5,
ATTRIBUTE6 = l_def_term_rec.ATTRIBUTE6,
ATTRIBUTE7 = l_def_term_rec.ATTRIBUTE7,
ATTRIBUTE8 = l_def_term_rec.ATTRIBUTE8,
ATTRIBUTE9 = l_def_term_rec.ATTRIBUTE9,
ATTRIBUTE10 = l_def_term_rec.ATTRIBUTE10,
ATTRIBUTE11 = l_def_term_rec.ATTRIBUTE11,
ATTRIBUTE12 = l_def_term_rec.ATTRIBUTE12,
ATTRIBUTE13 = l_def_term_rec.ATTRIBUTE13,
ATTRIBUTE14 = l_def_term_rec.ATTRIBUTE14,
ATTRIBUTE15 = l_def_term_rec.ATTRIBUTE15
WHERE
(K_HEADER_ID = l_def_term_rec.K_HEADER_ID)AND
(TERM_CODE = l_def_term_rec.TERM_CODE) AND
(TERM_VALUE_PK1=l_def_term_rec.TERM_VALUE_PK1) AND
(TERM_VALUE_PK2=l_def_term_rec.TERM_VALUE_PK2) AND
((K_LINE_ID = l_def_term_rec.K_LINE_ID)OR
(K_LINE_ID IS NULL)AND(l_def_term_rec.K_LINE_ID IS NULL));
END update_row; -- row level update
PROCEDURE update_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_term_tbl IN term_tbl_type,
x_term_tbl OUT NOCOPY term_tbl_type) IS
l_api_version CONSTANT NUMBER := 1.0;
l_api_name CONSTANT VARCHAR2(30) := 'TBL_update_row';
update_row (
p_api_version => p_api_version,
p_init_msg_list => OKE_API.G_FALSE,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_term_rec => p_term_tbl(i),
x_term_rec => x_term_tbl(i));
END update_row; -- table level update
PROCEDURE delete_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_cle_id IN NUMBER,
p_trm_cd OKE_K_TERMS.TERM_CODE%TYPE,
p_trm_val_pk1 OKE_K_TERMS.TERM_VALUE_PK1%TYPE,
p_trm_val_pk2 OKE_K_TERMS.TERM_VALUE_PK2%TYPE
) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'B_delete_row';
DELETE FROM OKE_K_TERMS
WHERE K_LINE_ID = p_cle_id AND TERM_CODE = p_trm_cd
AND TERM_VALUE_PK1=p_trm_val_pk1
AND TERM_VALUE_PK2=p_trm_val_pk2;
END delete_row;
PROCEDURE delete_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_chr_id IN NUMBER,
p_trm_cd OKE_K_TERMS.TERM_CODE%TYPE,
p_trm_val_pk1 OKE_K_TERMS.TERM_VALUE_PK1%TYPE,
p_trm_val_pk2 OKE_K_TERMS.TERM_VALUE_PK2%TYPE
) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'B_delete_row';
DELETE FROM OKE_K_TERMS
WHERE (K_HEADER_ID=p_chr_id) AND (TERM_CODE=p_trm_cd)
AND (K_LINE_ID IS NULL)
AND (TERM_VALUE_PK1=p_trm_val_pk1)
AND (TERM_VALUE_PK2=p_trm_val_pk2);
END delete_row;
PROCEDURE delete_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_term_rec IN term_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'B_delete_row';
delete_row (
p_api_version => p_api_version,
p_init_msg_list => OKE_API.G_FALSE,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_chr_id => p_term_rec.K_HEADER_ID,
p_trm_cd => p_term_rec.TERM_CODE,
p_trm_val_pk1 => p_term_rec.TERM_VALUE_PK1,
p_trm_val_pk2 => p_term_rec.TERM_VALUE_PK2);
delete_row (
p_api_version => p_api_version,
p_init_msg_list => OKE_API.G_FALSE,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_cle_id => p_term_rec.K_LINE_ID,
p_trm_cd => p_term_rec.TERM_CODE,
p_trm_val_pk1 => p_term_rec.TERM_VALUE_PK1,
p_trm_val_pk2 => p_term_rec.TERM_VALUE_PK2);
END delete_row;
PROCEDURE delete_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_term_tbl IN term_tbl_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'TBL_delete_row';
delete_row (
p_api_version => p_api_version,
p_init_msg_list => OKE_API.G_FALSE,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_term_rec => p_term_tbl(i));
END delete_row; -- table level delete
SELECT k_header_id,k_line_id,term_code FROM oke_k_terms a
WHERE
(a.K_HEADER_ID = p.K_HEADER_ID)AND(a.TERM_CODE=p.TERM_CODE)
AND(a.TERM_VALUE_PK1=p.TERM_VALUE_PK1)
AND(a.TERM_VALUE_PK2=p.TERM_VALUE_PK2)
AND(
((a.K_LINE_ID IS NULL)AND(p.K_LINE_ID IS NULL)) OR
(a.K_LINE_ID = p.K_LINE_ID))
FOR UPDATE NOWAIT;
OKE_API.set_message(G_APP_NAME,G_FORM_RECORD_DELETED);