PAL7508: Development of new block functionalities. Allow find SOLIDs by GetShapesOn...

diff --git a/src/GEOMImpl/GEOMImpl_IShapesOperations.cxx b/src/GEOMImpl/GEOMImpl_IShapesOperations.cxx
index 071b5c3df268681ba5e26ec94a52aa948be6913d..8d88804290c43b0e5cde1abb7bbbf1abe3805b9b 100644 (file)
--- a/src/GEOMImpl/GEOMImpl_IShapesOperations.cxx
+++ b/src/GEOMImpl/GEOMImpl_IShapesOperations.cxx
@@ -1037,8 +1037,9 @@ Handle(TColStd_HSequenceOfTransient) GEOMImpl_IShapesOperations::GetShapesOnPlan
   TopAbs_ShapeEnum aShapeType = TopAbs_ShapeEnum(theShapeType);
   if (aShapeType != TopAbs_VERTEX &&
       aShapeType != TopAbs_EDGE &&
-      aShapeType != TopAbs_FACE) {
-    SetErrorCode("Only vertices, edges or faces can be found by this method");
+      aShapeType != TopAbs_FACE &&
+      aShapeType != TopAbs_SOLID) {
+    SetErrorCode("Only solids, vertices, edges or faces can be found by this method");
     return NULL;
   }
 
@@ -1156,8 +1157,9 @@ Handle(TColStd_HSequenceOfTransient) GEOMImpl_IShapesOperations::GetShapesOnCyli
   TopAbs_ShapeEnum aShapeType = TopAbs_ShapeEnum(theShapeType);
   if (aShapeType != TopAbs_VERTEX &&
       aShapeType != TopAbs_EDGE &&
-      aShapeType != TopAbs_FACE) {
-    SetErrorCode("Only vertices, edges or faces can be found by this method");
+      aShapeType != TopAbs_FACE &&
+      aShapeType != TopAbs_SOLID) {
+    SetErrorCode("Only solids, vertices, edges or faces can be found by this method");
     return NULL;
   }
 
@@ -1281,8 +1283,9 @@ Handle(TColStd_HSequenceOfTransient) GEOMImpl_IShapesOperations::GetShapesOnSphe
   TopAbs_ShapeEnum aShapeType = TopAbs_ShapeEnum(theShapeType);
   if (aShapeType != TopAbs_VERTEX &&
       aShapeType != TopAbs_EDGE &&
-      aShapeType != TopAbs_FACE) {
-    SetErrorCode("Only vertices, edges or faces can be found by this method");
+      aShapeType != TopAbs_FACE &&
+      aShapeType != TopAbs_SOLID) {
+    SetErrorCode("Only solids, vertices, edges or faces can be found by this method");
     return NULL;
   }