Corretti MI1056 MI1079 Liquidazione

git-svn-id: svn://10.65.10.50/trunk@507 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
villa 1994-11-02 08:45:29 +00:00
parent 27c921a77a
commit fd95ce86d6
3 changed files with 29 additions and 4 deletions

View File

@ -294,7 +294,9 @@ void CG4300_App::recalc_att(int month, const char* codatt)
real agr_acc = 0.0;
real cred_cost = 0.0;
real for_rimb = 0.0;
real acq_ies = 0.0;
real acq_ies_iva = 0.0;
*_cur = 0;
long items = _cur->items();
TString trueatt(codatt);
@ -460,8 +462,14 @@ void CG4300_App::recalc_att(int month, const char* codatt)
case 3: if (tipomov == vendita) agr_acc += imposta; break;
}
if (tipodet == 3 || // passaggi interni (solo ventilaz.)
tipodet == 1) // esenti art. 10
if (tipodet == 1) // acquisti indeducibili su ricavi esenti art. 10
{
acq_ies += imponibile;
acq_ies_iva += imposta;
continue;
}
if (tipodet == 3) // passaggi interni (solo ventilaz.)
continue;
// *****************************************
@ -531,6 +539,7 @@ void CG4300_App::recalc_att(int month, const char* codatt)
// salviamo i totali antes que seja tarde
real dd6 = ammort_6 * real(DETRAZIONE_6PERCENTO);
// calcola il lercio prorata
real prorata;
if (!_prorata.is_zero())
@ -605,6 +614,8 @@ void CG4300_App::recalc_att(int month, const char* codatt)
_plm->put("B0", "X"); // calcolato (deve essere invalidato dalla
// primanota)
_plm->put("S1", for_rimb.string());
_plm->put("S2", acq_ies.string());
_plm->put("S3", acq_ies_iva.string());
_plm->rewrite();
// salva gli altri totali para no ponernos locos despues

View File

@ -222,6 +222,7 @@ void CG4300_App::recalc_ventilation(int month, const char* codatt)
real imponibile = dst.get();
real imposta = imponibile*vv->_aliquota;
imposta.round(ROUND_LIRA);
imponibile -= imposta;
// aggiusto l'IVA vendite nei plm
look_plm(month, codatt);

View File

@ -404,6 +404,8 @@ void CG4300_App::describe_pims(int month, const char* codatt)
t->_r11 += _plm->get_real("R2"); // pro-rata indetraibile
t->_s0 = (_plm->get_real("R12")).string(); // % pro-rata
t->_s1 = _plm->get("S2"); // acq. inded. su ricavi esenti
t->_s2 = _plm->get("S3"); // IVA acq. inded. su ricavi esenti
}
}
// annual follows in _arr
@ -750,6 +752,9 @@ void CG4300_App::set_plm(_DescrItem& d)
void CG4300_App::set_ptm(_DescrItem& d)
{
real iesi(d._s1);
real iesv(d._s2);
if (d._r0.is_zero() && // acq. ammortizz.
d._r1.is_zero() && // IVA acq. ammort.
d._r2.is_zero() && // ammort. detr. 6%
@ -761,7 +766,9 @@ void CG4300_App::set_ptm(_DescrItem& d)
d._r8.is_zero() && // cessioni beni ammort.
d._r9.is_zero() && // IVA su cessioni ammort.
d._r10.is_zero() && // tot. esenti IVA
d._r11.is_zero() && // pro_rata
d._r11.is_zero() && // pro_rata
iesi.is_zero() && // indeducibili su ricavi esenti
iesv.is_zero() && // IVA indeducibili su ricavi esenti
d._arr.items() == 0)
{
set_row(1,"");
@ -793,6 +800,12 @@ void CG4300_App::set_ptm(_DescrItem& d)
set_row(row++, "Altri beni strumentali acquisiti in leasing@50g%r@69g%r",
&(d._r6),
&(d._r7));
if (! (iesi.is_zero() && iesv.is_zero()))
{
set_row(row++, "Totale acquisti indeducibili su ricavi esenti@50g%r@69g%r",
&iesi,
&iesv);
}
if (! (d._r2.is_zero() && d._r3.is_zero()))
{
real rn = d._r2 * real(DETRAZIONE_6PERCENTO);