Salome HOME
Use logStructuredUserEvent() for log message format consistency.
[modules/geom.git] / src / GEOMBase / GEOMBase_Helper.cxx
old mode 100755 (executable)
new mode 100644 (file)
index a499fe2..d7fa501
@@ -1,4 +1,4 @@
-// Copyright (C) 2007-2013  CEA/DEN, EDF R&D, OPEN CASCADE
+// Copyright (C) 2007-2023  CEA, EDF, OPEN CASCADE
 //
 // Copyright (C) 2003-2007  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
@@ -6,7 +6,7 @@
 // This library is free software; you can redistribute it and/or
 // modify it under the terms of the GNU Lesser General Public
 // License as published by the Free Software Foundation; either
-// version 2.1 of the License.
+// version 2.1 of the License, or (at your option) any later version.
 //
 // This library is distributed in the hope that it will be useful,
 // but WITHOUT ANY WARRANTY; without even the implied warranty of
@@ -24,6 +24,8 @@
 //  File   : GEOMBase_Helper.cxx
 //  Author : Sergey ANIKIN, Open CASCADE S.A.S. (sergey.anikin@opencascade.com)
 
+#include <QRegExp>
+
 #include "GEOMBase_Helper.h"
 #include "GEOMBase.h"
 #include "GEOM_Operation.h"
 #include <LightApp_SelectionMgr.h>
 #include <LightApp_DataOwner.h>
 #include <SalomeApp_Tools.h>
-#include <SALOME_ListIteratorOfListIO.hxx>
+#include <SALOME_ListIO.hxx>
+#include "utilities.h"
 
 #include <SALOME_Prs.h>
+#include "utilities.h"
 
 #include <OCCViewer_ViewModel.h>
 #include <SVTK_ViewModel.h>
 
-#include <TColStd_MapOfInteger.hxx>
 #include <TCollection_AsciiString.hxx>
 #include <TColStd_IndexedMapOfInteger.hxx>
 
@@ -87,8 +90,8 @@ GEOM::GEOM_Gen_ptr GEOMBase_Helper::getGeomEngine()
 // Function : GEOMBase_Helper
 // Purpose  :
 //================================================================
