Aggiunti dei cast a real per l'uso della classe real su LONGDOUBLE

git-svn-id: svn://10.65.10.50/trunk@5132 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
augusto 1997-08-29 12:49:24 +00:00
parent d1b365d2f9
commit 1c0475bb61

View File

@ -185,7 +185,7 @@ bool TForm_inventario::valorizzazione(TForm_item &cf, TTipo_valorizz t)
const TString livello(magrec.get(MAG_LIVELLO));
v=curr_art().FIFO_annuale(annoes,codmag,livello, _giaceff,_valcomp).string();
}
cf.set((v*curr_art().giacenza_corretta(magrec,_giaceff,_valcomp)).string());
cf.set(real(v*curr_art().giacenza_corretta(magrec,_giaceff,_valcomp)).string());
return TRUE;
}