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

Corretto errore MI2115

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@758 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1994-12-14 11:10:15 +00:00
parent 5ab88b036a
commit 6c2eed63ee
1 changed files with 64 additions and 59 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

123
cg/cg4200.cpp
View File

@ -160,78 +160,83 @@ bool TCopia_archivi::menu(MENU_TAG)
{
const long from_firm = _msk->get_long(F_FROMFIRM);
const long to_firm = _msk->get_long(F_TOFIRM);
const bool copy_pcon = _msk->get_bool(F_PCON);
const bool copy_causali = _msk->get_bool(F_CAUS);
const bool copy_clifo = _msk->get_bool(F_CLIFO);
const bool copy_ivd = _msk->get_bool(F_IVD);
if (copy_pcon || copy_causali || copy_clifo || copy_ivd)
if (from_firm == to_firm)
error_box("La copia si puo' effettuare solo tra due ditte diverse");
else
{
if (prefhndl->exist(to_firm))
const bool copy_pcon = _msk->get_bool(F_PCON);
const bool copy_causali = _msk->get_bool(F_CAUS);
const bool copy_clifo = _msk->get_bool(F_CLIFO);
const bool copy_ivd = _msk->get_bool(F_IVD);
if (copy_pcon || copy_causali || copy_clifo || copy_ivd)
{
set_firm(to_firm);
TLocalisamfile mov(LF_MOV);
if ((mov.eod() == 0) || (!copy_pcon && !copy_causali && !copy_clifo))
if (prefhndl->exist(to_firm))
{
TString mess("Attenzione \n");
int count = 0;
set_firm(to_firm);
TLocalisamfile mov(LF_MOV);
if (copy_pcon)
if ((mov.eod() == 0) || (!copy_pcon && !copy_causali && !copy_clifo))
{
mess << "il piano dei conti";
count++;
}
if (copy_causali)
{
if (count > 0) mess << ",\n";
mess << " le causali";
count++;
}
if (copy_clifo)
{
if (count > 0) mess << ",\n";
mess << " i clienti e fornitori";
count++;
}
if (copy_ivd)
{
if (count > 0) mess << ",\n";
mess << " la riclassificazione IV direttiva";
count++;
}
mess << "\n della ditta " << to_firm;
if (count > 1)
mess << " saranno sovrascritti";
else
mess << " sara' sovrascritto";
mess << ". Devo continuare";
if (yesno_box((const char *) mess))
{
mess.rtrim(16); mess << " Devo veramente continuare";
TString mess("Attenzione \n");
int count = 0;
if (copy_pcon)
{
mess << "il piano dei conti";
count++;
}
if (copy_causali)
{
if (count > 0) mess << ",\n";
mess << " le causali";
count++;
}
if (copy_clifo)
{
if (count > 0) mess << ",\n";
mess << " i clienti e fornitori";
count++;
}
if (copy_ivd)
{
if (count > 0) mess << ",\n";
mess << " la riclassificazione IV direttiva";
count++;
}
mess << "\n della ditta " << to_firm;
if (count > 1)
mess << " saranno sovrascritti";
else
mess << " sara' sovrascritto";
mess << ". Devo continuare";
if (yesno_box((const char *) mess))
{
if (copy_pcon)
mess.rtrim(16); mess << " Devo veramente continuare";
if (yesno_box((const char *) mess))
{
if (copyfile(LF_PCON, from_firm, to_firm) && !copy_ivd)
clearivd(to_firm);
if (copy_pcon)
{
if (copyfile(LF_PCON, from_firm, to_firm) && !copy_ivd)
clearivd(to_firm);
}
if (copy_causali)
{
if (copyfile(LF_CAUSALI, from_firm, to_firm))
copyfile(LF_RCAUSALI, from_firm, to_firm);
}
if (copy_clifo)
copyfile(LF_CLIFO, from_firm, to_firm);
if (!copy_pcon && copy_ivd)
copyivd(from_firm, to_firm);
}
if (copy_causali)
{
if (copyfile(LF_CAUSALI, from_firm, to_firm))
copyfile(LF_RCAUSALI, from_firm, to_firm);
}
if (copy_clifo)
copyfile(LF_CLIFO, from_firm, to_firm);
if (!copy_pcon && copy_ivd)
copyivd(from_firm, to_firm);
}
}
else error_box("La copia si puo' effettuare solo se non sono stati registrati movimenti");
set_firm(_default_firm);
}
else error_box("La copia si puo' effettuare solo se non sono stati registrati movimenti");
set_firm(_default_firm);
else error_box("Gli archivi della ditta %d non sono stati ancora generati",to_firm);
_msk->reset();
}
else error_box("Gli archivi della ditta %d non sono stati ancora generati",to_firm);
_msk->reset();
}
}
return FALSE;