Salome HOME
PAL8238
[modules/smesh.git] / src / StdMeshers_I / StdMeshers_MaxElementArea_i.cxx
1 //  SMESH SMESH_I : idl implementation based on 'SMESH' unit's calsses
2 //
3 //  Copyright (C) 2003  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 //  CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS 
5 // 
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. 
10 // 
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. 
15 // 
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 
19 // 
20 //  See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org 
21 //
22 //
23 //
24 //  File   : StdMeshers_MaxElementArea_i.cxx
25 //           Moved here from SMESH_MaxElementArea_i.cxx
26 //  Author : Paul RASCLE, EDF
27 //  Module : SMESH
28 //  $Header$
29
30 using namespace std;
31 #include "StdMeshers_MaxElementArea_i.hxx"
32 #include "SMESH_Gen_i.hxx"
33 #include "SMESH_Gen.hxx"
34
35 #include "Utils_CorbaException.hxx"
36 #include "utilities.h"
37
38 #include <TCollection_AsciiString.hxx>
39
40 //=============================================================================
41 /*!
42  *  StdMeshers_MaxElementArea_i::StdMeshers_MaxElementArea_i
43  *
44  *  Constructor
45  */
46 //=============================================================================
47
48 StdMeshers_MaxElementArea_i::StdMeshers_MaxElementArea_i( PortableServer::POA_ptr thePOA,
49                                                 int                     theStudyId,
50                                                 ::SMESH_Gen*            theGenImpl )
51      : SALOME::GenericObj_i( thePOA ), 
52        SMESH_Hypothesis_i( thePOA ) 
53 {
54   MESSAGE( "StdMeshers_MaxElementArea_i::StdMeshers_MaxElementArea_i" );
55   myBaseImpl = new ::StdMeshers_MaxElementArea( theGenImpl->GetANewId(),
56                                            theStudyId,
57                                            theGenImpl );
58 }
59
60 //=============================================================================
61 /*!
62  *  StdMeshers_MaxElementArea_i::~StdMeshers_MaxElementArea_i
63  *
64  *  Destructor
65  */
66 //=============================================================================
67
68 StdMeshers_MaxElementArea_i::~StdMeshers_MaxElementArea_i()
69 {
70   MESSAGE( "StdMeshers_MaxElementArea_i::~StdMeshers_MaxElementArea_i" );
71 }
72
73 //=============================================================================
74 /*!
75  *  StdMeshers_MaxElementArea_i::SetMaxElementArea
76  *
77  *  Set maximum element area 
78  */
79 //=============================================================================
80
81 void StdMeshers_MaxElementArea_i::SetMaxElementArea( CORBA::Double theArea )
82      throw ( SALOME::SALOME_Exception )
83 {
84   MESSAGE( "StdMeshers_MaxElementArea_i::SetMaxElementArea" );
85   ASSERT( myBaseImpl );
86   try {
87     this->GetImpl()->SetMaxArea( theArea );
88   }
89   catch (SALOME_Exception& S_ex) {
90     THROW_SALOME_CORBA_EXCEPTION( S_ex.what(),
91                                   SALOME::BAD_PARAM );
92   }
93
94   // Update Python script
95   TCollection_AsciiString aStr, aStrArea ((double)theArea);
96   SMESH_Gen_i::AddObject(aStr, _this()) += ".SetMaxElementArea(";
97   aStr += aStrArea + ")";
98
99   SMESH_Gen_i::AddToCurrentPyScript(aStr);
100 }
101
102 //=============================================================================
103 /*!
104  *  StdMeshers_MaxElementArea_i::GetMaxElementArea
105  *
106  *  Get maximum element area 
107  */
108 //=============================================================================
109
110 CORBA::Double StdMeshers_MaxElementArea_i::GetMaxElementArea()
111 {
112   MESSAGE( "StdMeshers_MaxElementArea_i::GetMaxElementArea" );
113   ASSERT( myBaseImpl );
114   return this->GetImpl()->GetMaxArea();
115 }
116
117 //=============================================================================
118 /*!
119  *  StdMeshers_MaxElementArea_i::GetImpl
120  *
121  *  Get implementation
122  */
123 //=============================================================================
124
125 ::StdMeshers_MaxElementArea* StdMeshers_MaxElementArea_i::GetImpl()
126 {
127   MESSAGE( "StdMeshers_MaxElementArea_i::GetImpl" );
128   return ( ::StdMeshers_MaxElementArea* )myBaseImpl;
129 }