The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure INSERT_ROW
(
X_ROWID OUT NOCOPY VARCHAR2,
X_SESSION_ID OUT NOCOPY NUMBER,
P_SOURCE_OBJECT_CODE in VARCHAR2,
P_SOURCE_OBJECT_ID in NUMBER,
P_CREATION_DATE in DATE,
P_CREATED_BY in NUMBER,
P_LAST_UPDATE_DATE in DATE,
P_LAST_UPDATED_BY in NUMBER,
P_LAST_UPDATE_LOGIN in NUMBER
)
is
cursor getNewSessionIdCsr is
select cs_kb_sessions_s.nextval
from dual;
select ROWID
from CS_KB_SESSIONS
where SESSION_ID = X_SESSION_ID;
insert into cs_kb_sessions
(
session_id,
source_object_id,
source_object_code,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login
)
values
(
x_session_id,
p_source_object_id,
p_source_object_code,
p_creation_date,
p_created_by,
p_last_update_date,
p_last_updated_by,
p_last_update_login
);
end INSERT_ROW;
procedure UPDATE_ROW
(
P_SESSION_ID in NUMBER,
P_SOURCE_OBJECT_CODE in VARCHAR2,
P_SOURCE_OBJECT_ID in NUMBER,
P_LAST_UPDATE_DATE in DATE,
P_LAST_UPDATED_BY in NUMBER,
P_LAST_UPDATE_LOGIN in NUMBER
)
is
begin
update cs_kb_sessions
set
source_object_id = p_source_object_id,
source_object_code = p_source_object_code,
last_update_date = p_last_update_date,
last_updated_by = p_last_updated_by,
last_update_login = p_last_update_login
where session_id = P_SESSION_ID;
end UPDATE_ROW;
procedure DELETE_ROW
(
P_SESSION_ID in NUMBER
)
is
begin
delete from cs_kb_sessions
where session_id = P_SESSION_ID;
end DELETE_ROW;
update_row
(
p_session_id => p_session_id,
p_source_object_code => p_source_object_code,
p_source_object_id => p_source_object_id,
p_last_update_date => sysdate,
p_last_updated_by => l_user_id,
p_last_update_login => 0
);
insert_row
(
x_rowid => l_rowid,
x_session_id => l_session_id,
p_source_object_code => p_source_object_code,
p_source_object_id => p_source_object_id,
p_creation_date => sysdate,
p_created_by => l_user_id,
p_last_update_date => sysdate,
p_last_updated_by => l_user_id,
p_last_update_login => 0
);