Salome HOME
Updated for PAL14857.
[modules/geom.git] / src / GEOMToolsGUI / GEOMToolsGUI.cxx
index 594d197d69e696321639aa2a3d49aacc16a0337e..39022be14fe8b2d8cdf4d9877ce83a57955e67da 100644 (file)
@@ -1,23 +1,23 @@
 //  GEOM GEOMGUI : GUI for Geometry component
 //
 //  Copyright (C) 2003  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
-//  CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS 
-// 
-//  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. 
-// 
-//  This library is distributed in the hope that it will be useful, 
-//  but WITHOUT ANY WARRANTY; without even the implied warranty of 
-//  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU 
-//  Lesser General Public License for more details. 
-// 
-//  You should have received a copy of the GNU Lesser General Public 
-//  License along with this library; if not, write to the Free Software 
-//  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA 
-// 
-//  See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org 
+//  CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
+//
+//  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.
+//
+//  This library is distributed in the hope that it will be useful,
+//  but WITHOUT ANY WARRANTY; without even the implied warranty of
+//  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+//  Lesser General Public License for more details.
+//
+//  You should have received a copy of the GNU Lesser General Public
+//  License along with this library; if not, write to the Free Software
+//  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
+//
+// See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
 //
 //
 //
@@ -27,6 +27,7 @@
 //  $Header$
 
 #include "GEOMToolsGUI.h"
+
 #include "GeometryGUI.h"
 #include "GEOM_Actor.h"
 #include "GEOMBase.h"
 #include <SUIT_Tools.h>
 #include <SUIT_FileDlg.h>
 #include <SUIT_Desktop.h>
+#include <SUIT_ViewModel.h>
 
 #include <SalomeApp_Application.h>
 #include <SalomeApp_Study.h>
+#include <LightApp_SelectionMgr.h>
+#include <GEOMImpl_Types.hxx>
 
-//#include "OCCViewer_Viewer3d.h"
-//#include "VTKViewer_ViewWindow.h"
-//#include "VTKViewer_RenderWindowInteractor.h"
+#include <SALOME_ListIteratorOfListIO.hxx>
+#include <SALOME_Prs.h>
 
-#include "SALOME_ListIteratorOfListIO.hxx"
-//#include "SALOMEGUI_ImportOperation.h"
-//#include "SALOMEGUI_QtCatchCorbaException.hxx"
+#include "utilities.h"
 
+// QT Includes
 #include <qapplication.h>
 #include <qmap.h>
 
-#include "utilities.h"
+// OCCT Includes
+#include <TCollection_AsciiString.hxx>
 
 using namespace std;
 
 typedef QMap<QString, QString> FilterMap;
 
-#include "SALOMEDSClient.hxx"
-#include "SALOMEDS_SObject.hxx"
-#include "SALOMEDS_Study.hxx"
-
-
-
-
 //=======================================================================
 // function : getFileName
-// purpose  : Selection of a file name for Import/Export. Returns also 
+// purpose  : Selection of a file name for Import/Export. Returns also
 //            the selected file type code through <filter> argument.
 //=======================================================================
