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

Patch level :10.0 1030

Browse Source 
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:
luca 2011-06-20 10:25:39 +00:00
parent 43a5648aec
commit e89a3ec15a
1 changed files with 5 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
ce/ce3900.cpp
View File

@ -290,24 +290,11 @@ bool TStampa_sintetica_rep::get_usr_val(const TString& name, TVariant& var) cons
if (name == "#PERCAMM") // percentuale ammortamento if (name == "#PERCAMM") // percentuale ammortamento
{ {
real percamm; const TRectype& rec_ammce = _cespite.amm_pro();
real valamm = val_amm(_cespite.sal_ini()); real percamm = real(rec_ammce.get_real(AMMCE_PNOR) + rec_ammce.get_real(AMMCE_PACC) +
if (valamm.is_zero()) // Non riesce a calcolare il valore ammortizzabile dei cespiti nuovi rec_ammce.get_real(AMMCE_PANT));
{ var = percamm;
const int anno_acq = _cespite.get_date(CESPI_DTCOMP).year(); return true;
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;
} }