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

Implementata creazione file per modulo e zappato 770

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@1312 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1995-04-28 13:16:10 +00:00
parent a28345ef81
commit d82f696754
1 changed files with 20 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
ba/ba1100.cpp
View File

@ -12,6 +12,7 @@
#include <validate.h>
#include <progind.h>
#include <extcdecl.h>
#include <execp.h>
#include "ba1.h"
#include "ba1100.h"
@ -600,6 +601,7 @@ void TManutenzione_app::convert_dir()
{
const TString pref(prefix().name());
const bool is_com = prefix().is_com();
TDir d;
TTrec r;
@ -619,21 +621,25 @@ void TManutenzione_app::convert_dir()
p.addstatus(1);
prefix().set("");
r.get(i);
d.get(i);
const int module = abs((int)d.flags());
prefix().set(pref);
TSystemisamfile f(i);
f.update(r);
d.get(i, _nolock, _nordir, _sysdirop);
bool to_create = (is_com ? d.is_com() : d.is_firm());
d.get(i);
TFilename datafile(d.name());
if (to_create && !fexist(datafile))
if (to_create && has_module(module, CHK_DONGLE))
{
d.get(i);
if (!fexist(d.name()))
{
TSystemisamfile f(i);
f.build(10L);
}
}
}
prefix().set("");
const long level = prefix().filelevel();
prefix().set(pref);
@ -653,6 +659,13 @@ void TManutenzione_app::update()
begin_wait();
prefix().set("com");
if (prefix().filelevel() <= 199502L)
{
TExternal_app app("bacnv 4 0");
app.run();
}
update_dir();
convert_dir();