root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Patch level : 10.0 318

Browse Source 
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
This commit is contained in:
alex 2009-05-27 13:46:20 +00:00
parent 554e34ed72
commit d0b4aa6e55
1 changed files with 7 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
include/prefix.cpp
View File

@ -36,7 +36,7 @@ TPrefix& prefix_init()
// @func Determina se il prefix e' stato inizializzato // @func Determina se il prefix e' stato inizializzato
// //
// @rdesc Ritorna TRUE o FALSE // @rdesc Ritorna true o false
bool prefix_valid() bool prefix_valid()
{ {
return _prefhndl != NULL; return _prefhndl != NULL;
@ -497,7 +497,7 @@ const TFilename& TFile_info::load_filedes()
TFile_info::TFile_info(int logicnum, TFilename& name) TFile_info::TFile_info(int logicnum, TFilename& name)
: _ref_count(0), _num(logicnum), _handle(-1), : _ref_count(0), _num(logicnum), _handle(-1),
_last_access(0), _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) if (logicnum < LF_EXTERNAL)
{ {
@ -998,7 +998,7 @@ void TPrefix::reopen() const
// @mfunc Setta la ditta corrente // @mfunc Setta la ditta corrente
void TPrefix::set( void TPrefix::set(
const char* name, // @parm Nome del direttorio dati da attivare (default NULL) 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) TFilelock mode) // @parm Permette di aprire la ditta in modo esclusivo (default _manulock)
// @comm Il parametro <p name> puo' assumere i seguenti valori: // @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) if (!ok)
{ {
strcpy(__ptprf, old_study); strcpy(__ptprf, old_study);
set(old_firm, TRUE); set(old_firm, true);
} }
return ok; return ok;
} }
@ -1301,16 +1301,7 @@ bool TPrefix::build_firm_data(long codditta, bool flagcom)
if (exist) if (exist)
return message_box("Direttorio dati danneggiato, impossibile attivare la ditta %ld", codditta); 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)) if (!yesno_box("Gli archivi della ditta %ld non esistono: si desidera generarli?", codditta))
return FALSE; 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;
}
set_autoload_new_files(yesno_box("Si desidera precaricare gli archivi standard")); set_autoload_new_files(yesno_box("Si desidera precaricare gli archivi standard"));
s = s.path(); s.rtrim(1); s = s.path(); s.rtrim(1);
@ -1353,7 +1344,7 @@ bool TPrefix::build_firm_data(long codditta, bool flagcom)
rec.zero(); rec.zero();
} }
TString mess(TR("Generazione archivi della ditta ")); mess << codditta; 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++) 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) if (dir.is_valid() && create_now)
{ {
TSystemisamfile f(i); TSystemisamfile f(i);
f.build(30); f.build();
} }
else else
{ {
@ -1391,8 +1382,6 @@ bool TPrefix::build_firm_data(long codditta, bool flagcom)
reg.rewrite(); reg.rewrite();
} }
} }
ditte.reread(_unlock);
set_codditta(codditta); set_codditta(codditta);
set_autoload_new_files(TRUE); set_autoload_new_files(TRUE);