Corretti MI2218 e Mi2219, relativi al prospetto di rimborso

sul regime agricolo e su prospetto agricolo stesso.


git-svn-id: svn://10.65.10.50/trunk@3982 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-12-09 11:22:07 +00:00
parent 7a80be976f
commit bd4c211bec
2 changed files with 28 additions and 12 deletions

View File

@ -852,7 +852,7 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt)
if (corrisp) lordo2netto(agr_imp,agr_iva,p); if (corrisp) lordo2netto(agr_imp,agr_iva,p);
if (tipoagr == 1 || tipoagr == 3) if (tipoagr == 1) // Ora si utilizza solo il segnalino 1
{ {
agr_1 += agr_iva; agr_1 += agr_iva;
agr_1i += agr_imp; agr_1i += agr_imp;

View File

@ -406,6 +406,7 @@ _DescrItem* TLiquidazione_app::recalc_rimborso(int month, const char* codatts,
TString att; TString att;
const bool is_mens = _freqviva == "M"; const bool is_mens = _freqviva == "M";
// variabili per condizione 1
real es_ni = 0.0; real es_ni = 0.0;
real vol_aff = 0.0; real vol_aff = 0.0;
int m; int m;
@ -415,6 +416,18 @@ _DescrItem* TLiquidazione_app::recalc_rimborso(int month, const char* codatts,
if (month == 13) m = 1; // se annuale considera tutti i mesi if (month == 13) m = 1; // se annuale considera tutti i mesi
// variabili per condizione 2
real vtot = 0.0;
real atot = 0.0;
real ivav = 0.0;
real ivaa = 0.0;
real alv = 0.0; // aliquota media vendite
real ala = 0.0; // aliquota media acquisti
// Condizione 1...
while ((tmpatt = atts.get()) != NULL) while ((tmpatt = atts.get()) != NULL)
{ {
att = tmpatt; att = tmpatt;
@ -424,6 +437,11 @@ _DescrItem* TLiquidazione_app::recalc_rimborso(int month, const char* codatts,
vol_aff += _pam->get_real("R1"); vol_aff += _pam->get_real("R1");
es_ni += _pum->get_real("R12"); es_ni += _pum->get_real("R12");
if (_isagricolo) // questo calcolo per il regime agricolo, riguarda la condizione 2
{
vtot += _pum->get_real("R11");
ivav += _plm->get_real("R6");
}
} }
} }
@ -442,13 +460,6 @@ _DescrItem* TLiquidazione_app::recalc_rimborso(int month, const char* codatts,
// ---------------------- condizione 2 // ---------------------- condizione 2
// u' casinu pazzescu d'u nuiu guvernu // u' casinu pazzescu d'u nuiu guvernu
real vtot = 0.0;
real atot = 0.0;
real ivav = 0.0;
real ivaa = 0.0;
real alv = 0.0; // aliquota media vendite
real ala = 0.0; // aliquota media acquisti
/*********************************************************************** /***********************************************************************
Sembra che sia stato annullato subito dopo che ho finito di scrivere Sembra che sia stato annullato subito dopo che ho finito di scrivere
@ -566,7 +577,8 @@ _DescrItem* TLiquidazione_app::recalc_rimborso(int month, const char* codatts,
} }
**************************************************************************/ **************************************************************************/
// Condizione 2...
// scorri i bellissimi progressivi mensili // scorri i bellissimi progressivi mensili
const int year = atoi((const char*)_year); const int year = atoi((const char*)_year);
for (_pim->first(); !_pim->eof(); _pim->next()) for (_pim->first(); !_pim->eof(); _pim->next())
@ -596,8 +608,12 @@ _DescrItem* TLiquidazione_app::recalc_rimborso(int month, const char* codatts,
// totali imponibili // totali imponibili
if (tipomov == vendita) if (tipomov == vendita)
{ {
vtot += imp; if (!_isagricolo)
ivav += iva; { // per il regime agricolo il calcolo e' a parte: si reperiscono PUM->R11(Imponibile) e PLM->R6(Imposta)
// vedi sopra...
vtot += imp;
ivav += iva;
}
} }
else else
if (tipodet != 9) // I progressivi con tipo detraibilita' a 9 vanno saltati (MI2209) if (tipodet != 9) // I progressivi con tipo detraibilita' a 9 vanno saltati (MI2209)
@ -605,7 +621,7 @@ _DescrItem* TLiquidazione_app::recalc_rimborso(int month, const char* codatts,
atot += imp; atot += imp;
ivaa += iva; ivaa += iva;
} }
} } // end of for
// finalmente // finalmente
alv = ivav/vtot; alv.round(4); alv = ivav/vtot; alv.round(4);