The following lines contain the word 'select', 'insert', 'update' or 'delete':
Select
perspective_id
From amv_i_perspectives_tl
Where perspective_name = p_name
And language IN
(
Select L.language_code
From fnd_languages L
Where L.installed_flag in ('I', 'B')
)
;
Select
perspective_id
From amv_i_perspectives_tl
Where perspective_name = p_name
And language = userenv('lang');
select
AMV_I_PERSPECTIVES_B_S.nextval, sysdate
from dual;
AMV_I_PERSPECTIVES_PKG.INSERT_ROW
(
X_ROWID => l_rowid,
X_PERSPECTIVE_ID => l_perspective_id,
X_OBJECT_VERSION_NUMBER => 1,
X_PERSPECTIVE_NAME => p_perspective_name,
X_DESCRIPTION => l_persp_description,
X_CREATION_DATE => l_current_date,
X_CREATED_BY => l_current_user_id,
X_LAST_UPDATE_DATE => l_current_date,
X_LAST_UPDATED_BY => l_current_user_id,
X_LAST_UPDATE_LOGIN => l_current_login_id
);
PROCEDURE Delete_Perspective
(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_check_login_user IN VARCHAR2 := FND_API.G_TRUE,
p_perspective_id IN NUMBER := FND_API.G_MISS_NUM,
p_perspective_name IN VARCHAR2 := FND_API.G_MISS_CHAR
) IS
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Perspective';
SAVEPOINT Delete_Perspective_Pvt;
Delete from amv_c_chl_perspectives
where perspective_id = l_perspective_id;
Delete from amv_i_item_perspectives
where perspective_id = l_perspective_id;
AMV_I_PERSPECTIVES_PKG.DELETE_ROW
(
X_PERSPECTIVE_ID => l_perspective_id
);
ROLLBACK TO Delete_Perspective_Pvt;
ROLLBACK TO Delete_Perspective_Pvt;
ROLLBACK TO Delete_Perspective_Pvt;
END Delete_Perspective;
PROCEDURE Update_Perspective
(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_check_login_user IN VARCHAR2 := FND_API.G_TRUE,
p_perspective_id IN NUMBER := FND_API.G_MISS_NUM,
p_perspective_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_perspective_new_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_persp_description IN VARCHAR2 := FND_API.G_MISS_CHAR
) IS
l_api_name CONSTANT VARCHAR2(30) := 'Update_Perspective';
Select
object_version_number
from Amv_i_perspectives_b
where perspective_id = p_persp_id;
SAVEPOINT Update_Perspective_Pvt;
AMV_I_PERSPECTIVES_PKG.UPDATE_ROW
(
X_PERSPECTIVE_ID => l_perspective_id,
X_OBJECT_VERSION_NUMBER => l_object_version + 1,
X_PERSPECTIVE_NAME => p_perspective_new_name,
X_DESCRIPTION => p_persp_description,
X_LAST_UPDATE_DATE => sysdate,
X_LAST_UPDATED_BY => l_current_user_id,
X_LAST_UPDATE_LOGIN => l_current_login_id
);
FND_MESSAGE.Set_name('AMV','PVT Update Persp. API: End');
ROLLBACK TO Update_Perspective_Pvt;
ROLLBACK TO Update_Perspective_Pvt;
ROLLBACK TO Update_Perspective_Pvt;
END Update_Perspective;
Select
B.PERSPECTIVE_ID,
B.OBJECT_VERSION_NUMBER,
T.PERSPECTIVE_NAME,
T.DESCRIPTION,
T.LANGUAGE,
T.SOURCE_LANG,
B.CREATION_DATE,
B.CREATED_BY,
B.LAST_UPDATE_DATE,
B.LAST_UPDATED_BY,
B.LAST_UPDATE_LOGIN
From AMV_I_PERSPECTIVES_TL T, AMV_I_PERSPECTIVES_B B
Where B.PERSPECTIVE_ID = T.PERSPECTIVE_ID
And T.LANGUAGE = userenv('LANG')
And B.PERSPECTIVE_ID = p_ID;
x_perspective_obj.last_update_date := l_perspective_rec.last_update_date;
x_perspective_obj.last_updated_by := l_perspective_rec.last_updated_by;
x_perspective_obj.last_update_login := l_perspective_rec.last_update_login;
l_perspective_rec.last_update_date,
l_perspective_rec.last_updated_by,
l_perspective_rec.last_update_login
);
l_last_update_date DATE;
l_last_updated_by NUMBER;
l_last_update_login NUMBER;
'Select ' ||
'B.PERSPECTIVE_ID, ' ||
'B.OBJECT_VERSION_NUMBER, ' ||
'T.PERSPECTIVE_NAME, ' ||
'T.DESCRIPTION, ' ||
'T.LANGUAGE, ' ||
'T.SOURCE_LANG, ' ||
'B.CREATION_DATE, ' ||
'B.CREATED_BY, ' ||
'B.LAST_UPDATE_DATE, ' ||
'B.LAST_UPDATED_BY, ' ||
'B.LAST_UPDATE_LOGIN ' ||
'From AMV_I_PERSPECTIVES_TL T, AMV_I_PERSPECTIVES_B B ';
'Select count(*) ' ||
'From AMV_I_PERSPECTIVES_TL T, AMV_I_PERSPECTIVES_B B ';
l_last_update_date,
l_last_updated_by,
l_last_update_login;
x_perspective_obj_varray(l_fetch_count).last_update_date := l_last_update_date;
x_perspective_obj_varray(l_fetch_count).last_updated_by := l_last_updated_by;
x_perspective_obj_varray(l_fetch_count).last_update_login := l_last_update_login;
l_last_update_date,
l_last_updated_by,
l_last_update_login
);
Select
perspective_id
From amv_i_item_perspectives
Where item_id = p_item_id
And perspective_id = p_perspectiv_id;
Select amv_i_item_perspectives_s.nextval, sysdate
From Dual;
Insert Into amv_i_item_perspectives
(
ITEM_PERSPECTIVE_ID,
OBJECT_VERSION_NUMBER,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
ITEM_ID,
PERSPECTIVE_ID
) VALUES
(
l_temp_number,
1,
l_date,
l_current_user_id,
l_date,
l_current_user_id,
l_current_login_id,
p_item_id,
l_perspective_id
);
Select
perspective_id
From amv_i_item_perspectives
Where item_id = p_item_id
And perspective_id = p_perspective_id;
Select amv_i_item_perspectives_s.nextval, sysdate
From Dual;
Insert Into amv_i_item_perspectives
(
ITEM_PERSPECTIVE_ID,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
ITEM_ID,
PERSPECTIVE_ID
) VALUES
(
l_item_persp,
l_date,
l_current_user_id,
l_date,
l_current_user_id,
l_current_login_id,
p_item_id,
p_perspective_id
);
PROCEDURE Delete_ItemPersps
(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_check_login_user IN VARCHAR2 := FND_API.G_TRUE,
p_item_id IN NUMBER,
p_perspective_array IN AMV_NUMBER_VARRAY_TYPE
) IS
l_api_name CONSTANT VARCHAR2(30) := 'Delete_ItemPersps';
Select
perspective_id
From amv_i_item_perspectives
Where item_id = p_item_id
And perspective_id = p_perspectiv_id;
SAVEPOINT Delete_ItemPersps_Pvt;
Delete from amv_i_item_perspectives
Where item_id = p_item_id
And perspective_id = l_perspective_id;
ROLLBACK TO Delete_ItemPersps_Pvt;
ROLLBACK TO Delete_ItemPersps_Pvt;
ROLLBACK TO Delete_ItemPersps_Pvt;
end Delete_ItemPersps;
PROCEDURE Delete_ItemPersps
(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_check_login_user IN VARCHAR2 := FND_API.G_TRUE,
p_item_id IN NUMBER,
p_perspective_id IN NUMBER := FND_API.G_MISS_NUM
) IS
l_api_name CONSTANT VARCHAR2(30) := 'Delete_ItemPersps';
Select
perspective_id
From amv_i_item_perspectives
Where item_id = p_item_id
And perspective_id = p_perspective_id;
SAVEPOINT Delete_ItemPersps_Pvt;
Delete from amv_i_item_perspectives
Where item_id = p_item_id
And perspective_id = p_perspective_id;
Delete from amv_i_item_perspectives
Where item_id = p_item_id;
ROLLBACK TO Delete_ItemPersps_Pvt;
ROLLBACK TO Delete_ItemPersps_Pvt;
ROLLBACK TO Delete_ItemPersps_Pvt;
end Delete_ItemPersps;
PROCEDURE Update_ItemPersps
(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_check_login_user IN VARCHAR2 := FND_API.G_TRUE,
p_item_id IN NUMBER,
p_perspective_array IN AMV_NUMBER_VARRAY_TYPE
) is
begin
Delete_ItemPersps
(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
-- p_commit => p_commit,
p_validation_level => p_validation_level,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_check_login_user => p_check_login_user,
p_item_id => p_item_id
);
end Update_ItemPersps;
Select
B.PERSPECTIVE_ID,
B.OBJECT_VERSION_NUMBER,
T.PERSPECTIVE_NAME,
T.DESCRIPTION,
T.LANGUAGE,
T.SOURCE_LANG,
B.CREATION_DATE,
B.CREATED_BY,
B.LAST_UPDATE_DATE,
B.LAST_UPDATED_BY,
B.LAST_UPDATE_LOGIN
From AMV_I_PERSPECTIVES_TL T, AMV_I_PERSPECTIVES_B B,
AMV_I_ITEM_PERSPECTIVES I
Where B.PERSPECTIVE_ID = I.PERSPECTIVE_ID
And T.PERSPECTIVE_ID = I.PERSPECTIVE_ID
And T.LANGUAGE = userenv('LANG')
And I.ITEM_ID = p_item_id
Order BY T.PERSPECTIVE_NAME;
x_perspective_obj_varray(l_fetch_count).last_update_date := psp_rec.last_update_date;
x_perspective_obj_varray(l_fetch_count).last_updated_by := psp_rec.last_updated_by;
x_perspective_obj_varray(l_fetch_count).last_update_login := psp_rec.last_update_login;
psp_rec.last_update_date,
psp_rec.last_updated_by,
psp_rec.last_update_login
);