-static QString getFileName( QWidget*           parent, 
-                           const QString&     initial, 
-                           const FilterMap&   filterMap, 
+static QString getFileName( QWidget*           parent,
+                           const QString&     initial,
+                           const FilterMap&   filterMap,
                            const QString&     caption,
                            bool               open,
                            QString&           format )
@@ -85,7 +81,7 @@ static QString getFileName( QWidget*           parent,
   for ( FilterMap::const_iterator it = filterMap.begin(); it != filterMap.end(); ++it )
     filters.push_back( it.key() );
 
-  SUIT_FileDlg* fd = new SUIT_FileDlg( parent, open, true, true );    
+  SUIT_FileDlg* fd = new SUIT_FileDlg( parent, open, true, true );
   if ( !caption.isEmpty() )
     fd->setCaption( caption );
 
@@ -110,7 +106,7 @@ static QString getFileName( QWidget*           parent,
 // function : GEOMToolsGUI()
 // purpose  : Constructor
 //=======================================================================
-GEOMToolsGUI::GEOMToolsGUI( GeometryGUI* parent ) 
+GEOMToolsGUI::GEOMToolsGUI( GeometryGUI* parent )
 : GEOMGUI( parent )
 {
 }
@@ -127,7 +123,7 @@ GEOMToolsGUI::~GEOMToolsGUI()
 
 //=======================================================================
 // function : OnGUIEvent()
-// purpose  : 
+// purpose  :
 //=======================================================================
 bool GEOMToolsGUI::OnGUIEvent(int theCommandID, SUIT_Desktop* parent)
 {
@@ -159,6 +155,46 @@ bool GEOMToolsGUI::OnGUIEvent(int theCommandID, SUIT_Desktop* parent)
        Export();
        break;
       }
+    case 2171: // POPUP VIEWER - SELECT ONLY - VERTEX
+      {
+       OnSelectOnly( GEOM_POINT );
+       break;
+      }
+    case 2172: // POPUP VIEWER - SELECT ONLY - EDGE
+      {
+       OnSelectOnly( GEOM_EDGE );
+       break;
+      }
+    case 2173: // POPUP VIEWER - SELECT ONLY - WIRE
+      {
+       OnSelectOnly( GEOM_WIRE );
+       break;
+      }
+    case 2174: // POPUP VIEWER - SELECT ONLY - FACE
+      {
+       OnSelectOnly( GEOM_FACE );
+       break;
+      }
+    case 2175: // POPUP VIEWER - SELECT ONLY - SHELL
+      {
+       OnSelectOnly( GEOM_SHELL );
+       break;
+      }
+    case 2176: // POPUP VIEWER - SELECT ONLY - SOLID
+      {
+       OnSelectOnly( GEOM_SOLID );
+       break;
+      }
+    case 2177: // POPUP VIEWER - SELECT ONLY - COMPOUND
+      {
+       OnSelectOnly( GEOM_COMPOUND );
+       break;
+      }
+    case 2178: // POPUP VIEWER - SELECT ONLY - SELECT ALL
+      {
+       OnSelectOnly( GEOM_ALLOBJECTS );
+       break;
+      }    
     case 411: // SETTINGS - ADD IN STUDY
       {
        // SAN -- TO BE REMOVED !!!
@@ -194,11 +230,6 @@ bool GEOMToolsGUI::OnGUIEvent(int theCommandID, SUIT_Desktop* parent)
        OnCheckGeometry();
        break;
       }
-    case 5104: // LOAD SCRIPT
-      {
-       OnLoadScript();
-       break;
-      }
     case 8032: // COLOR - POPUP VIEWER
       {
        OnColor();
@@ -229,138 +260,127 @@ bool GEOMToolsGUI::OnGUIEvent(int theCommandID, SUIT_Desktop* parent)
 }
 
 
+
 //===============================================================================
 // function : OnEditDelete()
 // purpose  :
 //===============================================================================
 void GEOMToolsGUI::OnEditDelete()
 {
-/*
-   SALOME_Selection* Sel = SALOME_Selection::Selection(
-    QAD_Application::getDesktop()->getActiveStudy()->getSelection() );
-    
-  if ( Sel->IObjectCount() == 0 )
-    return;
-  
-  _PTR(Study) aStudy = QAD_Application::getDesktop()->getActiveStudy()->getStudyDocument();
-  
-  bool aLocked = (_PTR(AttributeStudyProperties)(aStudy->GetProperties()))->IsLocked();
-  if ( aLocked ) {
-    QAD_MessageBox::warn1 ( (QWidget*)QAD_Application::getDesktop(),
-                           QObject::tr("WRN_WARNING"), 
-                           QObject::tr("WRN_STUDY_LOCKED"),
-                           QObject::tr("BUT_OK") );
-    return;
-  }
-
-  // VSR 17/11/04: check if all objects selected belong to GEOM component --> start
-  QString aParentComponent = ((SALOMEGUI_Desktop*)QAD_Application::getDesktop())->getComponentFromSelection();
-  if ( aParentComponent != QAD_Application::getDesktop()->getActiveComponent() )  {
-    QAD_MessageBox::warn1 ( (QWidget*)QAD_Application::getDesktop(),
-                           QObject::tr("ERR_ERROR"), 
-                           QObject::tr("NON_GEOM_OBJECTS_SELECTED").arg(QAD_Application::getDesktop()->getComponentUserName( "GEOM" )),
-                           QObject::tr("BUT_OK") );
-    return;
-  }
-  // VSR 17/11/04: check if all objects selected belong to GEOM component <-- finish
-
-  if ( QAD_MessageBox::warn2( QAD_Application::getDesktop(),
-                              tr( "GEOM_WRN_WARNING" ),
-                              tr( "GEOM_REALLY_DELETE" ),
-                              tr( "GEOM_BUT_YES" ),
-                              tr( "GEOM_BUT_NO" ), 1, 0, 0 ) != 1 )
-    return;
-
-  int nbSf = QAD_Application::getDesktop()->getActiveStudy()->getStudyFramesCount();
-
-  Standard_Boolean found;
-  _PTR(GenericAttribute) anAttr;
-
-  SALOME_ListIteratorOfListIO It( Sel->StoredIObjects() );
-  
-  QAD_Operation* op = new SALOMEGUI_ImportOperation( QAD_Application::getDesktop()->getActiveStudy() );
-
-  op->start();
-  
-  Standard_Boolean    deleted = false;
-  
-  for ( ;It.More();It.Next() )
-  {
-    Handle( SALOME_InteractiveObject ) IObject = It.Value();
-    
-    if ( !IObject->hasEntry() )
-      continue;
-
-    _PTR(SObject) SO ( aStudy->FindObjectID( IObject->getEntry() ) );
-    _PTR(AttributeIOR) anIOR;
-
-    // Erase child graphical objects
-
-    _PTR(ChildIterator) it ( aStudy->NewChildIterator( SO ) );
-    for ( ; it->More();it->Next() )
-    {
-      _PTR(SObject) CSO ( it->Value() );
-
-      if ( CSO->FindAttribute( anAttr, "AttributeIOR" ) )
-      {
-        anIOR =  anAttr;
-
-        // Delete child( s ) shape in Client :
-
-        const TCollection_AsciiString ASCior( (char*)anIOR->Value().c_str() ) ;
-        GeometryGUI::GetGeomGUI()->GetShapeReader().RemoveShapeFromBuffer( ASCior );
-
-        for ( int i = 0; i < nbSf; i++ )
-        {
-          GEOM::GEOM_Object_var aGeomObj = GEOM::GEOM_Object::_narrow( dynamic_cast<SALOMEDS_SObject*>(CSO.get())->GetObject() );
-          if ( !aGeomObj->_is_nil() )
-            GEOM_Displayer().Erase( aGeomObj, true );
-        }
-      }
-    }
-
-    // Erase main graphical object
-
-    for ( int i = 0; i < nbSf; i++ )
-    {
-      QAD_StudyFrame* sf = QAD_Application::getDesktop()->getActiveStudy()->getStudyFrame( i );
-      GEOM_Displayer().Erase( IObject, true );
-    }
-
-    // Delete main shape in Client :
-
-    if ( SO->FindAttribute( anAttr, "AttributeIOR" ) )
-    {
-      anIOR = anAttr;
-      const TCollection_AsciiString ASCIor( (char*)anIOR->Value().c_str() ) ;
-      GeometryGUI::GetGeomGUI()->GetShapeReader().RemoveShapeFromBuffer( ASCIor );
-    }
-
-    // Erase objects in Study
-
-    _PTR(SObject) obj ( aStudy->FindObjectID( IObject->getEntry() ) );
-    if ( obj )
-    {
-      _PTR(StudyBuilder) aStudyBuilder (aStudy->NewBuilder());
-      aStudyBuilder->RemoveObject( obj );
-      
-      GEOM::GEOM_Object_var aGeomObj = GEOM::GEOM_Object::_narrow(dynamic_cast<SALOMEDS_SObject*>(obj.get())->GetObject());
-      if ( !aGeomObj->_is_nil() )
-        GeometryGUI::GetGeomGUI()->GetGeomGen()->RemoveObject( aGeomObj );
-      
-      deleted = true;
-    }
-  }   
-
-  if ( deleted )
-    op->finish();
-  else
-    op->abort();
-
-  // Clear any previous selection
-  Sel->ClearIObjects();
-  QAD_Application::getDesktop()->getActiveStudy()->updateObjBrowser();
-  */
+  SALOME_ListIO selected;
+  SalomeApp_Application* app =
+    dynamic_cast< SalomeApp_Application* >( SUIT_Session::session()->activeApplication() );
+  if ( app ) {
+    LightApp_SelectionMgr* aSelMgr = app->selectionMgr();
+    SalomeApp_Study* appStudy = dynamic_cast<SalomeApp_Study*>( app->activeStudy() );
+    if ( aSelMgr && appStudy ) {
+      aSelMgr->selectedObjects( selected, QString::null, false );
+      if ( !selected.IsEmpty() ) {
+       _PTR(Study) aStudy = appStudy->studyDS();
+
+       bool aLocked = (_PTR(AttributeStudyProperties)(aStudy->GetProperties()))->IsLocked();
+       if ( aLocked ) {
+         SUIT_MessageBox::warn1 ( app->desktop(),
+                                  QObject::tr("WRN_WARNING"),
+                                  QObject::tr("WRN_STUDY_LOCKED"),
+                                  QObject::tr("BUT_OK") );
+         return;
+       }
+
+       // VSR 17/11/04: check if all objects selected belong to GEOM component --> start
+       // modifications of ASV 01.06.05
+       QString parentComp = getParentComponent( aStudy, selected );
+       const char* geomIOR = app->orb()->object_to_string( GeometryGUI::GetGeomGen() );
+       QString geomComp = getParentComponent( aStudy->FindObjectIOR( geomIOR ) );
+
+       if ( parentComp != geomComp )  {
+         SUIT_MessageBox::warn1 ( app->desktop(),
+                                 QObject::tr("ERR_ERROR"),
+                                 QObject::tr("NON_GEOM_OBJECTS_SELECTED").arg( getGeometryGUI()->moduleName() ),
+                                 QObject::tr("BUT_OK") );
+         return;
+       }
+       // VSR 17/11/04: check if all objects selected belong to GEOM component <-- finish
+
+       if ( SUIT_MessageBox::warn2( app->desktop(),
+                                    QObject::tr( "GEOM_WRN_WARNING" ),
+                                    QObject::tr( "GEOM_REALLY_DELETE" ),
+                                    QObject::tr( "GEOM_BUT_YES" ),
+                                    QObject::tr( "GEOM_BUT_NO" ), 1, 0, 0 ) != 1 )
+         return;
+
+       //      QAD_Operation* op = new SALOMEGUI_ImportOperation(.....);
+       //      op->start();
+
+       // prepare list of SALOME_Views
+       QPtrList<SALOME_View> views;
+       SALOME_View* view;
+       // fill the list
+       ViewManagerList vmans = app->viewManagers();
+       SUIT_ViewManager* vman;
+       for ( vman = vmans.first(); vman; vman = vmans.next() ) {
+         SUIT_ViewModel* vmod = vman->getViewModel();
+         view = dynamic_cast<SALOME_View*> ( vmod ); // must work for OCC and VTK views
+         if ( view )
+           views.append( view );
+       }
+
+       _PTR(StudyBuilder) aStudyBuilder (aStudy->NewBuilder());
+       _PTR(GenericAttribute) anAttr;
+       GEOM_Displayer* disp = new GEOM_Displayer( appStudy );
+
+        _PTR(SComponent) aGeom ( aStudy->FindComponent("GEOM") );
+          if ( !aGeom )
+            return;    
+
+       // MAIN LOOP OF SELECTED OBJECTS
+       for ( SALOME_ListIteratorOfListIO It( selected ); It.More(); It.Next() ) {
+
+         Handle(SALOME_InteractiveObject) io = It.Value();
+         if ( !io->hasEntry() )
+           continue;
+
+         _PTR(SObject) obj ( aStudy->FindObjectID( io->getEntry() ) );
+
+         // disable removal of "Geometry" component object
+         if ( !strcmp( obj->GetIOR().c_str(), geomIOR ) )
+           continue;
+
+          //If the object has been used to create another one,then it can't be deleted 
+          _PTR(ChildIterator) it (aStudy->NewChildIterator(aGeom));
+          for ( it->InitEx( true ); it->More(); it->Next() ) {
+             _PTR(SObject) chobj (it->Value());
+            if(CheckSubObjectInUse(chobj, obj, aStudy)) return;
+            //check subobjects
+            for (_PTR(ChildIterator) it (aStudy->NewChildIterator(obj)); it->More(); it->Next()) {
+              _PTR(SObject) child (it->Value());
+              if(CheckSubObjectInUse( chobj, child, aStudy)) return;
+            }
+          }
+
+          RemoveObjectWithChildren(obj, aStudy, views, disp);
+
+         // Remove objects from Study
+         aStudyBuilder->RemoveObject( obj );
+
+         //deleted = true;
+       } // MAIN LOOP of selected
+
+       selected.Clear();
+       aSelMgr->setSelectedObjects( selected );
+       getGeometryGUI()->updateObjBrowser();
+      } // if ( selected not empty )
+    } // if ( selMgr && appStudy )
+
+    app->updateActions(); //SRN: To update a Save button in the toolbar
+
+  } // if ( app )
+
+
+  //  if ( deleted )
+  //    op->finish();
+  //  else
+  //    op->abort();
 }
 
 
@@ -369,8 +389,8 @@ void GEOMToolsGUI::OnEditDelete()
 // purpose  :
 //==============================================================================
 void GEOMToolsGUI::OnEditCopy()
-{  
-/* 
+{
+/*
  SALOME_Selection* Sel = SALOME_Selection::Selection(QAD_Application::getDesktop()->getActiveStudy()->getSelection() );
   GEOM::string_array_var listIOR = new GEOM::string_array;
 
@@ -381,20 +401,20 @@ void GEOMToolsGUI::OnEditCopy()
   Sel->ClearIObjects();
 
   SALOMEDS::Study_var aStudy = QAD_Application::getDesktop()->getActiveStudy()->getStudyDocument();
-  int aStudyID = aStudy->StudyId();    
+  int aStudyID = aStudy->StudyId();
 
   for (unsigned int ind = 0; ind < listIOR->length();ind++) {
     GEOM::GEOM_Object_var aShapeInit = myGeom->GetIORFromString(listIOR[ind]);
     try {
       GEOM::GEOM_IInsertOperations_var IOp =  myGeom->GetIInsertOperations(aStudyID);
-      GEOM::GEOM_Object_var result = IOp->MakeCopy(aShapeInit) ;
+      GEOM::GEOM_Object_var result = IOp->MakeCopy(aShapeInit);
       myGeomBase->Display(result);
     }
     catch  (const SALOME::SALOME_Exception& S_ex) {
       QtCatchCorbaException(S_ex);
     }
   }
-  
+
   QAD_Application::getDesktop()->putInfo(tr("GEOM_PRP_READY"));
 */
 }
@@ -406,9 +426,10 @@ void GEOMToolsGUI::OnEditCopy()
 //=====================================================================================
 bool GEOMToolsGUI::Import()
 {
-  SUIT_Application* app = getGeometryGUI()->getApp();
+  SalomeApp_Application* app = dynamic_cast< SalomeApp_Application* >( getGeometryGUI()->getApp() );
+  //SUIT_Application* app = getGeometryGUI()->getApp();
   if (! app) return false;
+
   SalomeApp_Study* stud = dynamic_cast<SalomeApp_Study*> ( app->activeStudy() );
   if ( !stud ) {
     cout << "FAILED to cast active study to SalomeApp_Study" << endl;
@@ -419,7 +440,7 @@ bool GEOMToolsGUI::Import()
   bool aLocked = (_PTR(AttributeStudyProperties)(aStudy->GetProperties()))->IsLocked();
   if ( aLocked ) {
     SUIT_MessageBox::warn1 ( app->desktop(),
-                           QObject::tr("WRN_WARNING"), 
+                           QObject::tr("WRN_WARNING"),
                            QObject::tr("WRN_STUDY_LOCKED"),
                            QObject::tr("BUT_OK") );
     return false;
@@ -427,9 +448,9 @@ bool GEOMToolsGUI::Import()
 
   GEOM::GEOM_Gen_var eng = GeometryGUI::GetGeomGen();
   if ( CORBA::is_nil( eng ) ) {
-    SUIT_MessageBox::error1( app->desktop(), 
+    SUIT_MessageBox::error1( app->desktop(),
                            QObject::tr("WRN_WARNING"),
-                           QObject::tr( "GEOM Engine is not started" ), 
+                           QObject::tr( "GEOM Engine is not started" ),
                            QObject::tr("BUT_OK") );
       return false;
     }
@@ -437,7 +458,7 @@ bool GEOMToolsGUI::Import()
   GEOM::GEOM_IInsertOperations_var aInsOp = eng->GetIInsertOperations( aStudy->StudyId() );
   if ( aInsOp->_is_nil() )
     return false;
-  
+
   GEOM::GEOM_Object_var anObj;
 
   // Obtain a list of available import formats
@@ -445,43 +466,62 @@ bool GEOMToolsGUI::Import()
   GEOM::string_array_var aFormats, aPatterns;
   aInsOp->ImportTranslators( aFormats, aPatterns );
 
-  for ( int i = 0, n = aFormats->length(); i < n; i++ ) 
+  for ( int i = 0, n = aFormats->length(); i < n; i++ )
     aMap.insert( (char*)aPatterns[i], (char*)aFormats[i] );
 
   QString fileType;
 
-  QString file = getFileName(app->desktop(), "", aMap, tr("GEOM_MEN_IMPORT"), true, fileType );
-  if( file.isEmpty() || fileType.isEmpty() ) 
+  QString fileName = getFileName(app->desktop(), "", aMap,
+                                 tr("GEOM_MEN_IMPORT"), true, fileType);
+
+  if (fileType.isEmpty() )
+    {
+      // Trying to detect file type
+      QFileInfo aFileInfo( fileName );
+      QString aPossibleType = (aFileInfo.extension(false)).upper() ;
+
+      if ( (aMap.values()).contains(aPossibleType) )
+       fileType = aPossibleType;
+    }
+
+  if (fileName.isEmpty() || fileType.isEmpty())
     return false;
-  
-  GEOM_Operation* anOp = new GEOM_Operation( app, aInsOp.in() );
+
+  GEOM_Operation* anOp = new GEOM_Operation (app, aInsOp.in());
   try {
     SUIT_OverrideCursor wc;
 
-    app->putInfo( tr("GEOM_PRP_LOADING").arg(SUIT_Tools::file( file, /*withExten=*/true )) );
+    app->putInfo(tr("GEOM_PRP_LOADING").arg(SUIT_Tools::file(fileName, /*withExten=*/true)));
 
     anOp->start();
 
-    anObj = aInsOp->Import( file.latin1(), fileType.latin1() );  
+    CORBA::String_var fileN = fileName.latin1();
+    CORBA::String_var fileT = fileType.latin1();
+    anObj = aInsOp->Import(fileN, fileT);
 
     if ( !anObj->_is_nil() && aInsOp->IsDone() ) {
-      anObj->SetName( GEOMBase::GetDefaultName( QObject::tr( "GEOM_IMPORT" ) ).latin1() );
-      QString aPublishObjName = GEOMBase::GetDefaultName( SUIT_Tools::file( file, /*withExten=*/true ));
-      GeometryGUI::GetGeomGen()->PublishInStudy(dynamic_cast<SALOMEDS_Study*>(aStudy.get())->GetStudy(), 
-                                               SALOMEDS::SObject::_nil(), 
-                                               anObj, 
-                                               aPublishObjName );
+      QString aPublishObjName =
+        GEOMBase::GetDefaultName(SUIT_Tools::file(fileName, /*withExten=*/true));
+
+      SALOMEDS::Study_var aDSStudy = GeometryGUI::ClientStudyToStudy(aStudy);
+      GeometryGUI::GetGeomGen()->PublishInStudy(aDSStudy,
+                                               SALOMEDS::SObject::_nil(),
+                                               anObj,
+                                               aPublishObjName);
 
       GEOM_Displayer( stud ).Display( anObj.in() );
 
-      anOp->commit();      
+      // update data model and object browser
+      getGeometryGUI()->updateObjBrowser( true );
+
+      anOp->commit();
     }
     else {
       anOp->abort();
       wc.suspend();
-      SUIT_MessageBox::error1( app->desktop(), 
+      SUIT_MessageBox::error1( app->desktop(),
                              QObject::tr( "GEOM_ERROR" ),
-                             QObject::tr("GEOM_PRP_ABORT") + "\n" + QString( aInsOp->GetErrorCode() ), 
+                             QObject::tr("GEOM_PRP_ABORT") + "\n" + QString( aInsOp->GetErrorCode() ),
                              QObject::tr("BUT_OK") );
     }
   }
@@ -491,6 +531,8 @@ bool GEOMToolsGUI::Import()
     return false;
   }
 
+  app->updateActions(); //SRN: To update a Save button in the toolbar
+
   return true;
 }
 
@@ -501,9 +543,26 @@ bool GEOMToolsGUI::Import()
 //=====================================================================================
 bool GEOMToolsGUI::Export()
 {
-/*
-  SALOMEDS::Study_var aStudy = QAD_Application::getDesktop()->getActiveStudy()->getStudyDocument();
-  GEOM::GEOM_IInsertOperations_var aInsOp = GeometryGUI::GetGeomGUI()->GetGeomGen()->GetIInsertOperations( aStudy->StudyId() );
+  SalomeApp_Application* app = getGeometryGUI()->getApp();
+  if (!app) return false;
+
+  SalomeApp_Study* stud = dynamic_cast<SalomeApp_Study*> ( app->activeStudy() );
+  if ( !stud ) {
+    cout << "FAILED to cast active study to SalomeApp_Study" << endl;
+    return false;
+  }
+  _PTR(Study) aStudy = stud->studyDS();
+
+  GEOM::GEOM_Gen_var eng = GeometryGUI::GetGeomGen();
+  if ( CORBA::is_nil( eng ) ) {
+    SUIT_MessageBox::error1( app->desktop(),
+                            QObject::tr("WRN_WARNING"),
+                            QObject::tr( "GEOM Engine is not started" ),
+                            QObject::tr("BUT_OK") );
+    return false;
+  }
+
+  GEOM::GEOM_IInsertOperations_var aInsOp = eng->GetIInsertOperations( aStudy->StudyId() );
   if ( aInsOp->_is_nil() )
     return false;
 
@@ -511,12 +570,18 @@ bool GEOMToolsGUI::Export()
   FilterMap aMap;
   GEOM::string_array_var aFormats, aPatterns;
   aInsOp->ExportTranslators( aFormats, aPatterns );
-  for ( int i = 0, n = aFormats->length(); i < n; i++ ) 
+  for ( int i = 0, n = aFormats->length(); i < n; i++ )
     aMap.insert( (char*)aPatterns[i], (char*)aFormats[i] );
-  
-  SALOME_Selection* Sel = SALOME_Selection::Selection(QAD_Application::getDesktop()->getActiveStudy()->getSelection());
-  SALOME_ListIteratorOfListIO It( Sel->StoredIObjects() );
 
+  // Get selected objects
+  LightApp_SelectionMgr* sm = app->selectionMgr();
+  if ( !sm )
+    return false;
+
+  SALOME_ListIO selectedObjects;
+  sm->selectedObjects( selectedObjects );
+
+  SALOME_ListIteratorOfListIO It( selectedObjects );
   for(;It.More();It.Next()) {
     Handle(SALOME_InteractiveObject) IObject = It.Value();
     Standard_Boolean found;
@@ -526,44 +591,181 @@ bool GEOMToolsGUI::Export()
       continue;
 
     QString fileType;
-    QString file = getFileName(QAD_Application::getDesktop(), 
-                              QString( IObject->getName() ),
-                              aMap,
-                              tr("GEOM_MEN_EXPORT"),
-                              false,
-                              fileType);
+    QString file = getFileName(app->desktop(), QString( IObject->getName() ), aMap,
+                              tr("GEOM_MEN_EXPORT"), false, fileType);
 
     // User has pressed "Cancel" --> stop the operation
     if ( file.isEmpty() || fileType.isEmpty() )
       return false;
 
-    //      Standard_Boolean result = BRepTools::Write(Shape->Shape(), strdup(file.latin1()) );
+    GEOM_Operation* anOp = new GEOM_Operation( app, aInsOp.in() );
     try {
-      QAD_WaitCursor wc;
+      SUIT_OverrideCursor wc;
+
+      app->putInfo( tr("GEOM_PRP_EXPORT").arg(SUIT_Tools::file( file, /*withExten=*/true )) );
+
+      anOp->start();
+
+
       aInsOp->Export( anObj, file, fileType.latin1() );
-      if ( !aInsOp->IsDone() ) {
-       wc.stop();
-       QAD_MessageBox::error1( QAD_Application::getDesktop(), 
-                              QObject::tr( "GEOM_ERROR" ),
-                              QObject::tr("GEOM_PRP_ABORT") + "\n" + QString( aInsOp->GetErrorCode() ), 
-                              QObject::tr("BUT_OK") );
-       return false;
-      }
-    }  
+
+      if ( aInsOp->IsDone() )
+       anOp->commit();
+      else
+       {
+         anOp->abort();
+         wc.suspend();
+         SUIT_MessageBox::error1( app->desktop(),
+                                  QObject::tr( "GEOM_ERROR" ),
+                                  QObject::tr("GEOM_PRP_ABORT") + "\n" + QString( aInsOp->GetErrorCode() ),
+                                  QObject::tr("BUT_OK") );
+         return false;
+       }
+    }
     catch (const SALOME::SALOME_Exception& S_ex) {
-      QtCatchCorbaException(S_ex);
+      //QtCatchCorbaException(S_ex);
+      anOp->abort();
+      return false;
     }
   }
-*/
-  return true; 
+
+  return true;
 }
 
 
