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

Patch level :2.0 467

Browse Source 
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
db/dblib.cpp
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 real TQuantita::base_val() const
{ {
TCodice_um dummy; TCodice_um dummy;

2
db/dblib.h
View File

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