The following lines contain the word 'select', 'insert', 'update' or 'delete':
select application_id
from fnd_application_vl
where application_short_name = short_name_param;
FND_MESSAGE.SET_NAME('AK','AK_NO_SELECTION');
select userenv('LANG') into l_nls_language
from dual;
select value into l_dbname from v$parameter
where name = 'db_name';
l_header_tbl(l_index) := '# dbdrv: '||'&'||'fullpath_~PROD_~PATH_~FILE NCUPDATE '||'&'||'env=NLS_LANG';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE UPDATE_FLAG VARCHAR2(1)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATED_BY NUMBER(15)';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_DATE DATE';
l_header_tbl(l_index) := ' BASE LAST_UPDATE_LOGIN NUMBER(15)';
select count(*) into G_UPL_TABLE_NUM
from AK_LOADER_TEMP;
OPEN l_upl_loader_cur FOR SELECT TBL_INDEX,LINE_CONTENT FROM ak_loader_temp
where session_id = AK_ON_OBJECTS_PVT.G_SESSION_ID
order by tbl_index;
p_last_updated_by OUT NOCOPY NUMBER,
p_last_update_date OUT NOCOPY DATE,
p_last_update_login OUT NOCOPY NUMBER
) is
l_api_name CONSTANT varchar2(30) := 'Set_Who';
if (AK_UPLOAD_GRP.G_UPLOAD_DATE is null and AK_UPLOAD_GRP.G_COMPARE_UPDATE = FALSE) then
AK_UPLOAD_GRP.G_UPLOAD_DATE := p_loader_timestamp;
elsif (AK_UPLOAD_GRP.G_UPLOAD_DATE is null and AK_UPLOAD_GRP.G_COMPARE_UPDATE = TRUE) then
if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
FND_MESSAGE.SET_NAME('AK','AK_MISSING_GEN_DATE');
p_last_updated_by := 1;
p_last_update_date := AK_UPLOAD_GRP.G_UPLOAD_DATE;
p_last_update_login := 1;
p_last_updated_by := 2;
p_last_update_date := AK_UPLOAD_GRP.G_UPLOAD_DATE;
p_last_update_login := 1;
p_last_updated_by := to_number(nvl(fnd_profile.value('USER_ID'),0));
p_last_update_date := sysdate;
p_last_update_login := to_number(
nvl(fnd_profile.value('LOGIN_ID'),0));
function IS_UPDATEABLE (
p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
p_created_by IN OUT NOCOPY NUMBER,
p_creation_date IN OUT NOCOPY DATE,
p_last_updated_by IN OUT NOCOPY NUMBER,
p_db_last_updated_by IN NUMBER,
p_last_update_date IN OUT NOCOPY DATE,
p_db_last_update_date IN DATE,
p_last_update_login IN OUT NOCOPY NUMBER,
p_create_or_update IN VARCHAR2)
return boolean is
l_return_status varchar2(1);
l_last_update_date date;
l_last_update_login number;
l_last_updated_by number;
if (AK_UPLOAD_GRP.G_UPDATE_MODE or p_create_or_update = 'FORCE') then
l_custom_mode := 'FORCE';
elsif (AK_UPLOAD_GRP.G_NO_CUSTOM_UPDATE) then
l_custom_mode := 'NCUPDATE';
(p_create_or_update = 'UPDATE' or p_create_or_update = 'FORCE')) then
if FND_LOAD_UTIL.UPLOAD_TEST (
p_file_id => p_last_updated_by,
p_file_lud => p_last_update_date,
p_db_id => p_db_last_updated_by,
p_db_lud => p_db_last_update_date,
p_custom_mode => l_custom_mode)
then
return TRUE;
if (AK_UPLOAD_GRP.G_NO_CUSTOM_UPDATE) then
if (p_db_last_updated_by <> 1 and p_db_last_updated_by <> 2) then
return FALSE;
AK_UPLOAD_GRP.G_UPLOAD_DATE := p_last_update_date;
p_last_updated_by => l_last_updated_by,
p_last_update_date => l_last_update_date,
p_last_update_login => l_last_update_login);
l_last_updated_by := p_last_updated_by;
l_last_update_login := p_last_update_login;
p_last_updated_by := l_last_updated_by;
p_last_update_date := l_last_update_date;
p_last_update_login := l_last_update_login;
if p_create_or_update = 'CREATE' then
return TRUE;
((AK_UPLOAD_GRP.G_COMPARE_UPDATE = TRUE and
(l_file_version = AK_ON_OBJECTS_PUB.G_OLD_FILE_FORMAT_VER15 or
l_file_version = AK_ON_OBJECTS_PUB.G_OLD_FILE_FORMAT_VER14) and
(p_db_last_updated_by = 1 or p_last_update_date > p_db_last_update_date)) or
(AK_UPLOAD_GRP.G_COMPARE_UPDATE = TRUE and
( l_file_version = AK_ON_OBJECTS_PUB.G_OLD_FILE_FORMAT_VER1 or
l_file_version = AK_ON_OBJECTS_PUB.G_OLD_FILE_FORMAT_VER2 or
l_file_version = AK_ON_OBJECTS_PUB.G_OLD_FILE_FORMAT_VER3 or
l_file_version = AK_ON_OBJECTS_PUB.G_OLD_FILE_FORMAT_VER4 or
l_file_version = AK_ON_OBJECTS_PUB.G_OLD_FILE_FORMAT_VER5 or
l_file_version = AK_ON_OBJECTS_PUB.G_OLD_FILE_FORMAT_VER6 or
l_file_version = AK_ON_OBJECTS_PUB.G_OLD_FILE_FORMAT_VER7 or
l_file_version = AK_ON_OBJECTS_PUB.G_OLD_FILE_FORMAT_VER8 or
l_file_version = AK_ON_OBJECTS_PUB.G_OLD_FILE_FORMAT_VER9 or
l_file_version = AK_ON_OBJECTS_PUB.G_OLD_FILE_FORMAT_VER10 or
l_file_version = AK_ON_OBJECTS_PUB.G_OLD_FILE_FORMAT_VER11 or
l_file_version = AK_ON_OBJECTS_PUB.G_OLD_FILE_FORMAT_VER12) and
p_db_last_updated_by = 1) or
AK_UPLOAD_GRP.G_COMPARE_UPDATE = FALSE)
THEN
return TRUE;
end IS_UPDATEABLE;
insert_err EXCEPTION;
INSERT INTO ak_loader_temp (
tbl_index,
line_content,
session_id
) values (
G_TBL_INDEX,
p_buffer,
AK_ON_OBJECTS_PVT.G_SESSION_ID
);
raise insert_err;
raise insert_err;
WHEN insert_err THEN
-- dbms_output.put_line('Exception insert_err ak_loader_temp');
-- dbms_output.put_line('Other errors in inserting into ak_loader_temp');
select 1
from FND_APPLICATION
where application_id = p_application_id;
select 1
from AK_LOOKUP_CODES
where lookup_type = lookup_type_parm
and lookup_code = lookup_code_parm;