+QString GEOMToolsGUI::getParentComponent( _PTR( Study ) study, const SALOME_ListIO& iobjs )
+{
+  QString parentComp;
+
+  for ( SALOME_ListIteratorOfListIO it( iobjs ); it.More(); it.Next() ) {
+
+    Handle(SALOME_InteractiveObject) io = it.Value();
+    if ( !io->hasEntry() )
+      continue;
+
+    QString compName = getParentComponent( study->FindObjectID( io->getEntry() ) );
+
+    if ( parentComp.isNull() )
+      parentComp = compName;
+    else if ( parentComp.compare( compName) != 0 ) { // objects belonging to different components are selected
+      parentComp = QString::null;
+      break;
+    }
+  }
+
+  return parentComp;
+}
+
+QString GEOMToolsGUI::getParentComponent( _PTR( SObject ) obj )
+{
+  if ( obj ) {
+    _PTR(SComponent) comp = obj->GetFatherComponent();
+    if ( comp ) {
+      _PTR(GenericAttribute) anAttr;
+      if ( comp->FindAttribute( anAttr, "AttributeName") ) {
+       _PTR(AttributeName) aName( anAttr );
+       return QString( aName->Value().c_str() );
+      }
+    }
+  }
+  return QString();
+}
+
+//=====================================================================================
+// function : RemoveObjectWithChildren
+// purpose  : to be used by OnEditDelete() method
+//=====================================================================================
+void GEOMToolsGUI::RemoveObjectWithChildren(_PTR(SObject) obj,
+                                            _PTR(Study) aStudy,
+                                            QPtrList<SALOME_View> views,
+                                            GEOM_Displayer* disp)
+{
+  // iterate through all children of obj
+  for (_PTR(ChildIterator) it (aStudy->NewChildIterator(obj)); it->More(); it->Next()) {
+    _PTR(SObject) child (it->Value());
+    RemoveObjectWithChildren(child, aStudy, views, disp);
+  }
+
+  // erase object and remove it from engine
+  _PTR(GenericAttribute) anAttr;
+  if (obj->FindAttribute(anAttr, "AttributeIOR")) {
+    _PTR(AttributeIOR) anIOR (anAttr);
+
+    // Delete shape in Client
+    const TCollection_AsciiString ASCIor ((char*)anIOR->Value().c_str());
+    getGeometryGUI()->GetShapeReader().RemoveShapeFromBuffer(ASCIor);
+
+    CORBA::Object_var corbaObj = GeometryGUI::ClientSObjectToObject(obj);
+    GEOM::GEOM_Object_var geomObj = GEOM::GEOM_Object::_narrow( corbaObj );
+    if (!CORBA::is_nil(geomObj)) {
+      // Erase graphical object
+      SALOME_View* view = views.first();
+      for (; view; view = views.next()) {
+        disp->Erase(geomObj, true, view);
+      }
+
+      // Remove object from Engine
+      GeometryGUI::GetGeomGen()->RemoveObject( geomObj );
+    }
+  }
+}
+
+//=====================================================================================
+// function : CheckSubObjectInUse
+// purpose  : to be used by OnEditDelete() method
+//=====================================================================================
+bool GEOMToolsGUI::CheckSubObjectInUse(_PTR(SObject) checkobj,
+                                      _PTR(SObject) remobj,
+                                       _PTR(Study) aStudy)
+{
+  CORBA::Object_var corbaObj = GeometryGUI::ClientSObjectToObject(checkobj);
+  GEOM::GEOM_Object_var geomObj = GEOM::GEOM_Object::_narrow( corbaObj );
+  if( CORBA::is_nil(geomObj) ) 
+    return false;
+
+  GEOM::ListOfGO_var list = geomObj->GetDependency();
+  if( list->length() > 1 )
+    for(int i = 0; i < list->length(); i++ ){
+      CORBA::Object_var corbaObj_rem = GeometryGUI::ClientSObjectToObject(remobj);
+      GEOM::GEOM_Object_var geomObj_rem = GEOM::GEOM_Object::_narrow( corbaObj_rem );
+      if( list[i]->_is_equivalent( geomObj_rem ) ){
+       SalomeApp_Application* app =
+         dynamic_cast< SalomeApp_Application* >( SUIT_Session::session()->activeApplication() );
+
+       SUIT_MessageBox::warn1 ( app->desktop(),
+                                QObject::tr("WRN_WARNING"),
+                                QObject::tr("DEP_OBJECT"),
+                                QObject::tr("BUT_OK") );
+       return true;
+      }
+    }
+
+  return false;
+}
+
+//=================================================================================
+// function : deactivate()
+// purpose  : Called when GEOM component is deactivated
+//=================================================================================
+void GEOMToolsGUI::deactivate()
+{
+  SalomeApp_Application* app = dynamic_cast< SalomeApp_Application* >( SUIT_Session::session()->activeApplication() );
+  if ( app ) {
+    SalomeApp_Study* appStudy = dynamic_cast<SalomeApp_Study*>( app->activeStudy() );
+    GEOM_Displayer aDisp (appStudy);
+    aDisp.GlobalSelection();
+    getGeometryGUI()->setLocalSelectionMode(GEOM_ALLOBJECTS);
+  }
+}
+
 //=====================================================================================
 // EXPORTED METHODS
 //=====================================================================================
 extern "C"
 {
+#ifdef WNT
+       __declspec( dllexport )
+#endif
   GEOMGUI* GetLibGUI( GeometryGUI* parent )
   {
     return new GEOMToolsGUI( parent );