The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT object_version_number
FROM okl_fe_crit_cat_objects
WHERE object_class_id = p_eco_rec.object_class_id
AND object_version_number = p_eco_rec.object_version_number
FOR UPDATE OF object_version_number NOWAIT;
SELECT object_version_number
FROM okl_fe_crit_cat_objects
WHERE object_class_id = p_eco_rec.object_class_id;
okl_api.set_message(g_fnd_app, g_form_record_deleted);
okl_api.set_message(g_app_name, g_record_logically_deleted);
SELECT 'x'
FROM okl_fe_crit_cat_def_v
WHERE crit_cat_def_id = p_crit_cat_def_id;
SELECT object_class_id
,object_version_number
,crit_cat_def_id
,object_class_code
,created_by
,creation_date
,last_updated_by
,last_update_date
,last_update_login
FROM okl_fe_crit_cat_objects
WHERE okl_fe_crit_cat_objects.object_class_id = p_id;
,l_eco_rec.last_updated_by
,l_eco_rec.last_update_date
,l_eco_rec.last_update_login ;
IF (l_eco_rec.last_updated_by = okl_api.g_miss_num) THEN
l_eco_rec.last_updated_by := NULL;
IF (l_eco_rec.last_update_date = okl_api.g_miss_date) THEN
l_eco_rec.last_update_date := NULL;
IF (l_eco_rec.last_update_login = okl_api.g_miss_num) THEN
l_eco_rec.last_update_login := NULL;
PROCEDURE insert_row(p_api_version IN number
,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
,x_return_status OUT NOCOPY varchar2
,x_msg_count OUT NOCOPY number
,x_msg_data OUT NOCOPY varchar2
,p_eco_rec IN okl_eco_rec
,x_eco_rec OUT NOCOPY okl_eco_rec) IS
l_api_version CONSTANT number := 1;
l_api_name CONSTANT varchar2(30) := 'insert_row';
l_eco_rec.last_update_date := sysdate;
l_eco_rec.last_updated_by := fnd_global.user_id;
l_eco_rec.last_update_login := fnd_global.login_id;
INSERT INTO okl_fe_crit_cat_objects
(object_class_id
,object_version_number
,crit_cat_def_id
,object_class_code
,created_by
,creation_date
,last_updated_by
,last_update_date
,last_update_login)
VALUES (l_def_eco_rec.object_class_id
,l_def_eco_rec.object_version_number
,l_def_eco_rec.crit_cat_def_id
,l_def_eco_rec.object_class_code
,l_def_eco_rec.created_by
,l_def_eco_rec.creation_date
,l_def_eco_rec.last_updated_by
,l_def_eco_rec.last_update_date
,l_def_eco_rec.last_update_login);
END insert_row;
PROCEDURE insert_row(p_api_version IN number
,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
,x_return_status OUT NOCOPY varchar2
,x_msg_count OUT NOCOPY number
,x_msg_data OUT NOCOPY varchar2
,p_eco_tbl IN okl_eco_tbl
,x_eco_tbl OUT NOCOPY okl_eco_tbl) IS
l_api_version CONSTANT number := 1;
l_api_name CONSTANT varchar2(30) := 'insert_row_tbl';
insert_row(p_api_version => p_api_version
,p_init_msg_list => okl_api.g_false
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
,p_eco_rec => p_eco_tbl(i)
,x_eco_rec => x_eco_tbl(i));
END insert_row;
PROCEDURE update_row(p_api_version IN number
,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
,x_return_status OUT NOCOPY varchar2
,x_msg_count OUT NOCOPY number
,x_msg_data OUT NOCOPY varchar2
,p_eco_rec IN okl_eco_rec
,x_eco_rec OUT NOCOPY okl_eco_rec) IS
l_api_version CONSTANT number := 1;
l_api_name CONSTANT varchar2(30) := 'update_row';
l_eco_rec.last_update_date := sysdate;
l_eco_rec.last_updated_by := fnd_global.user_id;
l_eco_rec.last_update_login := fnd_global.login_id;
UPDATE okl_fe_crit_cat_objects
SET object_class_id = l_def_eco_rec.object_class_id
,object_version_number = l_def_eco_rec.object_version_number + 1
,crit_cat_def_id = l_def_eco_rec.crit_cat_def_id
,object_class_code = l_def_eco_rec.object_class_code
,created_by = l_def_eco_rec.created_by
,creation_date = l_def_eco_rec.creation_date
,last_updated_by = l_def_eco_rec.last_updated_by
,last_update_date = l_def_eco_rec.last_update_date
,last_update_login = l_def_eco_rec.last_update_login
WHERE object_class_id = l_def_eco_rec.object_class_id;
END update_row;
PROCEDURE update_row(p_api_version IN number
,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
,x_return_status OUT NOCOPY varchar2
,x_msg_count OUT NOCOPY number
,x_msg_data OUT NOCOPY varchar2
,p_eco_tbl IN okl_eco_tbl
,x_eco_tbl OUT NOCOPY okl_eco_tbl) IS
l_api_version CONSTANT number := 1;
l_api_name CONSTANT varchar2(30) := 'update_row_tbl';
update_row(p_api_version => p_api_version
,p_init_msg_list => okl_api.g_false
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
,p_eco_rec => p_eco_tbl(i)
,x_eco_rec => x_eco_tbl(i));
END update_row;
PROCEDURE delete_row(p_api_version IN number
,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
,x_return_status OUT NOCOPY varchar2
,x_msg_count OUT NOCOPY number
,x_msg_data OUT NOCOPY varchar2
,p_eco_rec IN okl_eco_rec) IS
l_api_version CONSTANT number := 1;
l_api_name CONSTANT varchar2(30) := 'delete_row';
DELETE FROM okl_fe_crit_cat_objects
WHERE object_class_id = l_eco_rec.object_class_id;
END delete_row;
PROCEDURE delete_row(p_api_version IN number
,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
,x_return_status OUT NOCOPY varchar2
,x_msg_count OUT NOCOPY number
,x_msg_data OUT NOCOPY varchar2
,p_eco_tbl IN okl_eco_tbl) IS
l_api_version CONSTANT number := 1;
l_api_name CONSTANT varchar2(30) := 'delete_row_tbl';
delete_row(p_api_version => p_api_version
,p_init_msg_list => okl_api.g_false
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
,p_eco_rec => p_eco_tbl(i));
END delete_row;
p_last_update_date IN VARCHAR2) IS
id NUMBER;
f_ludate DATE; -- entity update date in file
db_ludate DATE; -- entity update date in db
f_ludate := nvl(to_date(p_last_update_date, 'YYYY/MM/DD'), sysdate);
SELECT ID , LAST_UPDATED_BY, LAST_UPDATE_DATE
into id, db_luby, db_ludate
from OKL_FE_CRIT_CAT_OBJECTS
where OBJECT_CLASS_ID = p_object_class_id;
UPDATE OKL_FE_CRIT_CAT_OBJECTS
SET
OBJECT_VERSION_NUMBER = p_object_version_number,
CRIT_CAT_DEF_ID = to_number(p_crit_cat_def_id),
OBJECT_CLASS_CODE = p_object_class_code,
LAST_UPDATE_DATE = f_ludate,
LAST_UPDATED_BY = f_luby,
LAST_UPDATE_LOGIN = 0
WHERE OBJECT_CLASS_ID = to_number(p_object_class_id);
INSERT INTO OKL_FE_CRIT_CAT_OBJECTS
(OBJECT_CLASS_ID,
OBJECT_VERSION_NUMBER,
CRIT_CAT_DEF_ID,
OBJECT_CLASS_CODE,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN
)
VALUES(
TO_NUMBER(p_object_class_id),
p_OBJECT_VERSION_NUMBER,
TO_NUMBER(p_crit_cat_def_id),
p_object_class_code,
f_luby,
f_ludate,
f_luby,
f_ludate,
0);