From 656071da949e065e9e27bcff5c4ee0b62271ce4a Mon Sep 17 00:00:00 2001
From: vsr <vsr@opencascade.com>
Date: Wed, 16 Sep 2009 11:01:05 +0000
Subject: [PATCH] 0020324: EDF 717 GEOM : Import IGES File Force SALOME to work
 in "M" (meters) units : same for STEP files

---
 src/STEPExport/STEPExport.cxx | 3 +++
 src/STEPImport/STEPImport.cxx | 3 +++
 2 files changed, 6 insertions(+)

diff --git a/src/STEPExport/STEPExport.cxx b/src/STEPExport/STEPExport.cxx
index ec50dc361..75fd79cfe 100644
--- a/src/STEPExport/STEPExport.cxx
+++ b/src/STEPExport/STEPExport.cxx
@@ -29,6 +29,7 @@
 #include <IFSelect_ReturnStatus.hxx>
 
 #include <STEPControl_Writer.hxx>
+#include <Interface_Static.hxx>
 
 #include <TCollection_AsciiString.hxx>
 #include <TopoDS_Shape.hxx>
@@ -69,6 +70,8 @@ STEPEXPORT_EXPORT
       IFSelect_ReturnStatus status ;
       //VRV: OCC 4.0 migration
       STEPControl_Writer aWriter;
+      //VSR: 16/09/09: Convert to METERS
+      Interface_Static::SetCVal("xstep.cascade.unit","M");
 //JFA: PAL6162      status = aWriter.Transfer( theShape, STEPControl_ManifoldSolidBrep );
       status = aWriter.Transfer( theShape, STEPControl_AsIs );
       //VRV: OCC 4.0 migration
diff --git a/src/STEPImport/STEPImport.cxx b/src/STEPImport/STEPImport.cxx
index 33e15f524..f021d3a79 100644
--- a/src/STEPImport/STEPImport.cxx
+++ b/src/STEPImport/STEPImport.cxx
@@ -36,6 +36,7 @@
 #include <TopoDS_Compound.hxx>
 #include <TopoDS_Shape.hxx>
 #include <TDF_Label.hxx>
+#include <Interface_Static.hxx>
 
 #include <Standard_Failure.hxx>
 #include <Standard_ErrorHandler.hxx> // CAREFUL ! position of this file is critic : see Lucien PIGNOLONI / OCC
@@ -76,6 +77,8 @@ STEPIMPORT_EXPORT
     TopoDS_Shape aResShape;
     //VRV: OCC 4.0 migration
     STEPControl_Reader aReader;
+    //VSR: 16/09/09: Convert to METERS
+    Interface_Static::SetCVal("xstep.cascade.unit","M");
     //VRV: OCC 4.0 migration
     TopoDS_Compound compound;
     BRep_Builder B;
-- 
2.39.2