Patch level : 12.0 570
Files correlati : cg4.exe cg5300a.uml Modificata la liquidazione delle fatture in ritardo Modificata la liquidazione 13 con pro rata e IVA per cassa git-svn-id: svn://10.65.10.50/branches/R_10_00@24488 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
feafdacc82
commit
8cdfa060e8
@ -308,6 +308,7 @@ class TLiquidazione_app : public TPrint_application
|
|||||||
|
|
||||||
real _diff_ven_ap, _diff_ven_ap_iva, _diff_acq_ap, _diff_acq_ap_iva;
|
real _diff_ven_ap, _diff_ven_ap_iva, _diff_acq_ap, _diff_acq_ap_iva;
|
||||||
real _imposta_inc_diff_ven, _imposta_inc_cassa_ven, _imposta_inc_diff_acq, _imposta_inc_cassa_acq;
|
real _imposta_inc_diff_ven, _imposta_inc_cassa_ven, _imposta_inc_diff_acq, _imposta_inc_cassa_acq;
|
||||||
|
real _perc_ind_annual;
|
||||||
|
|
||||||
// main cursor
|
// main cursor
|
||||||
TRelation* _rel;
|
TRelation* _rel;
|
||||||
|
@ -4114,9 +4114,9 @@ void TLiquidazione_app::write_liq(int month, const char* codatts)
|
|||||||
// toglie credito precedente
|
// toglie credito precedente
|
||||||
cred_prec = credito_prec(month+deltam);
|
cred_prec = credito_prec(month+deltam);
|
||||||
risultato -= cred_prec;
|
risultato -= cred_prec;
|
||||||
risultato -= cred_fattrit;
|
// risultato -= cred_fattrit;
|
||||||
res_cred += cred_prec;
|
res_cred += cred_prec;
|
||||||
res_cred += cred_fattrit;
|
// res_cred += cred_fattrit;
|
||||||
// vedi se c'era un debito precedente per debiti < 50.000
|
// vedi se c'era un debito precedente per debiti < 50.000
|
||||||
debt_precd = debt_prec(month+deltam);
|
debt_precd = debt_prec(month+deltam);
|
||||||
risultato += debt_precd;
|
risultato += debt_precd;
|
||||||
@ -4284,8 +4284,9 @@ void TLiquidazione_app::write_liq(int month, const char* codatts)
|
|||||||
_plm->put("R33", new_r33);
|
_plm->put("R33", new_r33);
|
||||||
_plm->rewrite();
|
_plm->rewrite();
|
||||||
|
|
||||||
fdiffinc_iva_acq = fdiffinc_iva_acq - old_r33 + new_r33;
|
// fdiffinc_iva_acq = fdiffinc_iva_acq - old_r33 + new_r33;
|
||||||
}
|
fdiffinc_iva_acq = fdiffinc_iva_acq - new_r33;
|
||||||
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
@ -4478,7 +4479,7 @@ void TLiquidazione_app::write_liq(int month, const char* codatts)
|
|||||||
res_cred += detrazioni;
|
res_cred += detrazioni;
|
||||||
|
|
||||||
risultato = res_debt - res_cred;
|
risultato = res_debt - res_cred;
|
||||||
risultato -= cred_fattrit;
|
// risultato -= cred_fattrit;
|
||||||
|
|
||||||
// tut ricalcule', riscrivem
|
// tut ricalcule', riscrivem
|
||||||
_lam->put("R0", iva_vend);
|
_lam->put("R0", iva_vend);
|
||||||
|
@ -2271,16 +2271,22 @@ void TLiquidazione_app::set_grand_2000(_DescrItem& d, int &rw)
|
|||||||
|
|
||||||
real perc_prorata;
|
real perc_prorata;
|
||||||
|
|
||||||
TString query = "USE PLM";
|
if (_month == 13)
|
||||||
query << "\nFROM CODTAB=" << _year << "\nTO CODTAB=" << _year;
|
perc_prorata = _perc_ind_annual;
|
||||||
TISAM_recordset ip(query);
|
else
|
||||||
const TRectype& recp = ip.cursor()->curr();
|
|
||||||
for (bool ok = ip.move_first(); ok && perc_prorata == ZERO; ok = ip.move_next())
|
|
||||||
{
|
{
|
||||||
int m = atoi(ip.get("CODTAB").as_string().mid(10));
|
TString query = "USE PLM";
|
||||||
real p = ip.get("R12").as_real();
|
query << "\nFROM CODTAB=" << _year << "\nTO CODTAB=" << _year;
|
||||||
if (m == _month && (p > ZERO && p <= CENTO))
|
TISAM_recordset ip(query);
|
||||||
perc_prorata = p;
|
const TRectype& recp = ip.cursor()->curr();
|
||||||
|
|
||||||
|
for (bool ok = ip.move_first(); ok && perc_prorata == ZERO; ok = ip.move_next())
|
||||||
|
{
|
||||||
|
int m = atoi(ip.get("CODTAB").as_string().mid(10));
|
||||||
|
real p = ip.get("R12").as_real();
|
||||||
|
if (m == _month && (p > ZERO && p <= CENTO))
|
||||||
|
perc_prorata = p;
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
if (perc_prorata > ZERO)
|
if (perc_prorata > ZERO)
|
||||||
@ -2346,6 +2352,7 @@ void TLiquidazione_app::set_grand_2000(_DescrItem& d, int &rw)
|
|||||||
// Se sono in visualizzazione stampo i due importi separati, altrimenti li sommo
|
// Se sono in visualizzazione stampo i due importi separati, altrimenti li sommo
|
||||||
if (!_is_visliq)
|
if (!_is_visliq)
|
||||||
iva_acq += rett_cred;
|
iva_acq += rett_cred;
|
||||||
|
iva_acq -= cred_fattrit;
|
||||||
set_row(rw++, FR("@11g@bIVA detraibile@r per il periodo@58g%r"), &iva_acq);
|
set_row(rw++, FR("@11g@bIVA detraibile@r per il periodo@58g%r"), &iva_acq);
|
||||||
if (!diffinc_iva_acq.is_zero())
|
if (!diffinc_iva_acq.is_zero())
|
||||||
set_row(rw++,FR("@11g a liquidazione differita@58g%r"), &diffinc_iva_acq);
|
set_row(rw++,FR("@11g a liquidazione differita@58g%r"), &diffinc_iva_acq);
|
||||||
@ -2357,9 +2364,7 @@ void TLiquidazione_app::set_grand_2000(_DescrItem& d, int &rw)
|
|||||||
real iva_deb_cred = iva_vend - iva_acq + diffinc_iva - diffinc_iva_acq + xcasinc_iva - xcasinc_iva_acq;
|
real iva_deb_cred = iva_vend - iva_acq + diffinc_iva - diffinc_iva_acq + xcasinc_iva - xcasinc_iva_acq;
|
||||||
if (_is_visliq)
|
if (_is_visliq)
|
||||||
iva_deb_cred += rett_debt - rett_cred;
|
iva_deb_cred += rett_debt - rett_cred;
|
||||||
if (_isannual)
|
|
||||||
iva_deb_cred.round(0);
|
|
||||||
|
|
||||||
print_importo(rw++, TR("IVA a debito o a credito per il periodo"), iva_deb_cred);
|
print_importo(rw++, TR("IVA a debito o a credito per il periodo"), iva_deb_cred);
|
||||||
|
|
||||||
rw++;
|
rw++;
|
||||||
@ -2782,6 +2787,7 @@ bool TLiquidazione_app::set_annual(_DescrItem& d)
|
|||||||
set_row(row++,"");
|
set_row(row++,"");
|
||||||
|
|
||||||
const real perc_det = CENTO - d._r2;
|
const real perc_det = CENTO - d._r2;
|
||||||
|
_perc_ind_annual = d._r2;
|
||||||
const real vol_aff = d._r0;
|
const real vol_aff = d._r0;
|
||||||
const TString16 s1 = perc_det.stringa();
|
const TString16 s1 = perc_det.stringa();
|
||||||
const TString16 s2 = d._r2.stringa();
|
const TString16 s2 = d._r2.stringa();
|
||||||
|
Loading…
x
Reference in New Issue
Block a user