Index: tol/btol/date_type/dtegra.cpp
===================================================================
--- tol/btol/date_type/dtegra.cpp	(revision e63f3849f96f499986f318ad21507e277d0c3df7)
+++ tol/btol/date_type/dtegra.cpp	(revision f4e4fe8f96b4875306a7d9b1d34b5d9ad0a76236)
@@ -307,10 +307,13 @@
 //--------------------------------------------------------------------
 {
-    BDate		dte = Date(Arg(1));
+    BDate dte = Date(Arg(1));
     BUserTimeSet* tms = Tms(Arg(2));
-    BReal		num = 1;
-    
-    if(Arg(3)) { num = Real(Arg(3)); }
-    contens_ = tms->Next(dte,(BInt)num);
+    BDat num = 1;
+    
+    if(Arg(3)) { num = Dat(Arg(3)); }
+    if(!num.IsUnknown())
+    {
+      contens_ = tms->Next(dte,(BInt)num.Value());
+    }
 }
 
@@ -327,6 +330,6 @@
 //--------------------------------------------------------------------
 {
-    BUserTimeSerie* tsr = Tsr(Arg(1));
-    contens_ = tsr->FirstDate();
+  BUserTimeSerie* tsr = Tsr(Arg(1));
+  contens_ = tsr->FirstDate();
 }