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

Patch level : 4.0 606

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


Corretto il riparto batch sui costi


git-svn-id: svn://10.65.10.50/trunk@14852 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 2007-02-07 00:12:05 +00:00
parent 6765cdb7fc
commit 1b7aa2bde6
1 changed files with 19 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ca/ca2200.cpp
View File

@ -248,10 +248,13 @@ bool TRib_movanal_app::explode_rows(const TRecord_array& input_rows, TRecord_arr
distrib.add(rrip[i].get_real(RRIP_RIPARTO));
for (i = 1; i <= rrip.rows(); i++)
{
const real imp = distrib.get(); // Legge la quota da distribuire
if (imp != ZERO)
{
TRectype* newrec = new TRectype(rec);
newrec->put(RMOVANA_NUMRIG, output_rows.rows() + 1);
const real imp = distrib.get(); // Legge la quota da distribuire
newrec->put(RMOVANA_IMPORTO, imp); //e la mette nella nuova riga
//poi copia i valori dei campi cdc,cms,fsc,in quelli di tipo ori (nello stesso record)
copia_campo(rec, RMOVANA_CODCCOSTO, *newrec, RMOVANA_CODCCORI);
@ -268,6 +271,7 @@ bool TRib_movanal_app::explode_rows(const TRecord_array& input_rows, TRecord_arr
ho_cambiato_qualchecosa = true;
}
}
}
else //nessuna riga di ripartizione->aggiungo la riga input all'output
{
TRectype* newrec = new TRectype(rec);