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

Patch level :4.0 nopatch

Browse Source 
Files correlati     :cg7.exe
Ricompilazione Demo : [ ]
Commento            :enrichetta personal program


git-svn-id: svn://10.65.10.50/trunk@14782 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2007-01-23 12:24:58 +00:00
parent a1d8aab0db
commit 08b6768612
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
cg/cg7200.cpp
View File

@ -1101,6 +1101,9 @@ real TInvioP::calcola_pagamento(TRectype& curpag_rec, real& iva_indetraibile)
//..percentuali e cazzi vari (funziona ststisticamente!)
if (rapporto_pagati >= 0.7)
imponibile = imponibile_fdr;
if (rapporto_imponibili < 0.7 || rapporto_imponibili > 0.85)
iva_indetraibile = ZERO;
}
} //if(fdr!=nreg..
else //se non esiste una fdr eventuali ive indetraibili non sussistono
@ -1250,6 +1253,7 @@ bool TInvioP::i_proforma_pagamenti()
pi->_accsal = 'A';
pagame.add(indice, pi);
}
//ricava l'importo del pagamento e lo aggiunge al memorizzatore
const real importo_pagato = calcola_pagamento(curpag_rec, iva_indet);
pi->_somma += importo_pagato;