The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE DELETE_USER_ATTRS_DATA
( p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
,p_debug_mode IN VARCHAR2 := 'N'
,p_project_id IN NUMBER
,p_proj_element_id IN NUMBER DEFAULT NULL
,p_old_classification_id IN NUMBER
,p_new_classification_id IN NUMBER DEFAULT NULL
,p_classification_type IN VARCHAR2
,x_return_status OUT NOCOPY VARCHAR2
,x_msg_count OUT NOCOPY NUMBER
,x_msg_data OUT NOCOPY VARCHAR2
)
IS
l_return_status VARCHAR2(1);
CURSOR get_deleted_attr_grps1
IS
SELECT assocs.attr_group_id, assocs.data_level
FROM EGO_OBJ_AG_ASSOCS_B assocs,
FND_OBJECTS obj
WHERE assocs.classification_code = p_classification_type||':'||to_char(p_old_classification_id)
AND assocs.object_id = obj.object_id
AND obj.obj_name = 'PA_PROJECTS'
MINUS
SELECT assocs.attr_group_id, assocs.data_level
FROM EGO_OBJ_AG_ASSOCS_B assocs,
FND_OBJECTS obj
WHERE assocs.classification_code = p_classification_type||':'||to_char(p_new_classification_id)
AND assocs.object_id = obj.object_id
AND obj.obj_name = 'PA_PROJECTS';
CURSOR get_deleted_attr_grps2
IS
SELECT assocs.attr_group_id, assocs.data_level
FROM EGO_OBJ_AG_ASSOCS_B assocs,
FND_OBJECTS obj
WHERE assocs.classification_code = p_classification_type||':'||to_char(p_old_classification_id)
AND assocs.object_id = obj.object_id
AND obj.obj_name = 'PA_PROJECTS';
SELECT 'Y'
FROM DUAL
WHERE c_attr_group_id IN
(SELECT assocs.attr_group_id
FROM EGO_OBJ_AG_ASSOCS_B assocs,
PA_PROJECTS_ALL ppa,
PA_PROJECT_TYPES ppt,
FND_OBJECTS obj
WHERE ppa.project_id = p_project_id
AND ppa.project_type = ppt.project_type
AND assocs.classification_code = 'PROJECT_TYPE:'||to_char(ppt.project_type_id)
AND assocs.data_level = 'PROJECT_LEVEL'
AND assocs.object_id = obj.object_id
AND obj.obj_name = 'PA_PROJECTS'
UNION
SELECT DISTINCT assocs.attr_group_id
FROM EGO_OBJ_AG_ASSOCS_B assocs,
PA_PROJECT_CLASSES ppc,
PA_CLASS_CATEGORIES pcc,
FND_OBJECTS obj
WHERE ppc.project_id = p_project_id
AND ppc.class_category = pcc.class_category
AND assocs.classification_code = 'CLASS_CATEGORY:'||to_char(pcc.class_category_id)
AND assocs.data_level = 'PROJECT_LEVEL'
AND assocs.object_id = obj.object_id
AND obj.obj_name = 'PA_PROJECTS'
UNION
SELECT assocs.attr_group_id
FROM EGO_OBJ_AG_ASSOCS_B assocs,
PA_PROJECT_CLASSES ppc,
PA_CLASS_CODES pcc,
FND_OBJECTS obj
WHERE ppc.project_id = p_project_id
AND ppc.class_category = pcc.class_category
AND ppc.class_code = pcc.class_code
AND assocs.classification_code = 'CLASS_CODE:'||to_char(pcc.class_code_id)
AND assocs.data_level = 'PROJECT_LEVEL'
AND assocs.object_id = obj.object_id
AND obj.obj_name = 'PA_PROJECTS');
SELECT 'Y'
FROM DUAL
WHERE c_attr_group_id IN
(SELECT assocs.attr_group_id
FROM EGO_OBJ_AG_ASSOCS_B assocs,
PA_PROJECTS_ALL ppa,
PA_PROJECT_TYPES ppt,
FND_OBJECTS obj
WHERE ppa.project_id = p_project_id
AND ppa.project_type = ppt.project_type
AND assocs.classification_code = 'PROJECT_TYPE:'||to_char(ppt.project_type_id)
AND assocs.data_level = 'TASK_LEVEL'
AND assocs.object_id = obj.object_id
AND obj.obj_name = 'PA_PROJECTS'
UNION
SELECT DISTINCT assocs.attr_group_id
FROM EGO_OBJ_AG_ASSOCS_B assocs,
PA_PROJECT_CLASSES ppc,
PA_CLASS_CATEGORIES pcc,
FND_OBJECTS obj
WHERE ppc.project_id = p_project_id
AND ppc.class_category = pcc.class_category
AND assocs.classification_code = 'CLASS_CATEGORY:'||to_char(pcc.class_category_id)
AND assocs.data_level = 'TASK_LEVEL'
AND assocs.object_id = obj.object_id
AND obj.obj_name = 'PA_PROJECTS'
UNION
SELECT assocs.attr_group_id
FROM EGO_OBJ_AG_ASSOCS_B assocs,
PA_PROJECT_CLASSES ppc,
PA_CLASS_CODES pcc,
FND_OBJECTS obj
WHERE ppc.project_id = p_project_id
AND ppc.class_category = pcc.class_category
AND ppc.class_code = pcc.class_code
AND assocs.classification_code = 'CLASS_CODE:'||to_char(pcc.class_code_id)
AND assocs.data_level = 'TASK_LEVEL'
AND assocs.object_id = obj.object_id
AND obj.obj_name = 'PA_PROJECTS'
UNION
SELECT assocs.attr_group_id
FROM EGO_OBJ_AG_ASSOCS_B assocs,
PA_PROJ_ELEMENTS ppe,
FND_OBJECTS obj
WHERE ppe.project_id = p_project_id
AND ppe.proj_element_id = c_proj_element_id
AND assocs.classification_code = 'TASK_TYPE:'||to_char(ppe.type_id)
AND assocs.object_id = obj.object_id
AND obj.obj_name = 'PA_PROJECTS');
SELECT proj_element_id
FROM PA_PROJ_ELEMENTS
WHERE project_id = p_project_id;
pa_debug.debug('PA_USER_ATTR_PVT.Delete_User_Attrs_Data BEGIN');
savepoint delete_user_attrs_data_pvt;
OPEN get_deleted_attr_grps1;
FETCH get_deleted_attr_grps1 INTO l_attr_group_id, l_data_level;
EXIT WHEN get_deleted_attr_grps1%NOTFOUND;
DELETE FROM PA_PROJECTS_ERP_EXT_B
WHERE PROJECT_ID = p_project_id
AND PROJ_ELEMENT_ID is NULL
AND ATTR_GROUP_ID = l_attr_group_id;
DELETE FROM PA_PROJECTS_ERP_EXT_TL
WHERE PROJECT_ID = p_project_id
AND PROJ_ELEMENT_ID is NULL
AND ATTR_GROUP_ID = l_attr_group_id;
DELETE FROM PA_PROJECTS_ERP_EXT_B
WHERE PROJECT_ID = p_project_id
AND PROJ_ELEMENT_ID = l_proj_element_id
AND ATTR_GROUP_ID = l_attr_group_id;
DELETE FROM PA_PROJECTS_ERP_EXT_TL
WHERE PROJECT_ID = p_project_id
AND PROJ_ELEMENT_ID = l_proj_element_id
AND ATTR_GROUP_ID = l_attr_group_id;
CLOSE get_deleted_attr_grps1;
OPEN get_deleted_attr_grps2;
FETCH get_deleted_attr_grps2 INTO l_attr_group_id, l_data_level;
EXIT WHEN get_deleted_attr_grps2%NOTFOUND;
DELETE FROM PA_PROJECTS_ERP_EXT_B
WHERE PROJECT_ID = p_project_id
AND PROJ_ELEMENT_ID is NULL
AND ATTR_GROUP_ID = l_attr_group_id;
DELETE FROM PA_PROJECTS_ERP_EXT_TL
WHERE PROJECT_ID = p_project_id
AND PROJ_ELEMENT_ID is NULL
AND ATTR_GROUP_ID = l_attr_group_id;
DELETE FROM PA_PROJECTS_ERP_EXT_B
WHERE PROJECT_ID = p_project_id
AND PROJ_ELEMENT_ID = l_proj_element_id
AND ATTR_GROUP_ID = l_attr_group_id;
DELETE FROM PA_PROJECTS_ERP_EXT_TL
WHERE PROJECT_ID = p_project_id
AND PROJ_ELEMENT_ID = l_proj_element_id
AND ATTR_GROUP_ID = l_attr_group_id;
CLOSE get_deleted_attr_grps2;
OPEN get_deleted_attr_grps1;
FETCH get_deleted_attr_grps1 INTO l_attr_group_id, l_data_level;
EXIT WHEN get_deleted_attr_grps1%NOTFOUND;
DELETE FROM PA_PROJECTS_ERP_EXT_B
WHERE PROJECT_ID = p_project_id
AND PROJ_ELEMENT_ID = p_proj_element_id
AND ATTR_GROUP_ID = l_attr_group_id;
DELETE FROM PA_PROJECTS_ERP_EXT_TL
WHERE PROJECT_ID = p_project_id
AND PROJ_ELEMENT_ID = p_proj_element_id
AND ATTR_GROUP_ID = l_attr_group_id;
CLOSE get_deleted_attr_grps1;
pa_debug.debug('PA_USER_ATTR_PVT.Delete_User_Attrs_Data END');
rollback to delete_user_attrs_data_pvt;
rollback to delete_user_attrs_data_pvt;
p_procedure_name => 'Delete_User_Attrs_Data',
p_error_text => SUBSTRB(SQLERRM,1,240));
rollback to delete_user_attrs_data_pvt;
p_procedure_name => 'Delete_User_Attrs_Data',
p_error_text => SUBSTRB(SQLERRM,1,240));
END DELETE_USER_ATTRS_DATA;
PROCEDURE DELETE_ALL_USER_ATTRS_DATA
( p_api_version IN NUMBER := 1.0
,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
,p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
,p_debug_mode IN VARCHAR2 := 'N'
,p_project_id IN NUMBER
,p_proj_element_id IN NUMBER DEFAULT NULL
,x_return_status OUT NOCOPY VARCHAR2
,x_msg_count OUT NOCOPY NUMBER
,x_msg_data OUT NOCOPY VARCHAR2
)
IS
l_return_status VARCHAR2(1);
pa_debug.debug('PA_USER_ATTR_PVT.Delete_All_User_Attrs_Data BEGIN');
savepoint delete_all_user_attrs_data_pvt;
DELETE FROM PA_PROJECTS_ERP_EXT_B
WHERE PROJECT_ID = p_project_id;
DELETE FROM PA_PROJECTS_ERP_EXT_TL
WHERE PROJECT_ID = p_project_id;
DELETE FROM PA_PROJECTS_ERP_EXT_B
WHERE PROJECT_ID = p_project_id
AND PROJ_ELEMENT_ID = p_proj_element_id;
DELETE FROM PA_PROJECTS_ERP_EXT_TL
WHERE PROJECT_ID = p_project_id
AND PROJ_ELEMENT_ID = p_proj_element_id;
pa_debug.debug('PA_USER_ATTR_PVT.Delete_All_User_Attrs_Data END');
rollback to delete_all_user_attrs_data_pvt;
rollback to delete_all_user_attrs_data_pvt;
p_procedure_name => 'Delete_All_User_Attrs_Data',
p_error_text => SUBSTRB(SQLERRM,1,240));
rollback to delete_all_user_attrs_data_pvt;
p_procedure_name => 'Delete_All_User_Attrs_Data',
p_error_text => SUBSTRB(SQLERRM,1,240));
END DELETE_ALL_USER_ATTRS_DATA;