MOdifiche tanto per renderlo compilabile

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

ba/ba3.h

@@ -1,17 +1,6 @@
 #ifndef __BA3_H
 #define __BA3_H
 
-#ifdef MAIN
-#define extern
-#endif
-
-#ifdef MAIN
-#undef extern
-#endif
-
-const MAXSTR = 128;
-static char __tmp [MAXSTR];
-
 int ba3100(int argc, char* argv[]);
 int ba3200(int argc, char* argv[]);
 int ba3300(int argc, char* argv[]);
@@ -19,5 +8,6 @@ int ba3400(int argc, char* argv[]);
 int ba3500(int argc, char* argv[]);
 int ba3600(int argc, char* argv[]);
 int ba3700(int argc, char* argv[]);
+int ba3800(int argc, char* argv[]);
 
 #endif // __BA3_H

ba/ba3600.cpp

@@ -1,13 +1,9 @@
 #include <mask.h>
 #include <printapp.h>
-#include <scanner.h>
 #include <relation.h>
 #include <tabutil.h>
 #include <utility.h>
-#include <prefix.h>
-#include <lffiles.h>        
 #include <sort.h>
-#include <assoc.h>
 #include <progind.h>
 
 #include <nditte.h>
@@ -17,8 +13,7 @@
 
 #define ALIAS 50
 
-extern char __tmp [MAXSTR];
+static TString256 tmp;
-static TFixed_string tmp(__tmp, MAXSTR);
 
 const int       TABLBU = (int)TTable::name2log("%LBU");
 const int       TABINL = (int)TTable::name2log("%INL");
@@ -113,9 +108,9 @@ void BA3600_application::crea_sort()
   init_sort();
   
   _tab_lbu->zero();
-//  TString dep (format ("%4d%-3s", _anno, (const char*) _cod_lib));
+  //  TString dep (format ("%4d%-3s", _anno, (const char*) _cod_lib));
-//  sprintf(__tmp, "%4d", _anno);
+  //  sprintf(__tmp, "%4d", _anno);
-//  strcat (__tmp, _cod_lib);
+  //  strcat (__tmp, _cod_lib);
   dep =  format ("%4d", _anno);
   dep << format ("%-3s", (const char*) _cod_lib);
   _tab_lbu->put("CODTAB", (const char*) dep);
@@ -150,9 +145,9 @@ void BA3600_application::crea_sort()
         stamp_bollato = _tab_inl->get_bool("B0");
         pagine_ann    = _tab_inl->get_bool("B1");
         
-//Se tipo_stampa = 1 (stampa di prova) stampo ugualmente. Se tipo_stampa = 2
+        //Se tipo_stampa = 1 (stampa di prova) stampo ugualmente. Se tipo_stampa = 2
-// (stampa su bollato), stampo solamente se il flag di stampa su bollato e'
+        // (stampa su bollato), stampo solamente se il flag di stampa su bollato e'
-// FALSE.
+        // FALSE.
         
         if ((_tipo_stampa == 1) || ((_tipo_stampa == 2) && (!stamp_bollato)))
         {
@@ -172,10 +167,10 @@ void BA3600_application::crea_sort()
           _lib->pag_ann   = pagine_ann;
           _sort->sort ((const char*) _lib);
 
-//Se si tratta di una stampa su bollato e il flag "stampa su bollato" indica
+          //Se si tratta di una stampa su bollato e il flag "stampa su bollato" indica
-//che non e' mai stato stampato su bollato (flag = FALSE), allora devo stampare
+          //che non e' mai stato stampato su bollato (flag = FALSE), allora devo stampare
-//il record della tabella %INL, e contemporaneamente aggiornare il flag, per
+          //il record della tabella %INL, e contemporaneamente aggiornare il flag, per
-//evitare di ristampare successivamente su bollato
+          //evitare di ristampare successivamente su bollato
 
           if (_tipo_stampa == 2)
           {
@@ -188,8 +183,8 @@ void BA3600_application::crea_sort()
     _sort->endsort();
   }
 
-// Se si tratta di una stampa su libro bollato, aggiorno sulla tabella %LBU    // l' ultimo mese stampato, l' ultima pagina stampata e il flag che indica se
+  // Se si tratta di una stampa su libro bollato, aggiorno sulla tabella %LBU    // l' ultimo mese stampato, l' ultima pagina stampata e il flag che indica se
-// quel record e' stato stampato su bollato      
+  // quel record e' stato stampato su bollato      
   
   if ((_tipo_stampa == 2) && (stampato)) // stampato e' il flag che mi dice
   {                                      //se almeno un record, nella stampa
@@ -238,8 +233,8 @@ bool BA3600_application::set_print(int)
 }
 
 /*********
-bool BA3600_application::preprocess_page(int file, int counter)
+  bool BA3600_application::preprocess_page(int file, int counter)
-{
+  {
   if (_tipo_stampa == 1)
   {
   if (preprocess_prova(counter))
@@ -256,8 +251,8 @@ bool BA3600_application::preprocess_page(int file, int counter)
   }
 
   return TRUE;
-}
+  }
-***********/
+  ***********/
 
 bool BA3600_application::preprocess_page(int file, int counter)
 {
@@ -284,10 +279,10 @@ bool BA3600_application::preprocess_page(int file, int counter)
     _num_riga      = lib->num_riga;
     _stamp_bollato = lib->stamp_bol;
     _pag_ann       = lib->pag_ann;
-//    _stamp_bollato_str = _stamp_bollato.string();
+    //    _stamp_bollato_str = _stamp_bollato.string();
 
-//Il controllo di pagine fuori sequenza viene sempre effettuato, tranne che per
+    //Il controllo di pagine fuori sequenza viene sempre effettuato, tranne che per
-//il primo record.
+    //il primo record.
 
     if (counter)
     {
@@ -309,11 +304,11 @@ bool BA3600_application::preprocess_page(int file, int counter)
 }
 
 /*******
-bool BA3600_application::preprocess_bollato()
+  bool BA3600_application::preprocess_bollato()
-{
+  {
 
-}
+  }
-******/
+  ******/
 
 void BA3600_application::set_page(int file, int counter)
 { 
@@ -397,12 +392,12 @@ const char* BA3600_application::ragsoc_ditta(long codditta)
   if (nditte.bad())
     nditte.zero();
   tmp = nditte.get(NDT_RAGSOC);
-  return (__tmp);
+  return tmp;
 }
 
 const char* BA3600_application::descrizione_codreg(TString& codreg)
 {
-  TString dep;
+  TString16 dep;
 
   _tab_reg->zero();
   dep =  format("%4d", _anno);
@@ -412,7 +407,7 @@ const char* BA3600_application::descrizione_codreg(TString& codreg)
   if (_tab_reg->bad())
     _tab_reg->zero();
   tmp = _tab_reg->get("S0");
-  return (__tmp);
+  return tmp;
 }
 
 void BA3600_application::preprocess_header()

ba/prassi.mnu

@@ -73,7 +73,7 @@
 6|Codici Attivita'|ba3 -1 %ais
 6|Libri sociali|ba3 -1 %itl
 6|Banche|ba3 -1 %ban
-6|IV direttiva CEE|ba3 -1 %ivd
+6|IV direttiva CEE|ba3 -7
 6|Valute|ba3 -1 %val
 6|Lingue|ba3 -1 %lng
 7|Tabelle ditta|2