The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT
LSE_ID,
JTOT_OBJECT_CODE,
START_DATE,
OBJECT_VERSION_NUMBER,
ACCESS_LEVEL,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
END_DATE,
LAST_UPDATE_LOGIN
FROM Okc_Line_Style_Sources
WHERE okc_line_style_sources.lse_id = p_lse_id
AND okc_line_style_sources.jtot_object_code = p_jtot_object_code;
l_lss_rec.LAST_UPDATED_BY,
l_lss_rec.LAST_UPDATE_DATE,
l_lss_rec.END_DATE,
l_lss_rec.LAST_UPDATE_LOGIN;
SELECT
LSE_ID,
JTOT_OBJECT_CODE,
OBJECT_VERSION_NUMBER,
ACCESS_LEVEL,
START_DATE,
END_DATE,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN
FROM Okc_Line_Style_Sources
WHERE okc_line_style_sources.lse_id = p_lse_id
AND okc_line_style_sources.jtot_object_code = p_jtot_object_code;
l_lssv_rec.LAST_UPDATED_BY,
l_lssv_rec.LAST_UPDATE_DATE,
l_lssv_rec.LAST_UPDATE_LOGIN;
IF (l_lssv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
l_lssv_rec.last_updated_by := NULL;
IF (l_lssv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
l_lssv_rec.last_update_date := NULL;
IF (l_lssv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN
l_lssv_rec.last_update_login := NULL;
Cursor C1 is select start_date from okc_line_style_sources where lse_id=p_lssv_rec.lse_id
and end_date is null and jtot_object_code<>p_lssv_rec.jtot_object_code;
Cursor C2(p_date IN date) is select start_date,nvl(end_date,p_date+1)
from OKC_LINE_STYLE_SOURCES where
lse_id=p_lssv_rec.lse_id and jtot_object_code<>p_lssv_rec.jtot_object_code;
Cursor C1 is select start_date from okc_line_style_sources where lse_id=p_lssv_rec.lse_id
and end_date is null;
Cursor C2(p_date IN date) is select p_date from OKC_LINE_STYLE_SOURCES where
lse_id=p_lssv_rec.lse_id and jtot_object_code<>p_lssv_rec.jtot_object_code and
trunc(p_date) between trunc(start_date) and trunc(nvl(end_date,p_date));
Cursor C3(p_date IN date) is select start_date from OKC_LINE_STYLE_SOURCES where
lse_id=p_lssv_rec.lse_id and jtot_object_code<>p_lssv_rec.jtot_object_code and
trunc(start_date) between trunc(p_date) and trunc(end_date);
SELECT lty_code
FROM OKC_LINE_STYLES_B
WHERE id = p_lse_id;
SELECT '1'
FROM JTF_OBJECTS_B a,jtf_object_usages b
WHERE a.object_code = p_jtot_object_code
and sysdate between nvl(a.start_date_active,sysdate) and nvl(a.end_date_active,sysdate)
and a.object_code=b.object_code and b.object_user_code='OKX_LINES';
select OBJECT_USER_CODE
from JTF_OBJECT_USAGES where
OBJECT_CODE = p_lssv_rec.JTOT_OBJECT_CODE
AND OBJECT_USER_CODE = 'OKX_MTL_SYSTEM_ITEM';
Select item_to_price_yn into l_item_to_price_yn from OKC_LINE_STYLES_B
where id = p_lssv_rec.lse_id;
SELECT 'x'
FROM okc_line_style_sources
WHERE lse_id = p_lssv_rec.LSE_ID
AND jtot_object_code = p_lssv_rec.JTOT_OBJECT_CODE;
SELECT 'x'
FROM okc_line_style_sources
WHERE lse_id = p_lssv_rec.LSE_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 ,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_lss_rec IN lss_rec_type,
x_lss_rec OUT NOCOPY lss_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'SOURCES_insert_row';
okc_debug.set_indentation('insert_row');
okc_debug.log('100:inside insert row',1 );
INSERT INTO OKC_LINE_STYLE_SOURCES(
lse_id,
jtot_object_code,
start_date,
object_version_number,
access_level,
created_by,
creation_date,
last_updated_by,
last_update_date,
end_date,
last_update_login)
VALUES (
l_lss_rec.lse_id,
l_lss_rec.jtot_object_code,
l_lss_rec.start_date,
l_lss_rec.object_version_number,
l_lss_rec.access_level,
l_lss_rec.created_by,
l_lss_rec.creation_date,
l_lss_rec.last_updated_by,
l_lss_rec.last_update_date,
l_lss_rec.end_date,
l_lss_rec.last_update_login);
END insert_row;
PROCEDURE insert_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 ,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_lssv_rec IN lssv_rec_type,
x_lssv_rec OUT NOCOPY lssv_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_insert_row';
l_lssv_rec.LAST_UPDATE_DATE := SYSDATE;
l_lssv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
l_lssv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
insert_row(
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
l_lss_rec,
lx_lss_rec
);
END insert_row;
PROCEDURE insert_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 ,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_lssv_tbl IN lssv_tbl_type,
x_lssv_tbl OUT NOCOPY lssv_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_lssv_rec => p_lssv_tbl(i),
x_lssv_rec => x_lssv_tbl(i));
END insert_row;
SELECT OBJECT_VERSION_NUMBER
FROM OKC_LINE_STYLE_SOURCES
WHERE LSE_ID = p_lss_rec.lse_id
AND JTOT_OBJECT_CODE = p_lss_rec.jtot_object_code
AND OBJECT_VERSION_NUMBER = p_lss_rec.object_version_number
FOR UPDATE OF OBJECT_VERSION_NUMBER NOWAIT;
SELECT OBJECT_VERSION_NUMBER
FROM OKC_LINE_STYLE_SOURCES
WHERE LSE_ID = p_lss_rec.lse_id
AND JTOT_OBJECT_CODE = p_lss_rec.jtot_object_code;
OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
PROCEDURE update_row(
p_init_msg_list IN VARCHAR2 ,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_lss_rec IN lss_rec_type,
x_lss_rec OUT NOCOPY lss_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'SOURCES_update_row';
IF (x_lss_rec.last_updated_by = OKC_API.G_MISS_NUM)
THEN
x_lss_rec.last_updated_by := l_lss_rec.last_updated_by;
IF (x_lss_rec.last_update_date = OKC_API.G_MISS_DATE)
THEN
x_lss_rec.last_update_date := l_lss_rec.last_update_date;
IF (x_lss_rec.last_update_login = OKC_API.G_MISS_NUM)
THEN
x_lss_rec.last_update_login := l_lss_rec.last_update_login;
okc_debug.set_indentation('update_row');
okc_debug.log('200:in update row',1);
UPDATE OKC_LINE_STYLE_SOURCES
SET START_DATE = l_def_lss_rec.start_date,
OBJECT_VERSION_NUMBER = l_def_lss_rec.object_version_number,
CREATED_BY = l_def_lss_rec.created_by,
CREATION_DATE = l_def_lss_rec.creation_date,
LAST_UPDATED_BY = l_def_lss_rec.last_updated_by,
LAST_UPDATE_DATE = l_def_lss_rec.last_update_date,
END_DATE = l_def_lss_rec.end_date,
LAST_UPDATE_LOGIN = l_def_lss_rec.last_update_login,
ACCESS_LEVEL = l_def_lss_rec.access_level
WHERE LSE_ID = l_def_lss_rec.lse_id
AND JTOT_OBJECT_CODE = l_def_lss_rec.jtot_object_code;
END update_row;
PROCEDURE update_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 ,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_lssv_rec IN lssv_rec_type,
x_lssv_rec OUT NOCOPY lssv_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
l_lssv_rec.LAST_UPDATE_DATE := SYSDATE;
l_lssv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
l_lssv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
IF (x_lssv_rec.last_updated_by = OKC_API.G_MISS_NUM)
THEN
x_lssv_rec.last_updated_by := l_lssv_rec.last_updated_by;
IF (x_lssv_rec.last_update_date = OKC_API.G_MISS_DATE)
THEN
x_lssv_rec.last_update_date := l_lssv_rec.last_update_date;
IF (x_lssv_rec.last_update_login = OKC_API.G_MISS_NUM)
THEN
x_lssv_rec.last_update_login := l_lssv_rec.last_update_login;
update_row(
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
l_lss_rec,
lx_lss_rec
);
END update_row;
PROCEDURE update_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 ,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_lssv_tbl IN lssv_tbl_type,
x_lssv_tbl OUT NOCOPY lssv_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_lssv_rec => p_lssv_tbl(i),
x_lssv_rec => x_lssv_tbl(i));
END update_row;
PROCEDURE delete_row(
p_init_msg_list IN VARCHAR2 ,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_lss_rec IN lss_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'SOURCES_delete_row';
DELETE FROM OKC_LINE_STYLE_SOURCES
WHERE LSE_ID = l_lss_rec.lse_id AND
JTOT_OBJECT_CODE = l_lss_rec.jtot_object_code;
END delete_row;
PROCEDURE delete_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 ,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_lssv_rec IN lssv_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
delete_row(
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
l_lss_rec
);
END delete_row;
PROCEDURE delete_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 ,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_lssv_tbl IN lssv_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_lssv_rec => p_lssv_tbl(i));
END delete_row;