Errori MI3137 e MI3140
git-svn-id: svn://10.65.10.50/trunk@1607 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
2e0201a5ba
commit
c0c868a2ae
@ -36,18 +36,18 @@ bool TCopia_archivi::copyfile(int logicnum, long from, long to)
|
|||||||
if (dir.is_com())
|
if (dir.is_com())
|
||||||
{
|
{
|
||||||
dir.get(logicnum);
|
dir.get(logicnum);
|
||||||
return error_box("Non posso copiare su un'archivio comune : ditta %ld - archivio %s", to, dir.name());
|
return error_box("Non posso copiare su un'archivio comune : ditta %ld - archivio %s", to, dir.filename());
|
||||||
}
|
}
|
||||||
if (from > 0) set_firm(from);
|
if (from > 0) set_firm(from);
|
||||||
else prefix().set("com");
|
else prefix().set("com");
|
||||||
dir.get(logicnum);
|
dir.get(logicnum);
|
||||||
|
|
||||||
if (!fexist(dir.name()))
|
if (!fexist(dir.filename()))
|
||||||
{
|
{
|
||||||
if (from > 0)
|
if (from > 0)
|
||||||
return error_box("Non esiste il file sorgente : ditta %ld - %s", from, dir.name());
|
return error_box("Non esiste il file sorgente : ditta %ld - %s", from, dir.filename());
|
||||||
else
|
else
|
||||||
return error_box("Non esiste il file sorgente : archivi comuni - %s", dir.name());
|
return error_box("Non esiste il file sorgente : archivi comuni - %s", dir.filename());
|
||||||
}
|
}
|
||||||
TSystemisamfile file(logicnum);
|
TSystemisamfile file(logicnum);
|
||||||
TFilename t; t.tempdir(); t << "/tr" << logicnum;
|
TFilename t; t.tempdir(); t << "/tr" << logicnum;
|
||||||
|
Loading…
x
Reference in New Issue
Block a user