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

Patch level : 12.0 334

Browse Source 
Files correlati     : 771.exe
Commento            : 
- Aggiornamento generazione quadro L.A. secondo gli standard del 2017.
 - Adesso non viene sottratto alle somme il valore IMPCPA che portava in negativo molte somme.
- Sistemati reali che davano problemi

git-svn-id: svn://10.65.10.50/branches/R_10_00@23552 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
mtollari 2017-01-26 09:32:00 +00:00
parent a47fcad621
commit 73bd6e14db
1 changed files with 10 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
src/m770/771230.cpp
View File

@ -82,7 +82,7 @@ void TRighe_riepilogo::genera_aliquota(TRectype& quadro, const char* aliquota,
{ {
const real impos = quadro.get(imposta); const real impos = quadro.get(imposta);
aliq = impos * CENTO / impon; aliq = impos * CENTO / impon;
if (aliq % UNO == ZERO) if (real(aliq % UNO) == ZERO)
quadro.put(aliquota, aliq); quadro.put(aliquota, aliq);
} }
} }
@ -112,7 +112,7 @@ void TRighe_riepilogo::genera_la(TRectype& quadro, const TRectype& riga, const T
real somme = compenso; real somme = compenso;
somme -= imponibile; somme -= imponibile;
somme += riga.get_real(PAG_SPESA); somme += riga.get_real(PAG_SPESA);
somme -= riga.get_real(PAG_IMPCPA); //somme -= riga.get_real(PAG_IMPCPA);
somme -= riga.get_real(PAG_SOMREGCONV); somme -= riga.get_real(PAG_SOMREGCONV);
quadro.put(QUD_SOMME, somme); // altre somme non soggette quadro.put(QUD_SOMME, somme); // altre somme non soggette
@ -663,7 +663,7 @@ void TQuadroC_E2::genera_aliquota(TRectype& quadro, const char* aliquota,
{ {
const real impos = quadro.get(imposta); const real impos = quadro.get(imposta);
aliq = impos * CENTO / impon; aliq = impos * CENTO / impon;
if (aliq % UNO == ZERO) if (real(aliq % UNO) == ZERO)
quadro.put(aliquota, aliq); quadro.put(aliquota, aliq);
} }
} }
@ -820,7 +820,7 @@ void TQuadroC_E2::genera_la(TRectype& quadro, const TRectype& riga, const TStrin
const real inps_tot = riga.get(PAG_INPSCOMP); const real inps_tot = riga.get(PAG_INPSCOMP);
real inps_erog, inps_perc; real inps_erog, inps_perc;
if (inps_tot > ZERO && riga.get_real(PAG_IMPONIBILE) > 5000.0) if (inps_tot > ZERO && riga.get_real(PAG_IMPONIBILE) > real(5000))
{ {
inps_perc = riga.get_real(PAG_INPSPERC); inps_perc = riga.get_real(PAG_INPSPERC);
inps_erog = inps_tot - inps_perc; inps_erog = inps_tot - inps_perc;
@ -1100,7 +1100,7 @@ bool TQuadroC_E2::ricalcola_imposte_c(TMask_field& f, KEY key)
f.warning_box("L'imponibile dovrebbe essere %s", imponibile_v.string(".")); f.warning_box("L'imponibile dovrebbe essere %s", imponibile_v.string("."));
} }
const real imposta_v = m.get_real(102) * imponibile / 100.0; const real imposta_v = m.get_real(102) * imponibile / CENTO;
real imposta = m.get(109); real imposta = m.get(109);
if (imposta.is_zero()) if (imposta.is_zero())
{ {
@ -1161,7 +1161,7 @@ bool TQuadroC_E2::ricalcola_imposte_d(TMask_field& f, KEY key)
} }
} }
const real imposta_v = m.get_real(102) * imponibile / 100.0; const real imposta_v = m.get_real(102) * imponibile / CENTO;
real imposta = m.get(108); real imposta = m.get(108);
if (imposta.is_zero()) if (imposta.is_zero())
{ {
@ -1197,7 +1197,7 @@ bool TQuadroC_E2::ricalcola_imposte_e(TMask_field& f, KEY key)
if (key == K_TAB && f.focusdirty() || key == K_ENTER && f.dlg() == 104) if (key == K_TAB && f.focusdirty() || key == K_ENTER && f.dlg() == 104)
{ {
TMask& m = f.mask(); TMask& m = f.mask();
const real ritenuta_v = m.get_real(103) * m.get_real(104) / 100.0; const real ritenuta_v = m.get_real(103) * m.get_real(104) / CENTO;
real ritenuta = m.get(105); real ritenuta = m.get(105);
if (ritenuta.is_zero()) if (ritenuta.is_zero())
{ {
@ -1239,7 +1239,7 @@ bool TQuadroC_E2::ricalcola_imposte_e1(TMask_field& f, KEY key)
if (key == K_TAB && f.focusdirty() || key == K_ENTER && f.dlg() == 105) if (key == K_TAB && f.focusdirty() || key == K_ENTER && f.dlg() == 105)
{ {
TMask& m = f.mask(); TMask& m = f.mask();
const real ritenuta_v = m.get_real(105) * m.get_real(106) / 100.0; const real ritenuta_v = m.get_real(105) * m.get_real(106) / CENTO;
real ritenuta = m.get(107); real ritenuta = m.get(107);
if (ritenuta.is_zero()) if (ritenuta.is_zero())
{ {
@ -1281,7 +1281,7 @@ bool TQuadroC_E2::ricalcola_imposte_e2(TMask_field& f, KEY key)
if (key == K_TAB && f.focusdirty() || key == K_ENTER && f.dlg() == 103) if (key == K_TAB && f.focusdirty() || key == K_ENTER && f.dlg() == 103)
{ {
TMask& m = f.mask(); TMask& m = f.mask();
const real imposta_v = m.get_real(103) * m.get_real(104) / 100.0; const real imposta_v = m.get_real(103) * m.get_real(104) / CENTO;
real imposta = m.get(105); real imposta = m.get(105);
if (imposta.is_zero()) if (imposta.is_zero())
{ {
@ -1351,7 +1351,7 @@ bool TQuadroC_E2::ritenute_handler_e2(TMask_field& f, KEY key)
if (key == K_TAB && f.focusdirty() || key == K_ENTER) if (key == K_TAB && f.focusdirty() || key == K_ENTER)
{ {
TMask& m = f.mask(); TMask& m = f.mask();
real imposta = m.get_real(103) * m.get_real(104) / 100.0; real imposta = m.get_real(103) * m.get_real(104) / CENTO;
real imp = f.get(); real imp = f.get();
if (imposta != imp) if (imposta != imp)
f.warning_box("Importo ritenuta non corretto"); f.warning_box("Importo ritenuta non corretto");