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

Patch level : 10.0 732

Browse Source 
Files correlati     : cg2.exe sc0.exe
Ricompilazione Demo : [ ]
Commento

Se riregistro una partita extracontabile con solo una riga e cambio l'allineamento questa vieneelimiata per errore


git-svn-id: svn://10.65.10.50/trunk@20440 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 2010-05-11 16:46:10 +00:00
parent b1bbeacb7b
commit 7dd321a48b
1 changed files with 20 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
cg/cgsaldac.cpp
View File

@ -1381,10 +1381,28 @@ bool TPartita::write(bool re) const
num.trim(); num.trim();
// Cancella vecchia partita // Cancella vecchia partita
TLocalisamfile part(LF_PARTITE);
part.put(PART_TIPOCF, conto().tipo());
if (conto().tipo() <= ' ')
{
part.put(PART_GRUPPO, conto().gruppo());
part.put(PART_CONTO, conto().conto());
}
part.put(PART_SOTTOCONTO, conto().sottoconto());
part.put(PART_ANNO, anno());
part.put(PART_NUMPART, num);
TRectype comp(part.curr());
if (part.read(_isgteq) == NOERR && part.curr().compare_key(comp, 1 ,1) == 0)
{
TPartita canc(conto(), anno(), num); TPartita canc(conto(), anno(), num);
canc.remove(); canc.remove();
} }
} }
}
return err == NOERR; return err == NOERR;
} }