diff --git a/cg/cglib04.cpp b/cg/cglib04.cpp
index a105acbd1..1ceb6d5a4 100755
--- a/cg/cglib04.cpp
+++ b/cg/cglib04.cpp
@@ -1419,27 +1419,25 @@ int TTransfer_file::annoes_datacomp(const TString& record, TDate& datacomp)
 { 
   TString tmp;   
   int     segn;
-  int     ae = 0;
+  int     ae = 0, aep = 0;
   
   tmp          = record.sub(15,21);
   TString data = converti(tmp,FALSE);
   _datareg     = data;
   segn         = atoi(record.sub(21,22));  
   
-  ae = date2esc(_datareg);
+  ae = date2esc(_datareg, &aep);
+  
+  if (segn == 0)
+    datacomp = _datareg;
   
   if (ae != 0)
   {
-    if (segn == 0)
-      datacomp = _datareg;
-  
     if (segn == 1)
-    {                  
-      if (ae)
-        ae -= 1;
-      
-      datafine_esprec(ae,datacomp);
-    } 
+    {
+      datafine_esprec(aep,datacomp);
+      ae = aep;
+    }
   }
   else
   {