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

Corretto settaggio degli importi in lire

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@2459 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1996-01-16 08:16:13 +00:00
parent e5328a1857
commit a3d9cbad9c
3 changed files with 18 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
cg/cg2104.cpp
View File

@ -172,11 +172,10 @@ bool TPrimanota_application::pag_notify(TSheet_field& ps, int r, KEY k)
if (mod)
rws.row(r) = ps.row(r);
}
if (in_valuta && m_implit)
{
TToken_string& trw = pag.rata(r);
trw.add(newil, 7);
if (in_valuta && m_implit)
{
pag.set_implit(r, real(newil));
rws.row(r) = ps.row(r);
}
if (ahiahi) // any error? Rimetti le righe com'erano prima
@ -533,8 +532,8 @@ bool TPrimanota_application::ratalit_handler(TMask_field& f, KEY key)
TValuta v("VAL", TDate(), pag.cambio());
const real other(f.mask().get(103));
TString16 s(v.val2lit(other).string());
f.set(s);
}
f.set(s);
}
}
return TRUE;
}

10
cg/pagament.cpp
View File

@ -565,6 +565,16 @@ void TPagamento::set_imprata(int i, const real& r)
tt.add("", 7);
}
void TPagamento::set_implit(int i, const real& r)
{
TToken_string& tt = (TToken_string&)_rate[i];
if (_cambio != 1.0)
tt.add(r.string(), 7);
else
tt.add(r.string(), 4);
}
void TPagamento::set_percrata(int i, real r)
{
TToken_string& tt = (TToken_string&)_rate[i];

2
cg/pagament.h
View File

@ -174,6 +174,8 @@ public:
// data una rata esistente, riaggiusta gli importi usando lo slicer e
// le scadenze usando la data di inizio
void set_imprata(int i, const real& r);
// setta l'importo in lire di una rata
void set_implit(int i, const real & r);
// slicer interface
void set_total(const real& ib, const real& im, const real& sp);