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

Correzioni da verificare da parte di ferdinando

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@2457 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1996-01-15 18:56:45 +00:00
parent 485e33f8c6
commit 0d6378dacc
1 changed files with 38 additions and 25 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

63
cg/cg2104.cpp
View File

@ -37,10 +37,10 @@ bool TPrimanota_application::pag_notify(TSheet_field& ps, int r, KEY k)
TString16 banca;
bool doit = TRUE, m_imp = FALSE, m_perc = FALSE, m_pag = FALSE;
bool m_scad = FALSE, m_tipo = FALSE, m_ulc = FALSE, mod = FALSE;
bool m_scad = FALSE, m_tipo = FALSE, m_ulc = FALSE, mod = FALSE, m_implit = FALSE;
word ahiahi = P_OK;
TString news(10), newi(15), newp(15), newt(1), newu(1);
TString news(10), newi(15), newp(15), newil(15), newt(1), newu(1);
bool recalc = msk->get_bool(FS_RECALC);
bool mcomm = msk->get_bool(FS_MCOMM);
@ -62,13 +62,18 @@ bool TPrimanota_application::pag_notify(TSheet_field& ps, int r, KEY k)
newp = ns.get(3); // Percentuale
newt = ns.get(4); // Tipo pagamento
newu = ns.get(5); // Ulteriore classificazione
if (in_valuta)
{
newil = ns.get(1);
m_implit = real(newil) != real(ts.get(1));
}
// qui viene il bello, si fa per dire
if (news != ts.get(0)) // modificata data scadenza
mod = m_scad = TRUE;
if (newp != ts.get(3)) // modificata percentuale
if (real(newp) != real(ts.get(3))) // modificata percentuale
mod = m_perc = TRUE;
if (newi != ts.get(impos)) // modificato importo
if (real(newi) != real(ts.get(impos))) // modificato importo
{
// se si modifica la percentuale l'importo non viene cagato
if ((recalc && !m_perc) || (!recalc))
@ -82,8 +87,8 @@ bool TPrimanota_application::pag_notify(TSheet_field& ps, int r, KEY k)
else if (m_tipo) {
// forza reset di ulc se si e' modificato il tipo rata
m_ulc = TRUE;
newu = "";
}
newu = "";
}
break;
case K_DEL:
@ -137,7 +142,7 @@ bool TPrimanota_application::pag_notify(TSheet_field& ps, int r, KEY k)
// see if rdiff changed
msk->set(FS_RDIFFER, pag.rate_differenziate() ? "1" : "2");
msk->set(FS_NRATE, pag.n_rate());
}
}
if (!recalc)
{
ahiahi = P_OK;
@ -166,7 +171,14 @@ 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 (ahiahi) // any error? Rimetti le righe com'erano prima
{
if (recalc)
@ -209,11 +221,12 @@ bool TPrimanota_application::pag_sheet_handler(TMask_field& f, KEY key)
ok = error_box(s);
}
const bool in_valuta = m.get(SK_VALUTA).not_empty();
real imp;
if (key == K_ENTER && m.edit_mode())
{
const bool in_valuta = m.get(SK_VALUTA).not_empty();
const real tot = m.get(in_valuta ? SK_TOTDOCVAL : F_TOTALE);
real imp;
for (int r = pag.n_rate()-1; r >= 0; r--)
imp += pag.tpay_rata(r);
if (imp != tot)
@ -232,20 +245,20 @@ bool TPrimanota_application::pag_sheet_handler(TMask_field& f, KEY key)
ok = FALSE; // Permette di guardare il risultato prima di registrare
}
}
}
if (in_valuta)
{
const real totlit = m.get(F_TOTALE);
imp = ZERO;
for (int r = pag.n_rate()-1; r >= 0; r--)
imp += pag.tlit_rata(r);
if (imp != totlit)
{
const TString is(imp.string("."));
const TString ts(totlit.string("."));
warning_box("Il totale in lire delle rate e' %s mentre\n"
"il totale del documento e' %s.");
}
if (key == K_ENTER && in_valuta)
{
const real totlit = m.get(F_TOTALE);
imp = ZERO;
for (int r = pag.n_rate()-1; r >= 0; r--)
imp += pag.tlit_rata(r);
if (imp != totlit)
{
const TString is(imp.string("."));
const TString ts(totlit.string("."));
ok = error_box("Il totale in lire delle rate e' %s mentre\n"
"il totale del documento e' %s.", (const char *)ts, (const char *)is);
}
}
}
@ -517,7 +530,7 @@ bool TPrimanota_application::ratalit_handler(TMask_field& f, KEY key)
TPagamento& pag = app().pagamento();
if (pag.in_valuta())
{
TValuta v("", TDate(), pag.cambio());
TValuta v("VAL", TDate(), pag.cambio());
const real other(f.mask().get(103));
TString16 s(v.val2lit(other).string());
f.set(s);
@ -532,8 +545,8 @@ bool TPrimanota_application::rataval_handler(TMask_field& f, KEY key)
{
TPagamento& pag = app().pagamento();
if (pag.in_valuta())
{
TValuta v("", TDate(), pag.cambio());
{
TValuta v("VAL", TDate(), pag.cambio());
const real other(f.mask().get(102));
TString16 s(v.lit2val(other).string());
f.set(s);