Patch level :2.0 467

Files correlati     :
Ricompilazione Demo : [ ]
Commento            :aggiunto il metodo currency2um()


git-svn-id: svn://10.65.10.50/trunk@11100 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2003-05-09 09:58:57 +00:00
parent aa4797126c
commit e6e9e59e1c
2 changed files with 16 additions and 0 deletions

View File

@ -118,6 +118,20 @@ void TQuantita::convert2umbase()
}
}
void TQuantita::currency2umbase(TCurrency& val) const
{
TCodice_um ub;
find_umbase(ub);
if (_um != ub && !val.is_zero())
{
const fraction& mul = get_factor(_um);
const fraction& div = get_factor(ub);
const real v = fraction(val.get_num(), UNO) * mul / div;
val.set_num(v);
}
}
real TQuantita::base_val() const
{
TCodice_um dummy;

View File

@ -191,6 +191,8 @@ public:
void convert2umbase();
void convert2umdist();
void currency2umbase(TCurrency& val) const;
TQuantita();
TQuantita(const TQuantita& q);
TQuantita(const TString& art, const TString& um, const real& val);