diff --git a/idl/GEOM_Gen.idl b/idl/GEOM_Gen.idl
index 4c30ee600..fcbded3e8 100644
--- a/idl/GEOM_Gen.idl
+++ b/idl/GEOM_Gen.idl
@@ -474,6 +474,20 @@ module GEOM
     GEOM_Object TranslateVectorCopy (in GEOM_Object theObject,
 				     in GEOM_Object theVector);
 
+    /*!
+     *  Translate the given object along the given vector on given distance,
+     *  creating its copy before the translation.
+     *  \param theObject The object to be translated.
+     *  \param theVector Translation vector, giving a direction.
+     *  \param theDistance Translation distance, giving a distance.
+     *  \param theCope Translation copy, creating its copy if true.
+     *  \return New GEOM_Object, containing the translated object.
+     */
+    GEOM_Object TranslateVectorDistance (in GEOM_Object theObject,
+					 in GEOM_Object theVector,
+					 in double      theDistance,
+					 in boolean     theCopy);
+
     /*!
      *  Translate the given object along the given vector a given number times
      *  \param theObject The object to be translated.
diff --git a/idl/GEOM_Superv.idl b/idl/GEOM_Superv.idl
index 98d819daf..bb360ba27 100644
--- a/idl/GEOM_Superv.idl
+++ b/idl/GEOM_Superv.idl
@@ -249,6 +249,10 @@ module GEOM
 				 in GEOM_Object theVector) ;
     GEOM_Object TranslateVectorCopy (in GEOM_Object theObject,
 				     in GEOM_Object theVector) ;
+    GEOM_Object TranslateVectorDistance (in GEOM_Object theObject,
+					 in GEOM_Object theVector,
+					 in double      theDistance,
+					 in boolean     theCopy) ;
     GEOM_Object MultiTranslate1D (in GEOM_Object theObject,
 				  in GEOM_Object theVector,
 				  in double      theStep,