The following lines contain the word 'select', 'insert', 'update' or 'delete':
| 01.20.00 AWWONG Add check links before delete, fill name(2000)
| 18-Nov-2003 MKETTLE Cleanup for 11.5.10
| - Obsolete unused apis
| - Moved ELE_AUDIT table Handlers back here
| 17-May-2005 MKETTLE Cleanup - Removed obs Incr_Element_Element in 115.50
*=======================================================================*/
PROCEDURE Get_Who(
X_SYSDATE OUT NOCOPY DATE,
X_USER_ID OUT NOCOPY NUMBER,
X_LOGIN_ID OUT NOCOPY NUMBER )
IS
BEGIN
x_sysdate := sysdate;
PROCEDURE Insert_Row (
X_ROWID IN OUT NOCOPY VARCHAR2,
X_ELEMENT_ID IN NUMBER,
X_ELEMENT_NUMBER IN VARCHAR2,
X_ELEMENT_TYPE_ID IN NUMBER,
X_ELEMENT_NAME IN VARCHAR2,
X_GROUP_FLAG IN NUMBER,
X_STATUS IN VARCHAR2,
X_ACCESS_LEVEL IN NUMBER,
X_NAME IN VARCHAR2,
X_DESCRIPTION IN CLOB,
X_CREATION_DATE IN DATE,
X_CREATED_BY IN NUMBER,
X_LAST_UPDATE_DATE IN DATE,
X_LAST_UPDATED_BY IN NUMBER,
X_LAST_UPDATE_LOGIN IN NUMBER,
X_LOCKED_BY IN NUMBER,
X_LOCK_DATE IN DATE,
X_ATTRIBUTE_CATEGORY IN VARCHAR2,
X_ATTRIBUTE1 IN VARCHAR2,
X_ATTRIBUTE2 IN VARCHAR2,
X_ATTRIBUTE3 IN VARCHAR2,
X_ATTRIBUTE4 IN VARCHAR2,
X_ATTRIBUTE5 IN VARCHAR2,
X_ATTRIBUTE6 IN VARCHAR2,
X_ATTRIBUTE7 IN VARCHAR2,
X_ATTRIBUTE8 IN VARCHAR2,
X_ATTRIBUTE9 IN VARCHAR2,
X_ATTRIBUTE10 IN VARCHAR2,
X_ATTRIBUTE11 IN VARCHAR2,
X_ATTRIBUTE12 IN VARCHAR2,
X_ATTRIBUTE13 IN VARCHAR2,
X_ATTRIBUTE14 IN VARCHAR2,
X_ATTRIBUTE15 IN VARCHAR2,
X_START_ACTIVE_DATE IN DATE,
X_END_ACTIVE_DATE IN DATE,
X_CONTENT_TYPE IN VARCHAR2 )
IS
l_access_level CS_KB_ELEMENTS_B.ACCESS_LEVEL%TYPE;
SELECT rowid
FROM CS_KB_ELEMENTS_B
WHERE element_id = x_element_id;
SELECT element_id,
language,
description
FROM CS_KB_ELEMENTS_TL
WHERE element_id = c_id;
INSERT INTO CS_KB_ELEMENTS_B (
element_id,
element_number,
element_type_id,
element_name,
group_flag,
status,
access_level,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login,
locked_by,
lock_date,
attribute_category,
attribute1,
attribute2,
attribute3,
attribute4,
attribute5,
attribute6,
attribute7,
attribute8,
attribute9,
attribute10,
attribute11,
attribute12,
attribute13,
attribute14,
attribute15,
start_active_date,
end_active_date,
content_type
) VALUES (
x_element_id,
x_element_number,
x_element_type_id,
x_element_name,
x_group_flag,
x_status,
l_access_level,
x_creation_date,
x_created_by,
x_last_update_date,
x_last_updated_by,
x_last_update_login,
x_locked_by,
x_lock_date,
x_attribute_category,
x_attribute1,
x_attribute2,
x_attribute3,
x_attribute4,
x_attribute5,
x_attribute6,
x_attribute7,
x_attribute8,
x_attribute9,
x_attribute10,
x_attribute11,
x_attribute12,
x_attribute13,
x_attribute14,
x_attribute15,
x_start_active_date,
x_end_active_date,
l_content_type );
INSERT INTO CS_KB_ELEMENTS_TL (
element_id,
name,
description,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login,
language,
source_lang
) SELECT
x_element_id,
x_name,
empty_clob(),
x_creation_date,
x_created_by,
x_last_update_date,
x_last_updated_by,
x_last_update_login,
l.language_code,
USERENV('LANG')
FROM FND_LANGUAGES l
WHERE l.installed_flag IN ('I', 'B')
AND NOT EXISTS
(SELECT NULL
FROM CS_KB_ELEMENTS_TL t
WHERE t.element_id = x_element_id
AND t.language = l.language_code);
END Insert_Row;
SELECT
element_id,
element_number,
element_type_id,
element_name,
group_flag,
status,
access_level,
locked_by,
lock_date,
attribute_category,
attribute1,
attribute2,
attribute3,
attribute4,
attribute5,
attribute6,
attribute7,
attribute8,
attribute9,
attribute10,
attribute11,
attribute12,
attribute13,
attribute14,
attribute15,
start_active_date,
end_active_date,
content_type
FROM CS_KB_ELEMENTS_B
WHERE element_id = x_element_id
FOR UPDATE OF element_id NOWAIT;
SELECT name,
description,
decode(language, USERENV('LANG'), 'Y', 'N') baselang
FROM CS_KB_ELEMENTS_TL
WHERE element_id = x_element_id
AND USERENV('LANG') IN (language, source_lang)
FOR UPDATE OF element_id NOWAIT;
FND_MESSAGE.set_name('FND', 'FORM_RECORD_DELETED');
PROCEDURE Update_Row (
X_ELEMENT_ID IN NUMBER,
X_ELEMENT_NUMBER IN VARCHAR2,
X_ELEMENT_TYPE_ID IN NUMBER,
X_ELEMENT_NAME IN VARCHAR2,
X_GROUP_FLAG IN NUMBER,
X_STATUS IN VARCHAR2,
X_ACCESS_LEVEL IN NUMBER,
X_NAME IN VARCHAR2,
X_DESCRIPTION IN CLOB,
X_LAST_UPDATE_DATE IN DATE,
X_LAST_UPDATED_BY IN NUMBER,
X_LAST_UPDATE_LOGIN IN NUMBER,
X_LOCKED_BY IN NUMBER,
X_LOCK_DATE IN DATE,
X_ATTRIBUTE_CATEGORY IN VARCHAR2,
X_ATTRIBUTE1 IN VARCHAR2,
X_ATTRIBUTE2 IN VARCHAR2,
X_ATTRIBUTE3 IN VARCHAR2,
X_ATTRIBUTE4 IN VARCHAR2,
X_ATTRIBUTE5 IN VARCHAR2,
X_ATTRIBUTE6 IN VARCHAR2,
X_ATTRIBUTE7 IN VARCHAR2,
X_ATTRIBUTE8 IN VARCHAR2,
X_ATTRIBUTE9 IN VARCHAR2,
X_ATTRIBUTE10 IN VARCHAR2,
X_ATTRIBUTE11 IN VARCHAR2,
X_ATTRIBUTE12 IN VARCHAR2,
X_ATTRIBUTE13 IN VARCHAR2,
X_ATTRIBUTE14 IN VARCHAR2,
X_ATTRIBUTE15 IN VARCHAR2,
X_START_ACTIVE_DATE IN DATE,
X_END_ACTIVE_DATE IN DATE,
X_CONTENT_TYPE IN VARCHAR2 )
IS
l_access_level CS_KB_ELEMENTS_B.ACCESS_LEVEL%TYPE;
SELECT element_id,
language,
description
FROM CS_KB_ELEMENTS_TL
WHERE element_id = c_id
AND USERENV('LANG') IN (language, source_lang) FOR UPDATE;
UPDATE CS_KB_ELEMENTS_B SET
element_type_id = x_element_type_id,
element_name = x_element_name,
group_flag = x_group_flag,
status = x_status,
access_level = l_access_level,
last_update_date = x_last_update_date,
last_updated_by = x_last_updated_by,
last_update_login = x_last_update_login,
locked_by = x_locked_by,
lock_date = x_lock_date,
attribute_category = x_attribute_category,
attribute1 = x_attribute1,
attribute2 = x_attribute2,
attribute3 = x_attribute3,
attribute4 = x_attribute4,
attribute5 = x_attribute5,
attribute6 = x_attribute6,
attribute7 = x_attribute7,
attribute8 = x_attribute8,
attribute9 = x_attribute9,
attribute10 = x_attribute10,
attribute11 = x_attribute11,
attribute12 = x_attribute12,
attribute13 = x_attribute13,
attribute14 = x_attribute14,
attribute15 = x_attribute15,
start_active_date = x_start_active_date,
end_active_date = x_end_active_date,
content_type = l_content_type
WHERE element_id = x_element_id;
UPDATE CS_KB_ELEMENTS_TL SET
name = x_name,
description = EMPTY_CLOB(),
last_update_date = x_last_update_date,
last_updated_by = x_last_updated_by,
last_update_login = x_last_update_login,
source_lang = USERENV('LANG')
WHERE element_id = x_element_id
AND USERENV('LANG') IN (language, source_lang);
END Update_Row;
PROCEDURE Delete_Row (
X_ELEMENT_NUMBER IN VARCHAR2)
IS
CURSOR c IS
SELECT element_id
FROM CS_KB_ELEMENTS_B
WHERE element_number = x_element_number;
DELETE FROM CS_KB_ELEMENTS_TL
WHERE element_id = rec.element_id;
DELETE FROM CS_KB_ELEMENTS_B
WHERE element_number = x_element_number;
END Delete_Row;
DELETE FROM CS_KB_ELEMENTS_TL t
WHERE NOT EXISTS (SELECT NULL
FROM CS_KB_ELEMENTS_B b
WHERE b.element_id = t.element_id );
UPDATE CS_KB_ELEMENTS_TL t
SET ( name,
description
) = (SELECT b.name,
b.description
FROM CS_KB_ELEMENTS_TL b
WHERE b.element_id = t.element_id
AND b.language = t.source_lang )
WHERE ( t.element_id,
t.language) IN (SELECT subt.element_id,
subt.language
FROM CS_KB_ELEMENTS_TL subb,
CS_KB_ELEMENTS_TL subt
WHERE subb.element_id = subt.element_id
AND subb.language = subt.source_lang
AND (subb.name <> subt.name
OR (subb.name IS NULL AND subt.name IS NOT NULL)
OR (subb.name IS NOT NULL AND subt.name IS NULL)
OR DBMS_LOB.compare(subb.description, subt.description,
DBMS_LOB.getlength(subb.description), 1,1)<>0
OR (subb.description IS NULL AND subt.description IS NOT NULL)
OR (subb.description IS NOT NULL AND subt.description IS NULL)
));
INSERT INTO CS_KB_ELEMENTS_TL (
element_id,
name,
description,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login,
language,
source_lang
) SELECT
b.element_id,
b.name,
b.description,
b.creation_date,
b.created_by,
b.last_update_date,
b.last_updated_by,
b.last_update_login,
l.language_code,
b.source_lang
FROM CS_KB_ELEMENTS_TL b, fnd_languages l
WHERE l.installed_flag IN ('I', 'B')
AND b.language = USERENV('LANG')
AND NOT EXISTS
(SELECT NULL
FROM CS_KB_ELEMENTS_TL t
WHERE t.element_id = b.element_id
AND t.language = l.language_code);
SELECT
element_id,
language,
description
FROM CS_KB_ELEMENTS_TL
WHERE element_id = c_id
AND USERENV('LANG') IN (language, source_lang) FOR UPDATE;
UPDATE CS_KB_ELEMENTS_TL SET
name = x_name,
last_update_date = SYSDATE,
last_updated_by = decode(x_owner, 'SEED', 1, 0),
last_update_login = 0,
source_lang = USERENV('LANG')
WHERE element_id = TO_NUMBER(x_element_id) --change
AND USERENV('LANG') IN (language, source_lang);
Update_Row(
X_ELEMENT_ID => x_element_id,
X_ELEMENT_NUMBER => x_element_number,
X_ELEMENT_TYPE_ID => x_element_type_id,
X_ELEMENT_NAME => NULL,
X_GROUP_FLAG => NULL,
X_STATUS => x_status,
X_ACCESS_LEVEL => x_access_level,
X_NAME => x_name,
X_DESCRIPTION => l_clob,
X_LAST_UPDATE_DATE => SYSDATE,
X_LAST_UPDATED_BY => l_user_id,
X_LAST_UPDATE_LOGIN => 0,
X_LOCKED_BY => null,
X_LOCK_DATE => null);
Insert_Row(
x_rowid => l_rowid,
x_element_id => x_element_id,
x_element_number => x_element_number,
x_element_type_id => x_element_type_id,
x_element_name => NULL,
x_group_flag => NULL,
x_status => x_status,
x_access_level => x_access_level,
x_name => x_name,
x_description => l_clob,
x_creation_date => SYSDATE,
x_created_by => l_user_id,
x_last_update_date => SYSDATE,
x_last_updated_by => l_user_id,
x_last_update_login => 0,
x_locked_by => NULL,
x_lock_date => NULL);
PROCEDURE Update_Clobs(
P_ELEMENT_ID IN NUMBER)
IS
l_srclen integer :=0;
SELECT
description
FROM CS_KB_ELEMENTS_TL
WHERE element_id = p_element_id
AND userenv('LANG') = SOURCE_LANG
AND userenv('LANG') <> LANGUAGE
FOR UPDATE;
SELECT description
FROM cs_kb_elements_tl
WHERE element_id = p_element_id
AND language = userenv('LANG');
UPDATE CS_KB_ELEMENTS_TL SET
description = EMPTY_CLOB() ,
last_update_date = l_sysdate,
last_updated_by = l_user_id,
last_update_login = l_login_id
WHERE element_id = p_element_id
AND userenv('LANG') = SOURCE_LANG
AND userenv('LANG') <> LANGUAGE;
END Update_Clobs;