From 3140e030b715bddbce39b25e7563034430a92f3f Mon Sep 17 00:00:00 2001
From: apo <apo@opencascade.com>
Date: Fri, 21 Jan 2005 09:46:35 +0000
Subject: [PATCH] [Bug PAL7252] DEVELOPMENT: Porting to MED2.2

---
 src/CalculatorComponent/CalculatorEngine.cxx | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/src/CalculatorComponent/CalculatorEngine.cxx b/src/CalculatorComponent/CalculatorEngine.cxx
index cfe2555..afcfa61 100644
--- a/src/CalculatorComponent/CalculatorEngine.cxx
+++ b/src/CalculatorComponent/CalculatorEngine.cxx
@@ -509,7 +509,7 @@ void CalculatorEngine::writeMEDfile(SALOME_MED::FIELDDOUBLE_ptr field, const cha
   
   MESSAGE("fichier :"<<filename);
 
-  MED_FR::med_idt _medIdt=MED_FR::MEDouvrir(const_cast <char *> (filename) ,(MED_FR::med_mode_acces) MED_ECRI);
+  MED_FR::med_idt _medIdt=MED_FR::MEDouvrir(const_cast <char *> (filename) ,(MED_FR::med_mode_acces) MED_LECTURE_ECRITURE);
   SCRUTE(_medIdt);
 
   if (_medIdt<0) return;
@@ -585,7 +585,7 @@ void CalculatorEngine::writeMEDfile(SALOME_MED::FIELDDOUBLE_ptr field, const cha
       // create field :
       err=MED_FR::MEDchampCr(_medIdt, 
 			     const_cast <char*> (field->getName()),
-			     MED_FR::MED_REEL64,
+			     MED_FR::MED_FLOAT64,
 			     const_cast <char*> ( component_name.c_str() ),
 			     const_cast <char*> ( component_unit.c_str() ),
 			     component_count);
@@ -640,10 +640,10 @@ void CalculatorEngine::writeMEDfile(SALOME_MED::FIELDDOUBLE_ptr field, const cha
 			      (unsigned char*)locvalue, 
 			      MED_FR::MED_FULL_INTERLACE,
 			      NumberOfElements,
-			      NumberOfGaussPoint,
-			      MED_ALL, 
-			      MED_NOPFL, 
-			      MED_FR::MED_REMP,  
+			      MED_NOGAUSS,
+			      MED_ALL,
+			      MED_NOPFL,
+			      MED_FR::MED_NO_PFLMOD,
 			      (MED_FR::med_entite_maillage)convertIdlEntToMedEnt(mySupport->getEntity()),
 			      (MED_FR::med_geometrie_element)(convertIdlEltToMedElt((*Types)[i])),
 			      field->getIterationNumber(),
-- 
2.39.2