DBA Data[Home] [Help]

APPS.AMS_DM_MODEL_PVT dependencies on AMS_ACCESS_PVT

Line 529: l_access_rec AMS_Access_PVT.access_rec_type;

525: l_org_id NUMBER := FND_API.G_MISS_NUM;
526: l_dm_model_count NUMBER;
527: l_dm_model_rec AMS_dm_model_PVT.DM_MODEL_Rec_Type := p_dm_model_rec;
528:
529: l_access_rec AMS_Access_PVT.access_rec_type;
530:
531: CURSOR c_dm_model_seq IS
532: SELECT ams_dm_models_all_b_s.NEXTVAL
533: FROM DUAL;

Line 743: AMS_Access_PVT.create_access (

739: l_access_rec.owner_flag := 'Y';
740: l_access_rec.admin_flag := 'Y';
741: l_access_rec.delete_flag := 'N';
742:
743: AMS_Access_PVT.create_access (
744: p_api_version => 1.0,
745: p_init_msg_list => FND_API.G_FALSE,
746: p_commit => FND_API.G_FALSE,
747: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

Line 1359: AMS_Access_PVT.update_object_owner (

1355: x_object_version_number := l_tar_model_rec.object_version_number + 1;
1356:
1357: -- Change the owner in the access table
1358: IF (l_tar_model_rec.owner_user_id <> FND_API.G_MISS_NUM AND l_tar_model_rec.owner_user_id <> l_ref_model_rec.owner_user_id) THEN
1359: AMS_Access_PVT.update_object_owner (
1360: p_api_version => 1.0,
1361: p_init_msg_list => FND_API.G_FALSE,
1362: p_commit => FND_API.G_FALSE,
1363: p_validation_level => p_validation_level,

Line 2127: l_is_owner := AMS_Access_PVT.check_owner (

2123: -- the owner in the context needs to be the
2124: -- same as the owner of the record in order
2125: -- for owner to be changed
2126: IF l_reference_rec.owner_user_id <> p_dm_model_rec.owner_user_id THEN
2127: l_is_owner := AMS_Access_PVT.check_owner (
2128: p_object_type => G_OBJECT_TYPE_MODEL,
2129: p_object_id => p_dm_model_rec.model_id,
2130: p_user_or_role_type => 'USER',
2131: p_user_or_role_id => l_context_resource_id

Line 2134: IF l_is_owner = 'N' AND NOT AMS_Access_PVT.Check_Admin_Access(l_context_resource_id) THEN

2130: p_user_or_role_type => 'USER',
2131: p_user_or_role_id => l_context_resource_id
2132: );
2133:
2134: IF l_is_owner = 'N' AND NOT AMS_Access_PVT.Check_Admin_Access(l_context_resource_id) THEN
2135: AMS_Utility_PVT.error_message ('AMS_PRIC_UPDT_OWNER_PERM');
2136: x_return_status := FND_API.G_RET_STS_ERROR;
2137: END IF;
2138: END IF;

Line 2675: IF AMS_Access_PVT.check_update_access (

2671: x_return_status := FND_API.G_RET_STS_SUCCESS;
2672:
2673: --IF (AMS_DEBUG_HIGH_ON) THENams_utility_pvt.debug_message ('qualifier: ' || l_model_qualifier || ' id: ' || p_model_rec.model_id || ' resource: ' || l_owner_user_id);END IF;
2674: -- validate access privileges
2675: IF AMS_Access_PVT.check_update_access (
2676: p_object_id => p_model_rec.model_id,
2677: p_object_type => L_MODEL_QUALIFIER,
2678: p_user_or_role_id => l_owner_user_id,
2679: p_user_or_role_type => L_ACCESS_TYPE_USER) = 'N' THEN

Line 3054: IF AMS_Access_PVT.check_update_access (

3050: FETCH c_ref_model INTO l_ref_model_rec;
3051: CLOSE c_ref_model;
3052:
3053: --First check if the user has access to preview operation
3054: IF AMS_Access_PVT.check_update_access (
3055: p_object_id => p_model_id,
3056: p_object_type => L_MODEL_QUALIFIER,
3057: p_user_or_role_id => l_owner_user_id,
3058: p_user_or_role_type => L_ACCESS_TYPE_USER) = 'N' THEN