diff --git a/ba/ba1800.cpp b/ba/ba1800.cpp
index ff1397753..150f648fd 100755
--- a/ba/ba1800.cpp
+++ b/ba/ba1800.cpp
@@ -775,7 +775,8 @@ void TWizard_mask::file_preview() const
     displines = cf.visible_rows();
   
   TString_array righe;
-  for (int l = 0; l < displines; l++)
+	int l;
+  for (l = 0; l < displines; l++)
   {
     righe.add(new TToken_string(MAXLINE), l);
     TToken_string& riga = righe.row(l);
@@ -857,10 +858,9 @@ void TWizard_mask::file_preview() const
   }
 
   cf.destroy_rows();
-  int l;
-  for (l = 0; l < righe.items(); l++)
+  for (int m = 0; m < righe.items(); m++)
   {
-    TToken_string& riga = righe.row(l);
+    TToken_string& riga = righe.row(m);
     cf.add_row(riga);
   }  
   cf.recalc_layout(reclen, righe.items());
diff --git a/ba/install.ini b/ba/install.ini
index b7e16ae0f..815a0521e 100755
--- a/ba/install.ini
+++ b/ba/install.ini
@@ -6,7 +6,7 @@ Descrizione=BASE
 [sy]
 Descrizione = Sistema
 Versione = 20070400
-Patch = 567
+Patch = 569
 
 
 [ba]
@@ -147,5 +147,5 @@ File(43) = sqlite.dll
 File(44) = wxmsw263.dll
 File(45) = xi.dll
 File(46) = xvaga.dll
-Patch = 567
+Patch = 569
 Versione = 20070400