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

Porcata visualizzazione

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@1654 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
villa 1995-07-28 10:38:46 +00:00
parent 3821817225
commit 81a8e899ca
2 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
cg/cg4304.cpp
View File

@ -774,7 +774,7 @@ void TLiquidazione_app::describe_liq(int month, const char* codatts,
// aggiunge eventuale satellite per rimborso infraannuale // aggiunge eventuale satellite per rimborso infraannuale
if (di != NULL) if (di != NULL)
{ {
if (d._r0->sign() < 0) if (d->_r0.sign() < 0)
d->_arr.add(di); d->_arr.add(di);
else delete di; else delete di;
} }

8
cg/cg5500.cpp
View File

@ -845,7 +845,7 @@ void Visliq_app::recalc_liq_data(TViswin* vsw, real& rimb, real& rett, real& ver
// non scrive e si sciroppa la viswin // non scrive e si sciroppa la viswin
TString256 ln; TString256 ln;
ln.spaces(); ln.spaces(); ln.cut(136);
// determina righe da cambiare // determina righe da cambiare
// una sburlata di search ...... // una sburlata di search ......
@ -853,7 +853,6 @@ void Visliq_app::recalc_liq_data(TViswin* vsw, real& rimb, real& rett, real& ver
long lvers = -1l; long lvers = -1l;
long line = vsw->search("CALCOLO LIQUIDAZIONE D'IMPOSTA", x); long line = vsw->search("CALCOLO LIQUIDAZIONE D'IMPOSTA", x);
int wasdebt = ris.sign(); int wasdebt = ris.sign();
long lrivr = vsw->search("Versamenti effettuati",x,line,TRUE);
long lrisd = vsw->search("RISULTATO", x, line, TRUE); // RISULTATO a debito long lrisd = vsw->search("RISULTATO", x, line, TRUE); // RISULTATO a debito
long lrisc = vsw->search("RISULTATO", x, lrisd+1l, TRUE); // credito long lrisc = vsw->search("RISULTATO", x, lrisd+1l, TRUE); // credito
long lrettc = vsw->search("Rettifiche IVA a credito",x,line,TRUE); long lrettc = vsw->search("Rettifiche IVA a credito",x,line,TRUE);
@ -862,6 +861,7 @@ void Visliq_app::recalc_liq_data(TViswin* vsw, real& rimb, real& rett, real& ver
long lrimb = vsw->search("Iva chiesta a rimborso",x,line,TRUE); long lrimb = vsw->search("Iva chiesta a rimborso",x,line,TRUE);
long lintr = vsw->search("Interesse",x,line,TRUE); long lintr = vsw->search("Interesse",x,line,TRUE);
long livdv = vsw->search("IVA DOVUTA",x,line,TRUE); long livdv = vsw->search("IVA DOVUTA",x,line,TRUE);
long lrivr = vsw->search("Versamenti effettuati",x,line,TRUE);
if (wasdebt != 0) if (wasdebt != 0)
lvers = vsw->search(wasdebt < 0 ? "CREDITO ATTUALE" : "IVA DA VERSARE", lvers = vsw->search(wasdebt < 0 ? "CREDITO ATTUALE" : "IVA DA VERSARE",
@ -876,7 +876,6 @@ void Visliq_app::recalc_liq_data(TViswin* vsw, real& rimb, real& rett, real& ver
vsw->replace(lrisd, risdb.string("###.###.###.###"), 75); vsw->replace(lrisd, risdb.string("###.###.###.###"), 75);
vsw->replace(lrisc, riscr.string("###.###.###.###"), 58); vsw->replace(lrisc, riscr.string("###.###.###.###"), 58);
vsw->replace(lacct, acc.string("###.###.###.###"), 58); vsw->replace(lacct, acc.string("###.###.###.###"), 58);
vsw->replace(lrivr, vers.string("###.###.###.###"), 58);
if (rett.sign() > 0) if (rett.sign() > 0)
{ {
@ -914,8 +913,9 @@ void Visliq_app::recalc_liq_data(TViswin* vsw, real& rimb, real& rett, real& ver
ln.overwrite("IVA DA VERSARE", 23); ln.overwrite("IVA DA VERSARE", 23);
ln.overwrite(risul.string("###.###.###.###"), 75); ln.overwrite(risul.string("###.###.###.###"), 75);
} }
vsw->replace(lvers, ln, 0); vsw->replace(lvers, ln, 0);
vsw->replace(lrivr, vers.string("###.###.###.###"), 58);
vsw->refresh(); vsw->refresh();
} }