diff --git a/dl/dl0800.cpp b/dl/dl0800.cpp
index 64446055e..974317cad 100755
--- a/dl/dl0800.cpp
+++ b/dl/dl0800.cpp
@@ -63,8 +63,19 @@ void TCat2dl_file::set_config(const char * listingr,const char * listven, const
 
 bool TCat2dl_file::pre_writerel(TRelation& rel,const TRecord_text& rec)
 {        
-  if (rel.curr().get("CODIVA").blank())
-    rel.curr().put("CODIVA", _codiva);
+  TRectype& curr = rel.curr();
+
+  if (curr.get("CODIVA").blank())
+    curr.put("CODIVA", _codiva);
+//se un campo data che finirebbe in un campo user di anamag.dbf e' pieno di 0, lo svuota
+  for (int i = 5; i <= 8; i++)
+  {
+    TString8 user;
+    user.format("USER%d", i);
+    const TString& val = curr.get(user);
+    if (real::is_null(val))
+      curr.zero(user);
+  }
 
   // 1) sistema i tipi di supporto e genere
   write_supporto(rec);