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

Corretti MI2216 e MI2217.

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@3970 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-12-06 13:54:26 +00:00
parent b6dcde19dc
commit 3c08ad6c4c
2 changed files with 20 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

27
cg/cg4301.cpp
View File

@ -393,11 +393,8 @@ bool TLiquidazione_app::update_att(int month, const char* codatt,
{ {
zero_att(month,codatt); zero_att(month,codatt);
recalc_att(month,codatt); recalc_att(month,codatt);
if (!_isagricolo)
{
recalc_ventilation(month, codatt); recalc_ventilation(month, codatt);
recalc_corrispettivi(month, codatt); recalc_corrispettivi(month, codatt);
}
//13/12/1995 //13/12/1995
// if (month == 13) // if (month == 13)
// recalc_annual(codatt); // recalc_annual(codatt);
@ -520,6 +517,8 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt)
real vssp_iva = 0.0; real vssp_iva = 0.0;
real bdog_imp = 0.0; real bdog_imp = 0.0;
real bdog_iva = 0.0; real bdog_iva = 0.0;
real agr_imp = 0.0;
real agr_iva = 0.0;
*_cur = 0; *_cur = 0;
long items = _cur->items(); long items = _cur->items();
@ -847,15 +846,21 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt)
*/ */
if (tipomov == vendita) if (tipomov == vendita)
{ {
agr_imp = imponibile;
agr_iva = imposta;
const real p = _iva->get_real("R0") / CENTO;
if (corrisp) lordo2netto(agr_imp,agr_iva,p);
if (tipoagr == 1 || tipoagr == 3) if (tipoagr == 1 || tipoagr == 3)
{ {
agr_1 += imposta; agr_1 += agr_iva;
agr_1i += imponibile; agr_1i += agr_imp;
} }
else if (tipoagr == 2) else if (tipoagr == 2)
{ {
agr_2 += imposta; agr_2 += agr_iva;
agr_2i += imponibile; agr_2i += agr_imp;
} }
} }
else if (tipodet == 0) else if (tipodet == 0)
@ -880,7 +885,7 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt)
agr_6 += imposta; agr_6 += imposta;
} }
} }
} } // __end of _agricolo
if (tipodet == 1) // acquisti indeducibili su ricavi esenti art. 10 if (tipodet == 1) // acquisti indeducibili su ricavi esenti art. 10
{ {
@ -2033,11 +2038,11 @@ void TLiquidazione_app::write_liq(int month, const char* codatts)
iva_vend += _plm->get_real("R0"); iva_vend += _plm->get_real("R0");
iva_acq += _plm->get_real("R1"); iva_acq += _plm->get_real("R1");
risultato += (_plm->get_real("R0") - _plm->get_real("R1")); risultato += (_plm->get_real("R0") - _plm->get_real("R1"));
res_debt += _plm->get_real("R0");
res_cred += _plm->get_real("R1");
} // le storie per l'agricolo sono piu' sotto, oltre la fine del do..while() } // le storie per l'agricolo sono piu' sotto, oltre la fine del do..while()
detrazioni+= (_plm->get_real("R3") + _plm->get_real("R4")); detrazioni+= (_plm->get_real("R3") + _plm->get_real("R4"));
res_debt += _plm->get_real("R0");
res_cred += _plm->get_real("R1");
// detrazioni solo non in regime agricolo // detrazioni solo non in regime agricolo
if (!_isagricolo) if (!_isagricolo)
@ -2162,6 +2167,8 @@ void TLiquidazione_app::write_liq(int month, const char* codatts)
{ {
iva_vend = d._r1; iva_vend = d._r1;
iva_acq = d._r2 + d._r10; iva_acq = d._r2 + d._r10;
res_debt += iva_vend;
res_cred += iva_acq;
risultato += (iva_vend - iva_acq); risultato += (iva_vend - iva_acq);
break; break;
} }

2
cg/cg4304.cpp
View File

@ -351,7 +351,7 @@ void TLiquidazione_app::describe_agricolo(int month, const char* codatt)
} }
// Aggiungo anche questi, perche' oltre che servire in stampa, servono anche in write_liq() // Aggiungo anche questi, perche' oltre che servire in stampa, servono anche in write_liq()
// in caso di ditta a regime agricolo // in caso di ditta a regime agricolo
// Overossia: // alias:
// _r9 mantiene la percentuale (gia' arrotondata!) // _r9 mantiene la percentuale (gia' arrotondata!)
// _r10 mantiene l'iva detraibile calcolata! // _r10 mantiene l'iva detraibile calcolata!
d->_r9 = (d->_r8 / (d->_r7 + d->_r8)); d->_r9 = (d->_r8 / (d->_r7 + d->_r8));