diff --git a/ba/ba1100.cpp b/ba/ba1100.cpp
index 2d6adfc2d..160ce5ae4 100755
--- a/ba/ba1100.cpp
+++ b/ba/ba1100.cpp
@@ -104,7 +104,7 @@ void TManutenzione_app::do_print(TPrinter & p, TRec_sheet & r)
   const char* table[] =  {"", "Alfanumerico", "Intero", "Intero Lungo",
                           "Reale", "Data", "Intero", "Carattere",
                           "Booleano", "Intero Zerofilled", 
-                          "Intero Lungo Zerofilled"};
+                          "Intero Lungo Zerofilled","Memo"};
   TPrintrow row;
   TToken_string s;
   TParagraph_string d("", 25);
@@ -371,7 +371,7 @@ void TManutenzione_app::edit_riga (long riga_sel, TToken_string& riga)
   const TRecnotype oldeox = atol(_mask->get(FLD_EOX));
   const bool com = prefix().is_com() || !*prefix().name();
   const char* name = _mask->get(FLD_NOME);
-  const bool enable_extend = (com ? *name != '$' : *name == '$') && (riga_sel > 0);
+  const bool enable_extend = (com ? *name != '$' : *name == '$') && (riga_sel > 0) && (_mask->get_int(F_LEN) > 0);
 
   _mask->show(FLD_EXTEND, enable_extend);
   _mask->show(FLD_EOX, enable_extend);
@@ -495,6 +495,10 @@ void TManutenzione_app::delete_riga ()
   _browse->dir()->eod()--;
   _browse->set_items(_browse->dir()->eod());
   _browse->dir()->put(LF_DIR);
+  // Azzera il tracciato record del file eliminato.
+  TTrec r;
+  r.zero();
+  r.put(logicnum);
 
 }
 
@@ -572,7 +576,6 @@ void TManutenzione_app::update_dir()
               const TFilename fsi(ts.get());
               TFilename       fdi(fd); // Nuovo nome. (Con l'estensione)
               fdi.ext("");
-              fdi.rtrim(1);
               if (j > 1)  // Means that more indexes are in TToken_string ts
               { 
                 TString xx=fdi.name();
@@ -590,7 +593,7 @@ void TManutenzione_app::update_dir()
             {
               remove(fs);           // Rimuove i files sorgenti. Crea un eventuale .cgp
               fd.ext("cgp");
-              FILE *o;
+              FILE *o=NULL;
               if (ts.items() > 1)
               {
                 fs.ext("cgp");
@@ -610,7 +613,8 @@ void TManutenzione_app::update_dir()
                   fprintf(o,"%s\n",ff.name());  
                 }
               }
-              fclose(o);
+              if (o!=NULL)
+                fclose(o);
             }
             else                                  
             {
@@ -700,10 +704,10 @@ void TManutenzione_app::convert_dir()
     prefix().set(""); 
     r.get(i);                 
     d.get(i);
-    if (d.len() != 0)
+    prefix().set(pref); 
+    if (d.len() > 0)
     { 
       const int module = abs((int)d.flags());
-      prefix().set(pref); 
       TSystemisamfile f(i);
     
       f.update(r);         
@@ -721,7 +725,12 @@ void TManutenzione_app::convert_dir()
           f.build(10L);          
         }
       }
-    } 
+    }
+     else
+     {
+       r.zero();
+       r.put(i);
+     }
   }
   prefix().set(""); 
   const long level = prefix().filelevel();