Errori MI3137 e MI3140

git-svn-id: svn://10.65.10.50/trunk@1607 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1995-07-17 16:54:00 +00:00
parent 2e0201a5ba
commit c0c868a2ae

View File

@ -36,18 +36,18 @@ bool TCopia_archivi::copyfile(int logicnum, long from, long to)
if (dir.is_com())
{
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);
else prefix().set("com");
dir.get(logicnum);
if (!fexist(dir.name()))
if (!fexist(dir.filename()))
{
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
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);
TFilename t; t.tempdir(); t << "/tr" << logicnum;