The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE INSERT_ROW (
x_rowid OUT NOCOPY VARCHAR2
,px_compound_relation_id IN OUT NOCOPY NUMBER
,p_content_item_id IN NUMBER
,p_attribute_type_code IN VARCHAR2
,p_content_type_code IN VARCHAR2
,p_citem_version_id IN NUMBER
,p_object_version_number IN NUMBER
,p_sort_order IN NUMBER
,p_creation_date IN DATE --DEFAULT NULL
,p_created_by IN NUMBER --DEFAULT NULL
,p_last_update_date IN DATE --DEFAULT NULL
,p_last_updated_by IN NUMBER --DEFAULT NULL
,p_last_update_login IN NUMBER --DEFAULT NULL
,p_subitem_version_id IN NUMBER --DEFAULT NULL
) IS
CURSOR C IS SELECT ROWID FROM IBC_COMPOUND_RELATIONS
WHERE compound_relation_id = compound_relation_id;
CURSOR c2 IS SELECT ibc_compound_relations_s1.NEXTVAL FROM dual;
INSERT INTO IBC_COMPOUND_RELATIONS (
compound_relation_id,
CONTENT_ITEM_ID,
ATTRIBUTE_TYPE_CODE,
CONTENT_TYPE_CODE,
CITEM_VERSION_ID,
SORT_ORDER,
OBJECT_VERSION_NUMBER,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
SUBITEM_VERSION_ID
) VALUES (
px_compound_relation_id
,p_content_item_id
,p_attribute_type_code
,p_content_type_code
,p_citem_version_id
,p_sort_order
,DECODE(p_object_version_number,FND_API.G_MISS_NUM,1,NULL,1,p_object_version_number)
,DECODE(p_creation_date,FND_API.G_MISS_DATE,SYSDATE,NULL,SYSDATE,p_creation_date)
,DECODE(p_created_by,FND_API.G_MISS_NUM,FND_GLOBAL.user_id,NULL,FND_GLOBAL.user_id,p_created_by)
,DECODE(p_last_update_date,FND_API.G_MISS_DATE,SYSDATE,NULL,SYSDATE,p_last_update_date)
,DECODE(p_last_updated_by,FND_API.G_MISS_NUM,FND_GLOBAL.user_id,NULL,FND_GLOBAL.user_id,p_last_updated_by)
,DECODE(p_last_update_login,FND_API.G_MISS_NUM,FND_GLOBAL.login_id,NULL,FND_GLOBAL.user_id,p_last_update_login)
,p_subitem_version_id
);
END INSERT_ROW;
CURSOR c IS SELECT
OBJECT_VERSION_NUMBER,
SORT_ORDER
FROM IBC_COMPOUND_RELATIONS
WHERE compound_relation_id = p_compound_relation_id
FOR UPDATE OF CONTENT_ITEM_ID NOWAIT;
fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
PROCEDURE UPDATE_ROW (
p_compound_relation_id IN NUMBER
,p_attribute_type_code IN VARCHAR2 --DEFAULT NULL
,p_citem_version_id IN NUMBER --DEFAULT NULL
,p_content_item_id IN NUMBER --DEFAULT NULL
,p_content_type_code IN VARCHAR2 --DEFAULT NULL
,p_last_updated_by IN NUMBER --DEFAULT NULL
,p_last_update_date IN DATE --DEFAULT NULL
,p_last_update_login IN NUMBER --DEFAULT NULL
,p_object_version_number IN NUMBER --DEFAULT NULL
,p_sort_order IN NUMBER --DEFAULT NULL
,p_subitem_version_id IN NUMBER --DEFAULT NULL
) IS
BEGIN
UPDATE IBC_COMPOUND_RELATIONS SET
content_item_id = DECODE(p_content_item_id,FND_API.G_MISS_NUM,NULL,NULL,content_item_id,p_content_item_id)
,attribute_type_code = DECODE(p_attribute_type_code,FND_API.G_MISS_CHAR,NULL,NULL,attribute_type_code,p_attribute_type_code)
,content_type_code = DECODE(p_content_type_code,FND_API.G_MISS_CHAR,NULL,NULL,content_type_code,p_content_type_code)
,citem_version_id = DECODE(p_citem_version_id,FND_API.G_MISS_NUM,NULL,NULL,citem_version_id,p_citem_version_id)
,sort_order = DECODE(p_sort_order,FND_API.G_MISS_NUM,NULL,NULL,sort_order,p_sort_order)
,object_version_number = NVL(object_version_number,0) + 1
,last_update_date = DECODE(p_last_update_date,FND_API.G_MISS_DATE,SYSDATE,NULL,SYSDATE,p_last_update_date)
,last_updated_by = DECODE(p_last_updated_by,FND_API.G_MISS_NUM,FND_GLOBAL.user_id,NULL,FND_GLOBAL.user_id,p_last_updated_by)
,last_update_login = DECODE(p_last_update_login,FND_API.G_MISS_NUM,FND_GLOBAL.login_id,NULL,FND_GLOBAL.user_id,p_last_update_login)
,subitem_version_id = DECODE(p_subitem_version_id,FND_API.G_MISS_NUM,NULL,NULL,subitem_version_id,p_subitem_version_id)
WHERE compound_relation_id = p_compound_relation_id;
END UPDATE_ROW;
PROCEDURE DELETE_ROW (
p_compound_relation_id IN NUMBER
) IS
BEGIN
DELETE FROM IBC_COMPOUND_RELATIONS
WHERE compound_relation_id = p_compound_relation_id;
END DELETE_ROW;
p_LAST_UPDATE_DATE IN VARCHAR2) IS
BEGIN
IF (p_UPLOAD_MODE = 'NLS') THEN
NULL;
p_LAST_UPDATE_DATE => p_LAST_UPDATE_DATE );
p_LAST_UPDATE_DATE IN VARCHAR2) IS
l_user_id NUMBER := 0;
l_last_update_date DATE;
db_last_update_date DATE;
--get last updated by user id
l_user_id := FND_LOAD_UTIL.OWNER_ID(p_OWNER);
--translate data type VARCHAR2 to DATE for last_update_date
l_last_update_date := nvl(TO_DATE(p_last_update_date, 'YYYY/MM/DD'),SYSDATE);
-- get updatedby and update_date values if existing in db
SELECT LAST_UPDATED_BY, LAST_UPDATE_DATE INTO db_user_id, db_last_update_date
FROM IBC_COMPOUND_RELATIONS
WHERE p_compound_relation_id = p_compound_relation_id;
IF (FND_LOAD_UTIL.UPLOAD_TEST(l_user_id, l_last_update_date,
db_user_id, db_last_update_date, p_upload_mode )) THEN
UPDATE_ROW (
p_compound_relation_id => NVL(p_compound_relation_id,FND_API.G_MISS_NUM)
,p_content_item_id => NVL(p_content_item_id,FND_API.G_MISS_NUM)
,p_attribute_type_code => NVL(p_attribute_type_code,FND_API.G_MISS_CHAR)
,p_content_type_code => NVL(p_content_type_code,FND_API.G_MISS_CHAR)
,p_citem_version_id => NVL(p_citem_version_id,FND_API.G_MISS_NUM)
,p_sort_order => NVL(p_sort_order,FND_API.G_MISS_NUM)
,p_last_updated_by => l_user_id
,p_last_update_date => SYSDATE
,p_last_update_login => 0
,p_object_version_number => NULL
,p_subitem_version_id => NVL(p_subitem_version_id,FND_API.G_MISS_NUM)
);
INSERT_ROW (
X_ROWID => l_row_id,
px_COMPOUND_RELATION_ID => lx_COMPOUND_RELATION_ID,
p_CONTENT_ITEM_ID => p_CONTENT_ITEM_ID,
p_ATTRIBUTE_TYPE_CODE => p_ATTRIBUTE_TYPE_CODE,
p_CONTENT_TYPE_CODE => p_CONTENT_TYPE_CODE,
p_CITEM_VERSION_ID => p_CITEM_VERSION_ID,
p_SORT_ORDER => p_SORT_ORDER,
p_OBJECT_VERSION_NUMBER => 1,
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,
p_subitem_version_id => p_subitem_version_id);