-GEOMBase_Helper::GEOMBase_Helper( SUIT_Desktop* desktop )
-  : myDesktop( desktop ), myViewWindow( 0 ), myDisplayer( 0 ), myCommand( 0 ), isPreview( false ),
+GEOMBase_Helper::GEOMBase_Helper( SUIT_Desktop* desktop, SUIT_ViewWindow* aVW )
+  : myDisplayer( 0 ), myCommand( 0 ), myViewWindow( aVW ), isPreview( false ), myDesktop( desktop ),
     myIsApplyAndClose( false ), myIsOptimizedBrowsing( false ), myIsWaitCursorEnabled( true ),
     myIsDisableBrowsing(false), myIsDisplayResult(true)
 {
@@ -144,10 +147,10 @@ void GEOMBase_Helper::display( GEOM::GEOM_Object_ptr object, const bool updateVi
 {
   // Unset color of shape ( this color may be set during preview displaying )
   // Default color will be used
-//   getDisplayer()->UnsetColor();
+  //   getDisplayer()->UnsetColor();
   getDisplayer()->UnsetWidth();
-  
-  MESSAGE("GEOMBase_Helper::display myTexture = "<<getDisplayer()->GetTexture())
+
+  MESSAGE("GEOMBase_Helper::display myTexture = "<<getDisplayer()->GetTexture());
 
   // Enable activisation of selection
   getDisplayer()->SetToActivate( true );
@@ -178,9 +181,11 @@ void GEOMBase_Helper::erase( GEOM::GEOM_Object_ptr object, const bool updateView
 {
   if ( !object->_is_nil() ) {
     QString entry = getEntry( object );
-    getDisplayer()->Erase( new SALOME_InteractiveObject(
-      entry.toLatin1().constData(), 
-      "GEOM", strdup( GEOMBase::GetName( object ).toLatin1().constData() ) ), true, updateView );
+    QString name  = GEOMBase::GetName( object );
+    getDisplayer()->Erase ( new SALOME_InteractiveObject(entry.toUtf8().constData(),
+                                                         "GEOM",
+                                                         name.toUtf8().constData() ),
+                            true, updateView );
   }
 }
 
@@ -218,8 +223,12 @@ void GEOMBase_Helper::redisplay( GEOM::GEOM_Object_ptr object,
     getDisplayer()->SetToActivate( true );
 
     QString entry = getEntry( object );
-    getDisplayer()->Redisplay(new SALOME_InteractiveObject
-                              (entry.toLatin1().constData(), "GEOM", strdup(GEOMBase::GetName(object).toLatin1().constData())), false);
+    QString  name = GEOMBase::GetName( object );
+    getDisplayer()->Redisplay
+      (new SALOME_InteractiveObject (entry.toUtf8().constData(),
+                                     "GEOM",
+                                     name.toUtf8().constData()),
+       false);
   }
 
   if ( withChildren ) {
@@ -236,8 +245,12 @@ void GEOMBase_Helper::redisplay( GEOM::GEOM_Object_ptr object,
           if ( !CORBA::is_nil( aChild ) ) {
             if ( !aChild->_is_nil() ) {
               QString entry = getEntry( aChild );
-              getDisplayer()->Redisplay( new SALOME_InteractiveObject(
-                entry.toLatin1().constData(), "GEOM", strdup( GEOMBase::GetName( aChild ).toLatin1().constData() ) ), false );
+              QString  name = GEOMBase::GetName( aChild );
+              getDisplayer()->Redisplay
+                ( new SALOME_InteractiveObject( entry.toUtf8().constData(),
+                                                "GEOM",
+                                                name.toUtf8().constData() ),
+                  false );
             }
           }
         }
@@ -259,13 +272,14 @@ void GEOMBase_Helper::displayPreview( const bool   display,
                                       const bool   toRemoveFromEngine,
                                       const double lineWidth,
                                       const int    displayMode,
-                                      const int    color )
+                                      const int    color,
+                                      const bool   append )
 {
   if(!display) {
     erasePreview( update );
     return;
   }
-  
+
   isPreview = true;
   QString msg;
   if ( !isValid( msg ) )
@@ -275,25 +289,26 @@ void GEOMBase_Helper::displayPreview( const bool   display,
     return;
   }
 
-  erasePreview( false );
+  if( !append )
+    erasePreview( false );
 
   try {
     SUIT_OverrideCursor wc;
     ObjectList objects;
+
     if ( !isWaitCursorEnabled() )
       wc.suspend();
-    
+
     if ( !execute( objects ) || !getOperation()->IsDone() ) {
       wc.suspend();
     }
     else {
       for ( ObjectList::iterator it = objects.begin(); it != objects.end(); ++it )
       {
-            GEOM::GEOM_Object_var obj=*it;
+        GEOM::GEOM_Object_var obj = *it;
         displayPreview( obj, true, activate, false, lineWidth, displayMode, color );
         if ( toRemoveFromEngine )
-              obj->UnRegister();
+          obj->UnRegister();
       }
     }
   }
@@ -319,7 +334,7 @@ void GEOMBase_Helper::displayPreview( GEOM::GEOM_Object_ptr object,
                                       const int             displayMode,
                                       const int             color )
 {
-  SUIT_ResourceMgr* resMgr = SUIT_Session::session()->resourceMgr();    
+  SUIT_ResourceMgr* resMgr = SUIT_Session::session()->resourceMgr();
 
   // Set color for preview shape
   getDisplayer()->SetColor( color == -1 ? Quantity_NOC_VIOLET : color );
@@ -341,7 +356,7 @@ void GEOMBase_Helper::displayPreview( GEOM::GEOM_Object_ptr object,
   SALOME_Prs* aPrs = getDisplayer()->BuildPrs( object );
   if ( aPrs == 0 || aPrs->IsNull() )
     return;
-    
+
   // Make preview not clippable
   aPrs->SetClippable (false);
 
@@ -372,17 +387,17 @@ void GEOMBase_Helper::displayPreview( const SALOME_Prs* prs,
 
   if ( myViewWindow == 0 )
     return;
-  
+
   // Display prs
   SUIT_ViewManager* aViewManager = myViewWindow->getViewManager();
   if ( aViewManager->getType() == OCCViewer_Viewer::Type() ||
        aViewManager->getType() == SVTK_Viewer::Type() )
-    {
-      SUIT_ViewModel* aViewModel = aViewManager->getViewModel();
-      SALOME_View* aView = dynamic_cast<SALOME_View*>(aViewModel);
-      if (aView)
-        aView->Display( prs );
-    }
+  {
+    SUIT_ViewModel* aViewModel = aViewManager->getViewModel();
+    SALOME_View* aView = dynamic_cast<SALOME_View*>(aViewModel);
+    if (aView)
+      aView->Display( getDisplayer(), prs );
+  }
 
   // Add prs to the preview list
   myPreview.push_back( (SALOME_Prs*)prs );
@@ -401,19 +416,20 @@ void GEOMBase_Helper::erasePreview( const bool update )
   // check view frame where the preview was displayed
   bool vfOK = checkViewWindow() && myViewWindow;
   // Iterate through presentations and delete them
-  for ( PrsList::iterator anIter = myPreview.begin(); anIter != myPreview.end(); ++anIter ) {
+  for ( PrsList::iterator anIter = myPreview.begin(); anIter != myPreview.end(); ++anIter )
+  {
     if ( vfOK )
+    {
+      SUIT_ViewManager* aViewManager = myViewWindow->getViewManager();
+      if ( aViewManager->getType() == OCCViewer_Viewer::Type() ||
+           aViewManager->getType() == SVTK_Viewer::Type() )
       {
-         SUIT_ViewManager* aViewManager = myViewWindow->getViewManager();
-         if ( aViewManager->getType() == OCCViewer_Viewer::Type() ||
-              aViewManager->getType() == SVTK_Viewer::Type() )
-           {
-             SUIT_ViewModel* aViewModel = aViewManager->getViewModel();
-             SALOME_View* aView = dynamic_cast<SALOME_View*>(aViewModel);
-             if (aView)
-               aView->Erase( *anIter, true );
-           }
+        SUIT_ViewModel* aViewModel = aViewManager->getViewModel();
+        SALOME_View* aView = dynamic_cast<SALOME_View*>(aViewModel);
+        if (aView)
+          aView->Erase( getDisplayer(), *anIter, true );
       }
+    }
     delete *anIter;
   }
   myPreview.clear();
@@ -460,9 +476,9 @@ void GEOMBase_Helper::activate( const int theType )
 //================================================================
 // Function : localSelection
 // Purpose  : Activate selection of sub-shapes in accordance with mode
-//            theMode is from TopAbs_ShapeEnum
+//            modes are from TopAbs_ShapeEnum
 //================================================================
-void GEOMBase_Helper::localSelection( const ObjectList& theObjs, const int theMode )
+void GEOMBase_Helper::localSelection( const ObjectList& theObjs, const std::list<int> modes )
 {
   SALOME_ListIO aListOfIO;
 
@@ -474,11 +490,15 @@ void GEOMBase_Helper::localSelection( const ObjectList& theObjs, const int theMo
       continue;
     QString anEntry = getEntry( anObj );
     if ( anEntry != "" )
-      aListOfIO.Append( new SALOME_InteractiveObject(
-        anEntry.toLatin1().constData(), "GEOM", strdup( GEOMBase::GetName( anObj ).toLatin1().constData() ) ) );
+    {
+      //MESSAGE("anEntry: "<< anEntry.toStdString().c_str());
+      QString aName = GEOMBase::GetName( anObj );
+      aListOfIO.Append( new SALOME_InteractiveObject( anEntry.toUtf8().constData(),
+                                                      "GEOM", aName.toUtf8().constData() ));
+    }
   }
 
-  getDisplayer()->LocalSelection( aListOfIO, theMode );
+  getDisplayer()->LocalSelection( aListOfIO, modes );
 }
 
 //================================================================
@@ -486,19 +506,78 @@ void GEOMBase_Helper::localSelection( const ObjectList& theObjs, const int theMo
 // Purpose  : Activate selection of sub-shapes in accordance with mode
 //            theMode is from TopAbs_ShapeEnum
 //================================================================
-void GEOMBase_Helper::localSelection( GEOM::GEOM_Object_ptr obj, const int mode )
+void GEOMBase_Helper::localSelection( const ObjectList& theObjs, const int theMode )
+{
+  std::list<int> modes;
+  modes.push_back( theMode );
+  localSelection( theObjs, modes );
+}
+
+//================================================================
+// Function : localSelection
+// Purpose  : Activate selection of sub-shapes in accordance with mode
+//            modes are from TopAbs_ShapeEnum
+//================================================================
+void GEOMBase_Helper::localSelection( GEOM::GEOM_Object_ptr obj, const std::list<int> modes )
 {
   // If object is null local selection for all objects is activated
   if ( obj->_is_nil() ) {
-    getDisplayer()->LocalSelection( Handle(SALOME_InteractiveObject)(), mode );
+    getDisplayer()->LocalSelection( Handle(SALOME_InteractiveObject)(), modes );
     return;
   }
 
   ObjectList objList;
   objList.push_back( obj );
-  localSelection( objList, mode );
+  localSelection( objList, modes );
+}
+
+//================================================================
+// Function : localSelection
+// Purpose  : Activate selection of sub-shapes in accordance with mode
+//            mode is from TopAbs_ShapeEnum
+//================================================================
+void GEOMBase_Helper::localSelection( GEOM::GEOM_Object_ptr obj, const int mode )
+{
+  std::list<int> modes;
+  modes.push_back( mode );
+  localSelection( obj, modes );
 }
 
+//================================================================
+// Function : localSelection
+// Purpose  : Activate selection of sub-shapes in accordance with mode
+//            mode is from TopAbs_ShapeEnum
+//================================================================
+void GEOMBase_Helper::localSelection( const std::string& entry,  const std::string& name, const std::list<int> modes)
+{
+  SALOME_ListIO aListOfIO;
+  QString aName = name.c_str();
+  aListOfIO.Append( new SALOME_InteractiveObject( entry.c_str(),
+                                                  "GEOM", aName.toUtf8().constData() ));
+  getDisplayer()->LocalSelection( aListOfIO, modes );
+}
+
+//================================================================
+// Function : localSelection
+// Purpose  : Activate selection of sub-shapes in accordance with mode
+//            modes are from TopAbs_ShapeEnum
+//================================================================
+void GEOMBase_Helper::localSelection( const std::list<int> modes )
+{
+  localSelection( GEOM::GEOM_Object::_nil(), modes );
+}
+
+//================================================================
+// Function : localSelection
+// Purpose  : Activate selection of sub-shapes in accordance with mode
+//            mode is from TopAbs_ShapeEnum
+//================================================================
+void GEOMBase_Helper::localSelection( const int mode )
+{
+  std::list<int> modes;
+  modes.push_back( mode );
+  localSelection( modes );
+}
 
 //================================================================
 // Function : globalSelection
@@ -546,12 +625,10 @@ QString GEOMBase_Helper::addInStudy( GEOM::GEOM_Object_ptr theObj, const char* t
   if ( !aStudy || theObj->_is_nil() )
     return QString();
 
-  SALOMEDS::Study_var aStudyDS = GeometryGUI::ClientStudyToStudy(aStudy);
-
   GEOM::GEOM_Object_ptr aFatherObj = getFather( theObj );
 
   SALOMEDS::SObject_var aSO =
-    getGeomEngine()->AddInStudy(aStudyDS, theObj, theName, aFatherObj);
+    getGeomEngine()->AddInStudy(theObj, theName, aFatherObj);
 
   QString anEntry;
   if ( !aSO->_is_nil() ) {
@@ -560,7 +637,7 @@ QString GEOMBase_Helper::addInStudy( GEOM::GEOM_Object_ptr theObj, const char* t
   }
   // Each dialog is responsible for this method implementation,
   // default implementation does nothing
-  restoreSubShapes(aStudyDS, aSO);
+  restoreSubShapes(aSO);
   aSO->UnRegister();
 
   return anEntry;
@@ -570,15 +647,14 @@ QString GEOMBase_Helper::addInStudy( GEOM::GEOM_Object_ptr theObj, const char* t
 // Function : restoreSubShapes
 // Purpose  : restore tree of argument's sub-shapes under the resulting shape
 //================================================================
-void GEOMBase_Helper::restoreSubShapes (SALOMEDS::Study_ptr   /*theStudy*/,
-                                        SALOMEDS::SObject_ptr /*theSObject*/)
+void GEOMBase_Helper::restoreSubShapes (SALOMEDS::SObject_ptr /*theSObject*/)
 {
   // do nothing by default
 
   // example of implementation in particular dialog:
   // GEOM::ListOfGO anArgs;
   // anArgs.length(0); // empty list means that all arguments should be restored
-  // getGeomEngine()->RestoreSubShapesSO(theStudy, theSObject, anArgs,
+  // getGeomEngine()->RestoreSubShapesSO(theSObject, anArgs,
   //                                     /*theFindMethod=*/GEOM::FSM_GetInPlace,
   //                                     /*theInheritFirstArg=*/false);
 }
@@ -594,7 +670,7 @@ void GEOMBase_Helper::updateObjBrowser() const
     CAM_Module* module = app->module( "Geometry" );
     SalomeApp_Module* appMod = dynamic_cast<SalomeApp_Module*>( module );
     if ( appMod ) {
-      appMod->updateObjBrowser( true );
+      appMod->updateObjBrowser();
     }
   }
 }
@@ -608,18 +684,6 @@ void GEOMBase_Helper::updateViewer()
   getDisplayer()->UpdateViewer();
 }
 
-//================================================================
-// Function : getStudyId
-// Purpose  : Get study Id
-//================================================================
-int GEOMBase_Helper::getStudyId() const
-{
-  int anId = -1;
-  if ( getStudy() )
-    anId = getStudy()->id();
-  return anId;
-}
-
 //================================================================
 // Function : getStudy
 // Purpose  : Returns the active study. It is recommended to use
@@ -636,11 +700,11 @@ SalomeApp_Study* GEOMBase_Helper::getStudy() const
   SUIT_Application* anApp = 0;
   QListIterator<SUIT_Application*> it( anAppList );
   while ( it.hasNext() )
-    {
-      anApp = it.next();
-      if ( anApp && anApp->desktop() == aDesktop )
-        break;
-    }
+  {
+    anApp = it.next();
+    if ( anApp && anApp->desktop() == aDesktop )
+      break;
+  }
 
   return dynamic_cast<SalomeApp_Study*>(anApp->activeStudy());
 }
@@ -655,7 +719,7 @@ QString GEOMBase_Helper::getEntry( GEOM::GEOM_Object_ptr object ) const
   if ( study )  {
     QString objIOR = GEOMBase::GetIORFromObject( object );
     if ( objIOR != "" ) {
-      _PTR(SObject) SO ( study->studyDS()->FindObjectIOR( objIOR.toLatin1().constData() ) );
+      _PTR(SObject) SO ( study->studyDS()->FindObjectIOR( objIOR.toUtf8().constData() ) );
       if ( SO )
         return QString::fromStdString(SO->GetID());
     }
@@ -670,7 +734,7 @@ QString GEOMBase_Helper::getEntry( GEOM::GEOM_Object_ptr object ) const
 GEOM_Displayer* GEOMBase_Helper::getDisplayer()
 {
   if ( !myDisplayer )
-    myDisplayer = new GEOM_Displayer( getStudy() );
+    myDisplayer = new GEOM_Displayer();
   return myDisplayer;
 }
 
@@ -692,8 +756,8 @@ bool GEOMBase_Helper::openCommand()
   bool res = false;
   if ( !getStudy() || hasCommand() )
   {
-    MESSAGE("Getting out from openCommand()")
-    return res;
+    MESSAGE("Getting out from openCommand()");
+      return res;
   }
 
   GEOM::GEOM_IOperations_var anOp = GEOM::GEOM_IOperations::_narrow( getOperation() );
@@ -704,7 +768,7 @@ bool GEOMBase_Helper::openCommand()
   }
   else
   {
-    MESSAGE("anOp->_is_nil() = true")
+    MESSAGE("anOp->_is_nil() = true");
   }
 
   return res;
@@ -775,10 +839,10 @@ bool GEOMBase_Helper::checkViewWindow()
     QList<SUIT_ViewWindow*> aViewWindowsList = SUIT_Session::session()->activeApplication()->desktop()->windows();
     QListIterator<SUIT_ViewWindow*> it( aViewWindowsList );
     while ( it.hasNext() )
-      {
-        if ( myViewWindow == it.next() )
-          return true;
-      }
+    {
+      if ( myViewWindow == it.next() )
+        return true;
+    }
   }
   myViewWindow = 0;
   return false;
@@ -787,16 +851,16 @@ bool GEOMBase_Helper::checkViewWindow()
 //================================================================
 // Function : onAccept
 // Purpose  : This method should be called from dialog's slots onOk() and onApply()
-//            It perfroms user input validation, then it
+//            It performs user input validation, then it
 //            performs a proper operation and manages transactions, etc.
 //================================================================
 bool GEOMBase_Helper::onAccept( const bool publish, const bool useTransaction, bool erasePreviewFlag )
 {
   SalomeApp_Study* appStudy = dynamic_cast<SalomeApp_Study*>( SUIT_Session::session()->activeApplication()->activeStudy() );
-  if ( !appStudy ) 
+  if ( !appStudy )
   {
-    MESSAGE("appStudy is empty")
-    return false;
+    MESSAGE("appStudy is empty");
+      return false;
   }
   _PTR(Study) aStudy = appStudy->studyDS();
 
@@ -815,7 +879,7 @@ bool GEOMBase_Helper::onAccept( const bool publish, const bool useTransaction, b
     showError( msg );
     return false;
   }
-  
+
   if(erasePreviewFlag)
     erasePreview( false );
 
@@ -832,6 +896,7 @@ bool GEOMBase_Helper::onAccept( const bool publish, const bool useTransaction, b
         showError();
       }
       else {
+        QList<GEOM::GeomObjPtr> anObjectList = getSourceObjects( );
         addSubshapesToStudy(); // add Sub-shapes if local selection
         const int nbObjs = objects.size();
         QStringList anEntryList;
@@ -842,23 +907,23 @@ bool GEOMBase_Helper::onAccept( const bool publish, const bool useTransaction, b
             QString aName = getObjectName(obj);
             if (aName.isEmpty()) {
               aName = getNewObjectName(currObj);
-                   if ( nbObjs > 1 ) {
-                           if (aName.isEmpty())
-                             aName = getPrefix(obj);
-                             if (nbObjs <= 30) {
-                               // Try to find a unique name
-                               aName = GEOMBase::GetDefaultName(aName, extractPrefix());
-                             } else {
-                               // Don't check name uniqueness in case of numerous objects
-                               aName = aName + "_" + QString::number(aNumber++);
-                             }
-                   } else {
-                           // PAL6521: use a prefix, if some dialog box doesn't reimplement getNewObjectName()
-                           if ( aName.isEmpty() )
-                             aName = GEOMBase::GetDefaultName( getPrefix( obj ) );
-                   }
+              if ( nbObjs > 1 ) {
+                if (aName.isEmpty())
+                  aName = getPrefix(obj);
+                if (nbObjs <= 30) {
+                  // Try to find a unique name
+                  aName = GEOMBase::GetDefaultName(aName, extractPrefix());
+                } else {
+                  // Don't check name uniqueness in case of numerous objects
+                  aName = aName + "_" + QString::number(aNumber++);
+                }
+              } else {
+                // PAL6521: use a prefix, if some dialog box doesn't reimplement getNewObjectName()
+                if ( aName.isEmpty() )
+                  aName = GEOMBase::GetDefaultName( getPrefix( obj ) );
+              }
             }
-            anEntryList << addInStudy( obj, aName.toLatin1().constData() );
+            anEntryList << addInStudy( obj, aName.toUtf8().constData() );
             // updateView=false
             if( isDisplayResult() )
               display( obj, false );
@@ -880,12 +945,20 @@ bool GEOMBase_Helper::onAccept( const bool publish, const bool useTransaction, b
         }
 
         if ( nbObjs ) {
+          const QString anOpName( typeid(*this).name() );
+          // The operator name may have the following format: 24PrimitiveGUI_CylinderDlg
+          // clean it up to get the simple operator (here Cylinder) name into the log.
+          const QRegExp rx("^[^\w]*_(.*)Dlg$");
+          const int pos = rx.indexIn(anOpName);
+          SalomeApp_Application::logStructuredUserEvent( "Geom",
+                                                         "geometry",
+                                                         pos == -1 ? anOpName : rx.cap(1),
+                                                         "applied" );
           commitCommand();
           updateObjBrowser();
           if( SUIT_Application* anApp = SUIT_Session::session()->activeApplication() ) {
             LightApp_Application* aLightApp = dynamic_cast<LightApp_Application*>( anApp );
             if(aLightApp) {
-              QString anOpName( typeid(*this).name() );
               aLightApp->emitOperationFinished( "Geometry", anOpName, anEntryList );
 
               if ( !isDisableBrowsing() )
@@ -893,6 +966,8 @@ bool GEOMBase_Helper::onAccept( const bool publish, const bool useTransaction, b
             }
             anApp->putInfo( QObject::tr("GEOM_PRP_DONE") );
           }
+          if ( anObjectList.count() > 0 )
+            hideSourceObjects( anObjectList );
           result = true;
         }
         else
@@ -903,19 +978,19 @@ bool GEOMBase_Helper::onAccept( const bool publish, const bool useTransaction, b
   catch( const SALOME::SALOME_Exception& e ) {
     SalomeApp_Tools::QtCatchCorbaException( e );
     abortCommand();
-    MESSAGE("Exception catched")
+    MESSAGE("Exception caught");
   }
 
   updateViewer();
 
-  MESSAGE("result ="<<result)
+  MESSAGE("result ="<<result);
   return result;
 }
 
 
 //================================================================
 // Function : showError
-// Purpose  : Shows a message box with infromation about an error taken from getOperation()->GetErrorCode()
+// Purpose  : Shows a message box with information about an error taken from getOperation()->GetErrorCode()
 //================================================================
 void GEOMBase_Helper::showError()
 {
@@ -973,7 +1048,7 @@ bool GEOMBase_Helper::isValid( QString& )
 //            It should perform the required operation and put all new or modified objects into
 //            <objects> argument.Should return <false> if some error occurs during its execution.
 //================================================================
-bool GEOMBase_Helper::execute( ObjectList& objects )
+bool GEOMBase_Helper::execute( ObjectList& )
 {
   return false;
 }
@@ -984,7 +1059,7 @@ bool GEOMBase_Helper::execute( ObjectList& objects )
 //            for <theObj> or a nil reference if <theObj> should be published
 //            as a top-level object.
 //================================================================
-GEOM::GEOM_Object_ptr GEOMBase_Helper::getFather( GEOM::GEOM_Object_ptr theObj )
+GEOM::GEOM_Object_ptr GEOMBase_Helper::getFather( GEOM::GEOM_Object_ptr )
 {
   return GEOM::GEOM_Object::_nil();
 }
@@ -993,7 +1068,7 @@ GEOM::GEOM_Object_ptr GEOMBase_Helper::getFather( GEOM::GEOM_Object_ptr theObj )
 // Function : getObjectName
 // Purpose  : Redefine this method to return proper name for the given object
 //================================================================
-QString GEOMBase_Helper::getObjectName(GEOM::GEOM_Object_ptr object) const
+QString GEOMBase_Helper::getObjectName( GEOM::GEOM_Object_ptr ) const
 {
   return QString();
 }
@@ -1002,7 +1077,7 @@ QString GEOMBase_Helper::getObjectName(GEOM::GEOM_Object_ptr object) const
 // Function : getNewObjectName
 // Purpose  : Redefine this method to return proper name for a new object
 //================================================================
-QString GEOMBase_Helper::getNewObjectName (int) const
+QString GEOMBase_Helper::getNewObjectName( int ) const
 {
   return QString();
 }
@@ -1031,15 +1106,15 @@ QString GEOMBase_Helper::getPrefix( GEOM::GEOM_Object_ptr theObj ) const
 
   switch ( aType )
   {
-    case GEOM::VERTEX   : return QObject::tr( "GEOM_VERTEX" );
-    case GEOM::EDGE     : return QObject::tr( "GEOM_EDGE" );
-    case GEOM::WIRE     : return QObject::tr( "GEOM_WIRE" );
-    case GEOM::FACE     : return QObject::tr( "GEOM_FACE" );
-    case GEOM::SHELL    : return QObject::tr( "GEOM_SHELL" );
-    case GEOM::SOLID    : return QObject::tr( "GEOM_SOLID" );
-    case GEOM::COMPSOLID: return QObject::tr( "GEOM_COMPOUNDSOLID" );
-    case GEOM::COMPOUND : return QObject::tr( "GEOM_COMPOUND" );
-    default : return "";
+  case GEOM::VERTEX   : return QObject::tr( "GEOM_VERTEX" );
+  case GEOM::EDGE     : return QObject::tr( "GEOM_EDGE" );
+  case GEOM::WIRE     : return QObject::tr( "GEOM_WIRE" );
+  case GEOM::FACE     : return QObject::tr( "GEOM_FACE" );
+  case GEOM::SHELL    : return QObject::tr( "GEOM_SHELL" );
+  case GEOM::SOLID    : return QObject::tr( "GEOM_SOLID" );
+  case GEOM::COMPSOLID: return QObject::tr( "GEOM_COMPOUNDSOLID" );
+  case GEOM::COMPOUND : return QObject::tr( "GEOM_COMPOUND" );
+  default : return "";
   }
 }
 
@@ -1095,7 +1170,7 @@ GEOM::GEOM_Object_ptr GEOMBase_Helper::findObjectInFather (GEOM::GEOM_Object_ptr
   SalomeApp_Study* appStudy = dynamic_cast<SalomeApp_Study*>( app->activeStudy() );
   _PTR(Study) aDStudy = appStudy->studyDS();
   QString IOR = GEOMBase::GetIORFromObject( theFather );
-  _PTR(SObject) SObj ( aDStudy->FindObjectIOR( IOR.toLatin1().constData() ) );
+  _PTR(SObject) SObj ( aDStudy->FindObjectIOR( IOR.toUtf8().constData() ) );
 
   bool inStudy = false;
   GEOM::GEOM_Object_var aReturnObject;
@@ -1110,7 +1185,7 @@ GEOM::GEOM_Object_ptr GEOMBase_Helper::findObjectInFather (GEOM::GEOM_Object_ptr
   }
   if (inStudy)
     return aReturnObject._retn();
-  
+
   return GEOM::GEOM_Object::_nil();
 }
 
@@ -1123,8 +1198,7 @@ GEOM::GEOM_Object_ptr GEOMBase_Helper::findObjectInFather( GEOM::GEOM_Object_ptr
                                                            int theIndex )
 {
   GEOM::GEOM_Object_var object;
-  bool found = false;
-  
+
   SalomeApp_Study* study = dynamic_cast<SalomeApp_Study*>( SUIT_Session::session()->activeApplication()->activeStudy() );
   if ( study ) {
     _PTR(Study) studyDS = study->studyDS();
@@ -1132,22 +1206,21 @@ GEOM::GEOM_Object_ptr GEOMBase_Helper::findObjectInFather( GEOM::GEOM_Object_ptr
     _PTR(SObject) sobject( studyDS->FindObjectIOR( IOR.toLatin1().constData() ) );
     if ( sobject ) {
       _PTR(ChildIterator) it( studyDS->NewChildIterator( sobject ) );
-      for ( ; it->More() && !found; it->Next() ) {
+      for ( ; it->More(); it->Next() ) {
         GEOM::GEOM_Object_var cobject = GEOM::GEOM_Object::_narrow( GeometryGUI::ClientSObjectToObject( it->Value() ) );
         if ( !CORBA::is_nil( cobject ) ) {
           GEOM::ListOfLong_var indices = cobject->GetSubShapeIndices();
           int length = indices->length();
-          for ( int i = 0; i < length && !found; i++ ) {
-            if ( indices[i] == theIndex ) {
-              object = cobject;
-              found = true;
-            }
+          // VSR 18/03/2014: we need only sub-shapes with single sub-shape index (to exclude groups, etc)
+          if ( length == 1 && indices[0] == theIndex ) {
+            object = cobject;
+            break;
           }
         }
       }
     }
   }
-  
+
   return object._retn();
 }
 
@@ -1157,7 +1230,18 @@ GEOM::GEOM_Object_ptr GEOMBase_Helper::findObjectInFather( GEOM::GEOM_Object_ptr
 //================================================================
 void GEOMBase_Helper::addSubshapesToStudy()
 {
-  //Impemented in Dialogs, called from Accept method
+  //Implemented in Dialogs, called from Accept method
+}
+
+//================================================================
+// Function : getSourceObjects
+// Purpose  : Virtual method to get source objects
+//================================================================
+QList<GEOM::GeomObjPtr> GEOMBase_Helper::getSourceObjects()
+{
+  //Implemented in Dialogs, called from Accept method
+  QList<GEOM::GeomObjPtr> res;
+  return res;
 }
 
 //================================================================
@@ -1167,7 +1251,7 @@ void GEOMBase_Helper::addSubshapesToStudy()
 // Returns valid object if only one object of the specified type is selected
 // (no matter global or local selection is activated). If \a type is TopAbs_SHAPE,
 // geometrical object of any valid type is expected.
-// 
+//
 // \param type type of the object to be obtained from selection
 // \return selected geometrical object or nil object if selection is not satisfactory
 //================================================================
@@ -1186,7 +1270,7 @@ GEOM::GeomObjPtr GEOMBase_Helper::getSelected( TopAbs_ShapeEnum type )
 // (no matter global or local selection is activated). The list of allowed
 // shape types is passed via \a types. If \a types includes TopAbs_SHAPE,
 // geometrical object of any valid type is expected.
-// 
+//
 // \param types list of allowed shape types for the objects to be obtained from selection
 // \return selected geometrical object or nil object if selection is not satisfactory
 //================================================================
@@ -1206,7 +1290,7 @@ GEOM::GeomObjPtr GEOMBase_Helper::getSelected( const QList<TopAbs_ShapeEnum>& ty
 //
 // The \a type parameter specifies allowed type of the object(s) being selected.
 // The \a count parameter specifies exact number of the objects to be retrieved from selection.
-// The \a strict parameter specifies policy being applied to the selection. 
+// The \a strict parameter specifies policy being applied to the selection.
 // If \a count < 0, then any number of the selected objects is valid (including 0).
 // In this case, if \a strict is \c true (default), all selected objects should satisfy
 // the specified \a type.
@@ -1214,7 +1298,7 @@ GEOM::GeomObjPtr GEOMBase_Helper::getSelected( const QList<TopAbs_ShapeEnum>& ty
 // In this case, if \a strict is \c true (default), function returns empty list if total number of selected
 // objects does not correspond to the \a count parameter. Otherwise (if \a strict is \c false),
 // function returns valid list of objects if at least \a count objects satisfy specified \a type.
-// 
+//
 // \param type type of the object(s) to be obtained from selection
 // \param count number of items to be retrieved from selection
 // \param strict selection policy
@@ -1245,7 +1329,7 @@ static bool typeInList( TopAbs_ShapeEnum type, const QList<TopAbs_ShapeEnum>& ty
 //
 // The \a types parameter specifies allowed types of the object(s) being selected.
 // The \a count parameter specifies exact number of the objects to be retrieved from selection.
-// The \a strict parameter specifies policy being applied to the selection. 
+// The \a strict parameter specifies policy being applied to the selection.
 // If \a count < 0, then any number of the selected objects is valid (including 0).
 // In this case, if \a strict is \c true (default), all selected objects should satisfy
 // the specified \a type.
@@ -1253,7 +1337,7 @@ static bool typeInList( TopAbs_ShapeEnum type, const QList<TopAbs_ShapeEnum>& ty
 // In this case, if \a strict is \c true (default), function returns empty list if total number of selected
 // objects does not correspond to the \a count parameter. Otherwise (if \a strict is \c false),
 // function returns valid list of objects if at least \a count objects satisfy specified \a type.
-// 
+//
 // \param types list of allowed shape types for the objects to be obtained from selection
 // \param count number of items to be retrieved from selection
 // \param strict selection policy
@@ -1304,7 +1388,7 @@ QList<GEOM::GeomObjPtr> GEOMBase_Helper::getSelected( const QList<TopAbs_ShapeEn
               GEOM::GeomObjPtr subShape = findObjectInFather( object.get(), idx );
               if ( !subShape ) {
                 // sub-shape is not yet published in the study
-                GEOM::ShapesOpPtr shapesOp = getGeomEngine()->GetIShapesOperations( getStudyId() );
+                GEOM::ShapesOpPtr shapesOp = getGeomEngine()->GetIShapesOperations();
                 subShape.take( shapesOp->GetSubShape( object.get(), idx ) ); // take ownership!
               }
               if ( typeInList( (TopAbs_ShapeEnum)(subShape->GetShapeType()), types ) ) {
@@ -1330,6 +1414,19 @@ QList<GEOM::GeomObjPtr> GEOMBase_Helper::getSelected( const QList<TopAbs_ShapeEn
   }
   return result;
 }
+//================================================================
+// Function : hideSourceObject
+// Purpose  :
+//================================================================
+void GEOMBase_Helper::hideSourceObjects( QList<GEOM::GeomObjPtr> theObject )
+{
+  SUIT_ResourceMgr* resMgr = SUIT_Session::session()->resourceMgr();
+  if ( resMgr->booleanValue( "Geometry", "hide_input_object", true) ) {
+    GEOM_Displayer* aDisplayer = getDisplayer();
+    for ( int i = 0; i < theObject.count(); i++ )
+      aDisplayer->Erase( theObject[i].get() );
+  }
+}
 
 //================================================================
 // Function : setIsApplyAndClose