Patch level :10.0 1030
Files correlati : Ricompilazione Demo : [ ] Commento : sistemato definitivamente (??) il calcolo dell %Amm. nella stampa registro cespiti git-svn-id: svn://10.65.10.50/branches/R_10_00@22284 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
43a5648aec
commit
e89a3ec15a
@ -290,24 +290,11 @@ bool TStampa_sintetica_rep::get_usr_val(const TString& name, TVariant& var) cons
|
||||
|
||||
if (name == "#PERCAMM") // percentuale ammortamento
|
||||
{
|
||||
real percamm;
|
||||
real valamm = val_amm(_cespite.sal_ini());
|
||||
if (valamm.is_zero()) // Non riesce a calcolare il valore ammortizzabile dei cespiti nuovi
|
||||
{
|
||||
const int anno_acq = _cespite.get_date(CESPI_DTCOMP).year();
|
||||
if (anno_acq == _anno)
|
||||
valamm = val_amm(_cespite.sal_pro());
|
||||
}
|
||||
if (!valamm.is_zero())
|
||||
{
|
||||
TVariant qamm, qammmv;
|
||||
get_usr_val("#QAMM", qamm);
|
||||
get_usr_val("#QAMMMV", qammmv);
|
||||
percamm = CENTO * (qamm.as_real() + qammmv.as_real()) / valamm;
|
||||
percamm.round(1);
|
||||
}
|
||||
var = percamm;
|
||||
return true;
|
||||
const TRectype& rec_ammce = _cespite.amm_pro();
|
||||
real percamm = real(rec_ammce.get_real(AMMCE_PNOR) + rec_ammce.get_real(AMMCE_PACC) +
|
||||
rec_ammce.get_real(AMMCE_PANT));
|
||||
var = percamm;
|
||||
return true;
|
||||
}
|
||||
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user