1 // SMESH SMESH_I : idl implementation based on 'SMESH' unit's calsses
3 // Copyright (C) 2003 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
6 // This library is free software; you can redistribute it and/or
7 // modify it under the terms of the GNU Lesser General Public
8 // License as published by the Free Software Foundation; either
9 // version 2.1 of the License.
11 // This library is distributed in the hope that it will be useful,
12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 // Lesser General Public License for more details.
16 // You should have received a copy of the GNU Lesser General Public
17 // License along with this library; if not, write to the Free Software
18 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20 // See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org
24 // File : StdMeshers_StartEndLength_i.cxx
25 // Moved here from SMESH_LocalLength_i.cxx
26 // Author : Paul RASCLE, EDF
31 #include "StdMeshers_StartEndLength_i.hxx"
32 #include "SMESH_Gen_i.hxx"
33 #include "SMESH_Gen.hxx"
35 #include "Utils_CorbaException.hxx"
36 #include "utilities.h"
38 #include <TCollection_AsciiString.hxx>
40 //=============================================================================
42 * StdMeshers_StartEndLength_i::StdMeshers_StartEndLength_i
46 //=============================================================================
48 StdMeshers_StartEndLength_i::StdMeshers_StartEndLength_i( PortableServer::POA_ptr thePOA,
50 ::SMESH_Gen* theGenImpl )
51 : SALOME::GenericObj_i( thePOA ),
52 SMESH_Hypothesis_i( thePOA )
54 MESSAGE( "StdMeshers_StartEndLength_i::StdMeshers_StartEndLength_i" );
55 myBaseImpl = new ::StdMeshers_StartEndLength( theGenImpl->GetANewId(),
60 //=============================================================================
62 * StdMeshers_StartEndLength_i::~StdMeshers_StartEndLength_i
66 //=============================================================================
68 StdMeshers_StartEndLength_i::~StdMeshers_StartEndLength_i()
70 MESSAGE( "StdMeshers_StartEndLength_i::~StdMeshers_StartEndLength_i" );
73 //=============================================================================
75 * StdMeshers_StartEndLength_i::SetLength
79 //=============================================================================
81 void StdMeshers_StartEndLength_i::SetLength(CORBA::Double theLength,
82 CORBA::Boolean theIsStart )
83 throw ( SALOME::SALOME_Exception )
85 MESSAGE( "StdMeshers_StartEndLength_i::SetLength" );
88 this->GetImpl()->SetLength( theLength, theIsStart );
90 catch ( SALOME_Exception& S_ex ) {
91 THROW_SALOME_CORBA_EXCEPTION( S_ex.what(),
95 // Update Python script
96 SMESH_Gen_i* aSMESHGen = SMESH_Gen_i::GetSMESHGen();
97 SALOMEDS::SObject_var aSO = SMESH_Gen_i::ObjectToSObject(aSMESHGen->GetCurrentStudy(), _this());
98 TCollection_AsciiString aStr (aSO->GetID());
99 aStr += ".SetLength(";
100 aStr += TCollection_AsciiString((double)theLength);
102 aStr += TCollection_AsciiString((int)theIsStart);
105 aSMESHGen->AddToPythonScript(aSMESHGen->GetCurrentStudy()->StudyId(), aStr);
108 //=============================================================================
110 * StdMeshers_StartEndLength_i::GetLength
114 //=============================================================================
116 CORBA::Double StdMeshers_StartEndLength_i::GetLength( CORBA::Boolean theIsStart)
118 MESSAGE( "StdMeshers_StartEndLength_i::GetLength" );
119 ASSERT( myBaseImpl );
120 return this->GetImpl()->GetLength( theIsStart );
123 //=============================================================================
125 * StdMeshers_StartEndLength_i::GetImpl
129 //=============================================================================
131 ::StdMeshers_StartEndLength* StdMeshers_StartEndLength_i::GetImpl()
133 MESSAGE( "StdMeshers_StartEndLength_i::GetImpl" );
134 return ( ::StdMeshers_StartEndLength* )myBaseImpl;