Aggiunta stampa descrizioni tabelle sotto windows

git-svn-id: svn://10.65.10.50/trunk@974 c028cbd2-c16b-5b4b-a496-9718f37d4682

ba/ba1100.cpp

@@ -20,6 +20,9 @@ struct direct
   unsigned short d_ino;
   char           d_name[DIRSIZ];
 };  
+#else
+#include <errno.h>
+#include <dos.h>
 #endif
 
 class TManutenzione_app : public TApplication
@@ -75,6 +78,20 @@ HIDDEN void build_filelist(const char *path, TArray & list)
     }
   }
   close(fd);  
+#else     
+  _find_t f;
+  
+  if (_dos_findfirst("recdesc/d???.des", _A_NORMAL, &f) == 0)
+  { 
+    bool one_to_add = TRUE;
+    while (one_to_add)
+    {                  
+      TString80 dname(f.name);
+      
+      list.add(dname.mid(1,3));
+      one_to_add = _dos_findnext(&f) != 0;
+    }
+  }
 #endif
 }
 
@@ -181,7 +198,10 @@ void TManutenzione_app::print()
   p.footerlen(4);
   if (_rec == NULL)
   { 
-    int items = _rec->dir()->items();
+    TDir d;
+    
+    d.get(LF_DIR); 
+    int items = d.eod();
 
     for (int i = 2 ; i <= items; i++)
     {