Patch level : 10.0 492

Files correlati     : tc9.exe
Ricompilazione Demo : [ ]
Commento

Aggiunte ritenute al totale doc


git-svn-id: svn://10.65.10.50/trunk@19543 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 2009-10-29 00:39:06 +00:00
parent d2402df79e
commit 1f55a0ce24

View File

@ -1389,7 +1389,7 @@ void TInvioSispac::sispac_movim()
if (numregrev < 0L && scod2rc(ccaus))
numregrev = numreg;
if (numregrev > 0L && rowtype == "F")
if (rowtype == "F")
continue;
if (numregrev > 0L && numreg != numregrev)
{
@ -1504,8 +1504,9 @@ void TInvioSispac::sispac_movim()
recset.set("NUMDESC", TVariant("0"));
real importo = input.get(RMV_IMPORTO).as_real();
if (numregrev > 0L && rowtype == "T")
importo += input.get(SLF_MOV "." MOV_RITFIS).as_real();
real ritenute = input.get(SLF_MOV "." MOV_RITFIS).as_real();
if (ritenute != ZERO && rowtype == "T")
importo += ritenute;
var = "P";
if (importo < ZERO)