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

Sistemato saldaconto

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@682 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
villa 1994-11-22 11:39:16 +00:00
parent 91f21eef2a
commit 8bcb52a949
2 changed files with 10 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
cg/cg2104.cpp
View File

@ -253,7 +253,7 @@ void TPrimanota_application::aggiorna_scadenzario(const TMask& m)
{ {
pag.zap_rate(); pag.zap_rate();
for (int rata = 1; ; i++) for (int i = 0; ; i++)
{ {
// cerca rata // cerca rata
scadenza.zero(); scadenza.zero();
@ -309,7 +309,7 @@ void TPrimanota_application::aggiorna_scadenzario(const TMask& m)
set_app_data(&sh); set_app_data(&sh);
if (ms.run() == K_ENTER) if (ms.run() == K_SAVE)
{ {
// se modificato riaggiusta partite e scadenze // se modificato riaggiusta partite e scadenze
if (pag.dirty() || new_part) if (pag.dirty() || new_part)

14
cg/pagament.cpp
View File

@ -254,12 +254,14 @@ TToken_string& Pagamento::set_rata(int index, real howmuch,
// calcola percentuali e scadenze a partire dagli importi // calcola percentuali e scadenze a partire dagli importi
bool nwr = FALSE; bool nwr = FALSE;
TToken_string* tt = (TToken_string*)_rate.objptr(index); TToken_string* tt = (TToken_string*)_rate.objptr(index);
if (nwr = (tt == NULL)) tt = new TToken_string(16); if (nwr = (tt == NULL))
tt = new TToken_string(16);
TDate oldd = index > 0 ? data_rata(index -1) : _inizio; TDate oldd = index > 0 ? data_rata(index -1) : _inizio;
int day = date - oldd; int day = date - oldd;
real toshare(_tpr == 0 ? _firstr : _secndr); real toshare(_tpr == 0 ? _firstr : _secndr);
real perc = _tpr > 0 ? 0.0 : howmuch/toshare; real perc = (_tpr > 0 && index == 0) ? 0.0 : howmuch/toshare;
perc *= real(100.0);
perc.round(2); perc.round(2);
tt->add(day,0); // scadenza tt->add(day,0); // scadenza
@ -273,10 +275,10 @@ TToken_string& Pagamento::set_rata(int index, real howmuch,
if (!nwr) if (!nwr)
{ {
if (index > _rate.items()) if (index > _rate.items())
{ {
error_box("Rate non contigue"); error_box("Rate non contigue");
delete tt; delete tt;
} }
} }
else else
{ {