The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure INSERT_ROW (
P_PLUGIN_ID IN NUMBER,
P_INIT_ERROR_MSG_NAME IN VARCHAR2,
P_APPLICATION_ID IN NUMBER,
P_IS_REQUIRED_FLAG IN VARCHAR2,
P_DO_LAUNCH_FUNC IN VARCHAR2,
P_OBJECT_VERSION_NUMBER IN NUMBER,
P_CLASS_NAME IN VARCHAR2,
P_IMAGE_FILE_NAME IN VARCHAR2,
P_AUDIO_FILE_NAME IN VARCHAR2,
P_NAME IN VARCHAR2,
P_DESCRIPTION IN VARCHAR2,
X_ROWID IN OUT NOCOPY VARCHAR2
) is
cursor C is select ROWID from IEU_CTL_PLUGINS_B
where PLUGIN_ID = P_PLUGIN_ID
;
insert into IEU_CTL_PLUGINS_B (
INIT_ERROR_MSG_NAME,
APPLICATION_ID,
IS_REQUIRED_FLAG,
DO_LAUNCH_FUNC,
PLUGIN_ID,
OBJECT_VERSION_NUMBER,
CLASS_NAME,
IMAGE_FILE_NAME,
AUDIO_FILE_NAME,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN
) values (
P_INIT_ERROR_MSG_NAME,
P_APPLICATION_ID,
P_IS_REQUIRED_FLAG,
P_DO_LAUNCH_FUNC,
P_PLUGIN_ID,
P_OBJECT_VERSION_NUMBER,
P_CLASS_NAME,
P_IMAGE_FILE_NAME,
P_AUDIO_FILE_NAME,
SYSDATE,
FND_GLOBAL.USER_ID,
SYSDATE,
FND_GLOBAL.USER_ID,
FND_GLOBAL.LOGIN_ID
);
insert into IEU_CTL_PLUGINS_TL (
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
CREATED_BY,
PLUGIN_ID,
OBJECT_VERSION_NUMBER,
DESCRIPTION,
LAST_UPDATE_LOGIN,
NAME,
LANGUAGE,
SOURCE_LANG
) select
SYSDATE,
FND_GLOBAL.USER_ID,
SYSDATE,
FND_GLOBAL.USER_ID,
P_PLUGIN_ID,
P_OBJECT_VERSION_NUMBER,
P_DESCRIPTION,
FND_GLOBAL.LOGIN_ID,
P_NAME,
L.LANGUAGE_CODE,
userenv('LANG')
from FND_LANGUAGES L
where L.INSTALLED_FLAG in ('I', 'B')
and not exists
(select NULL
from IEU_CTL_PLUGINS_TL T
where T.PLUGIN_ID = P_PLUGIN_ID
and T.LANGUAGE = L.LANGUAGE_CODE);
end INSERT_ROW;
cursor c is select
INIT_ERROR_MSG_NAME,
APPLICATION_ID,
IS_REQUIRED_FLAG,
DO_LAUNCH_FUNC,
OBJECT_VERSION_NUMBER,
CLASS_NAME,
IMAGE_FILE_NAME,
AUDIO_FILE_NAME
from IEU_CTL_PLUGINS_B
where PLUGIN_ID = P_PLUGIN_ID
for update of PLUGIN_ID nowait;
cursor c1 is select
NAME,
DESCRIPTION,
decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
from IEU_CTL_PLUGINS_TL
where PLUGIN_ID = P_PLUGIN_ID
and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
for update of PLUGIN_ID nowait;
fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
procedure UPDATE_ROW (
P_PLUGIN_ID IN NUMBER,
P_INIT_ERROR_MSG_NAME IN VARCHAR2,
P_APPLICATION_ID IN NUMBER,
P_IS_REQUIRED_FLAG IN VARCHAR2,
P_DO_LAUNCH_FUNC IN VARCHAR2,
P_OBJECT_VERSION_NUMBER IN NUMBER,
P_CLASS_NAME IN VARCHAR2,
P_IMAGE_FILE_NAME IN VARCHAR2,
P_AUDIO_FILE_NAME IN VARCHAR2,
P_NAME IN VARCHAR2,
P_DESCRIPTION IN VARCHAR2
) is
begin
update IEU_CTL_PLUGINS_B set
INIT_ERROR_MSG_NAME = P_INIT_ERROR_MSG_NAME,
APPLICATION_ID = P_APPLICATION_ID,
IS_REQUIRED_FLAG = P_IS_REQUIRED_FLAG,
DO_LAUNCH_FUNC = P_DO_LAUNCH_FUNC,
OBJECT_VERSION_NUMBER = P_OBJECT_VERSION_NUMBER,
CLASS_NAME = P_CLASS_NAME,
IMAGE_FILE_NAME = P_IMAGE_FILE_NAME,
AUDIO_FILE_NAME = P_AUDIO_FILE_NAME,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
LAST_UPDATE_LOGIN = FND_GLOBAL.LOGIN_ID
where PLUGIN_ID = P_PLUGIN_ID;
update IEU_CTL_PLUGINS_TL set
NAME = P_NAME,
DESCRIPTION = P_DESCRIPTION,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
LAST_UPDATE_LOGIN = FND_GLOBAL.LOGIN_ID,
SOURCE_LANG = userenv('LANG')
where PLUGIN_ID = P_PLUGIN_ID
and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
end UPDATE_ROW;
procedure DELETE_ROW (
P_PLUGIN_ID in NUMBER
) is
begin
delete from IEU_CTL_PLUGINS_TL
where PLUGIN_ID = P_PLUGIN_ID;
delete from IEU_CTL_PLUGINS_B
where PLUGIN_ID = P_PLUGIN_ID;
end DELETE_ROW;
delete from IEU_CTL_PLUGINS_TL T
where not exists
(select NULL
from IEU_CTL_PLUGINS_B B
where B.PLUGIN_ID = T.PLUGIN_ID
);
update IEU_CTL_PLUGINS_TL T set (
NAME,
DESCRIPTION
) = (select
B.NAME,
B.DESCRIPTION
from IEU_CTL_PLUGINS_TL B
where B.PLUGIN_ID = T.PLUGIN_ID
and B.LANGUAGE = T.SOURCE_LANG)
where (
T.PLUGIN_ID,
T.LANGUAGE
) in (select
SUBT.PLUGIN_ID,
SUBT.LANGUAGE
from IEU_CTL_PLUGINS_TL SUBB, IEU_CTL_PLUGINS_TL SUBT
where SUBB.PLUGIN_ID = SUBT.PLUGIN_ID
and SUBB.LANGUAGE = SUBT.SOURCE_LANG
and (SUBB.NAME <> SUBT.NAME
or SUBB.DESCRIPTION <> SUBT.DESCRIPTION
));
insert into IEU_CTL_PLUGINS_TL (
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
CREATED_BY,
PLUGIN_ID,
OBJECT_VERSION_NUMBER,
DESCRIPTION,
LAST_UPDATE_LOGIN,
NAME,
LANGUAGE,
SOURCE_LANG
) select
B.CREATION_DATE,
B.LAST_UPDATED_BY,
B.LAST_UPDATE_DATE,
B.CREATED_BY,
B.PLUGIN_ID,
B.OBJECT_VERSION_NUMBER,
B.DESCRIPTION,
B.LAST_UPDATE_LOGIN,
B.NAME,
L.LANGUAGE_CODE,
B.SOURCE_LANG
from IEU_CTL_PLUGINS_TL B, FND_LANGUAGES L
where L.INSTALLED_FLAG in ('I', 'B')
and B.LANGUAGE = userenv('LANG')
and not exists
(select NULL
from IEU_CTL_PLUGINS_TL T
where T.PLUGIN_ID = B.PLUGIN_ID
and T.LANGUAGE = L.LANGUAGE_CODE);
UPDATE IEU_CTL_PLUGINS_TL
SET
NAME = P_NAME,
SOURCE_LANG = userenv( 'LANG' ),
DESCRIPTION = P_DESCRIPTION,
LAST_UPDATE_DATE = SYSDATE,
--LAST_UPDATED_BY = decode( P_OWNER, 'SEED', 1, 0 ),
LAST_UPDATED_BY = user_id,
LAST_UPDATE_LOGIN = 0
WHERE
PLUGIN_ID = P_PLUGIN_ID
AND userenv('LANG') IN (LANGUAGE, SOURCE_LANG);
UPDATE_ROW (
P_PLUGIN_ID ,
P_INIT_ERROR_MSG_NAME ,
P_APPLICATION_ID ,
P_IS_REQUIRED_FLAG ,
P_DO_LAUNCH_FUNC ,
P_OBJECT_VERSION_NUMBER ,
P_CLASS_NAME ,
P_IMAGE_FILE_NAME ,
P_AUDIO_FILE_NAME ,
P_NAME ,
P_DESCRIPTION
);
INSERT_ROW (
P_PLUGIN_ID ,
P_INIT_ERROR_MSG_NAME ,
P_APPLICATION_ID ,
P_IS_REQUIRED_FLAG ,
P_DO_LAUNCH_FUNC ,
P_OBJECT_VERSION_NUMBER ,
P_CLASS_NAME ,
P_IMAGE_FILE_NAME ,
P_AUDIO_FILE_NAME ,
P_NAME ,
P_DESCRIPTION ,
rowid
);