Index: tol/btol/real_type/datgrav.cpp
===================================================================
--- tol/btol/real_type/datgrav.cpp	(revision 6ccef2aed736b5b95a310b5455101ec3eba9b563)
+++ tol/btol/real_type/datgrav.cpp	(revision 731ece8aec7d113c9b13ea59e827079c28539a03)
@@ -423,8 +423,8 @@
   I2("(Serie ser, Date d, Real newValue)",
      "(Serie ser, Date d, Real nuevoValor)"),
-  I2("Changes the value of an element of a time series and returns the old "
-      "value.",
-     "Cambia el valor de un elemento de una serie temporal y devuelve el "
-     "valor que tenía anteriormente."),
+  I2("Changes the value of an element of a finite time series and returns  "
+     "the oldvalue.",
+     "Cambia el valor de un elemento de una serie temporal finita y "
+     "devuelve el valor que tenía anteriormente."),
      BOperClassify::Conversion_);
   void BDatPutSerDat::CalcContens()
@@ -435,5 +435,14 @@
   BDat		  x   = Dat(Arg(3));
   contens_ = ser[dte];
-  ser.PutDat(dte,x);
+  if(ser.IsStochastic())
+  {
+    ser.PutDat(dte,x); 
+  }
+  else
+  {
+    Warning(BText("[PutSerDat]")+
+            I2("Cannot modify a non finite time series.",
+               "No se puede modificar una serie infinita."));
+  }
 }