From d0b4aa6e5551d8785992602d5aa0aa4745a62739 Mon Sep 17 00:00:00 2001
From: alex <alex@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Wed, 27 May 2009 13:46:20 +0000
Subject: [PATCH] Patch level         : 10.0 318 Files correlati     : ba0.exe
 Ricompilazione Demo : [ ] Commento            :

Sistemata creazione ditte


git-svn-id: svn://10.65.10.50/trunk@18948 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 include/prefix.cpp | 25 +++++++------------------
 1 file changed, 7 insertions(+), 18 deletions(-)

diff --git a/include/prefix.cpp b/include/prefix.cpp
index 85e5aa713..ed43ad0e4 100755
--- a/include/prefix.cpp
+++ b/include/prefix.cpp
@@ -36,7 +36,7 @@ TPrefix& prefix_init()
 
 // @func Determina se il prefix e' stato inizializzato
 //
-// @rdesc Ritorna TRUE o FALSE
+// @rdesc Ritorna true o false
 bool prefix_valid()
 {
   return _prefhndl != NULL;
@@ -497,7 +497,7 @@ const TFilename& TFile_info::load_filedes()
 TFile_info::TFile_info(int logicnum, TFilename& name)
 : _ref_count(0), _num(logicnum), _handle(-1),
   _last_access(0), 
-  _last_change(0), _locked(FALSE), _exclusive(FALSE), _last_key(-1)
+  _last_change(0), _locked(false), _exclusive(false), _last_key(-1)
 {
   if (logicnum < LF_EXTERNAL)
   {
@@ -998,7 +998,7 @@ void TPrefix::reopen() const
 // @mfunc Setta la ditta corrente                 
 void TPrefix::set(
   const char* name, // @parm Nome del direttorio dati da attivare (default NULL)
-  bool force,       // @parm Permette di settarla anche se non esiste (default FALSE)
+  bool force,       // @parm Permette di settarla anche se non esiste (default false)
   TFilelock mode)   // @parm Permette di aprire la ditta in modo esclusivo (default _manulock)
   
   // @comm Il parametro <p name> puo' assumere i seguenti valori:
@@ -1189,7 +1189,7 @@ bool TPrefix::set_studio(const char* study, long ditta)
   if (!ok)
   {
     strcpy(__ptprf, old_study);
-    set(old_firm, TRUE);
+    set(old_firm, true);
   }
   return ok;
 }
@@ -1301,16 +1301,7 @@ bool TPrefix::build_firm_data(long codditta, bool flagcom)
   if (exist)
     return message_box("Direttorio dati danneggiato, impossibile attivare la ditta %ld", codditta);
   if (!yesno_box("Gli archivi della ditta %ld non esistono: si desidera generarli?", codditta))
-    return FALSE;         
-  
-  TLocalisamfile ditte(LF_NDITTE);
-  ditte.zero();
-  ditte.put(NDT_CODDITTA,codditta);   
-  if (ditte.read(_isequal,_testandlock) == _islocked)
-  {
-    message_box("Archivi della ditta %ld in fase di creazione da parte di un altro utente.",codditta);
-    return FALSE;
-  }
+    return false;         
   
   set_autoload_new_files(yesno_box("Si desidera precaricare gli archivi standard"));
   s = s.path(); s.rtrim(1);
@@ -1353,7 +1344,7 @@ bool TPrefix::build_firm_data(long codditta, bool flagcom)
     rec.zero();
   }
   TString mess(TR("Generazione archivi della ditta ")); mess << codditta;
-  TProgind p(maxeod0 ? maxeod0 : 1, mess, FALSE, TRUE);
+  TProgind p(maxeod0 ? maxeod0 : 1, mess, false, TRUE);
 
   for (int i = LF_USER; i <= maxeod0; i++)
   {
@@ -1372,7 +1363,7 @@ bool TPrefix::build_firm_data(long codditta, bool flagcom)
     if (dir.is_valid() && create_now)
     {
       TSystemisamfile f(i);
-      f.build(30);
+      f.build();
     }
     else
     {
@@ -1391,8 +1382,6 @@ bool TPrefix::build_firm_data(long codditta, bool flagcom)
       reg.rewrite();
     }
   } 
-  ditte.reread(_unlock);
-  
   set_codditta(codditta);
   set_autoload_new_files(TRUE);