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

Aggiunto interesse trimestrale nelle deleghe

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@833 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
villa 1995-01-09 08:40:57 +00:00
parent 904dffc045
commit 0c619f7d4f
3 changed files with 16 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
cg/cg4301.cpp
View File

@ -846,9 +846,15 @@ void TLiquidazione_app::write_liq(int month, const char* codatts)
risultato -= dt; risultato -= dt;
ris_cred += dt; ris_cred += dt;
_lim->put("R0",risultato); _lim->put("R0",risultato);
_lim->put("R7",ris_cred);
_lim->put("R8",ris_deb); if (_freqviva == "T" && risultato.sign() > 0)
{
real interesse = interesse_trimestrale(_month);
real ivi = risultato * interesse / CENTO; ivi.ceil(ROUND_LIRA);
_lim->put("R7",ivi);
}
_lim->put("B0","X"); _lim->put("B0","X");
_lim->rewrite(); _lim->rewrite();

6
cg/cg4305.cpp
View File

@ -116,24 +116,30 @@ bool TLiquidazione_app::extract_delega(int month)
if (look_lim(month)) if (look_lim(month))
{ {
real topay = _lim->get_real("R0"); real topay = _lim->get_real("R0");
real intr = _lim->get_real("R7");
if (topay.sign() <= 0) return TRUE; if (topay.sign() <= 0) return TRUE;
if (_isannual) if (_isannual)
{ {
if (look_del(12,7)) if (look_del(12,7))
{ {
topay -= _del->get_real("R0"); topay -= _del->get_real("R0");
intr -= _del->get_real("R1");
} }
} }
else else
{ {
// importo rettifiche solo se non e' annuale // importo rettifiche solo se non e' annuale
topay += _lim->get_real("R5"); topay += _lim->get_real("R5");
intr += _del->get_real("R1");
} }
if (topay.sign() > 0) if (topay.sign() > 0)
{ {
look_del(month, _isannual ? 2 : 1, TRUE); look_del(month, _isannual ? 2 : 1, TRUE);
_del->put("R0",topay); _del->put("R0",topay);
_del->put("R1",intr);
_del->rewrite(); _del->rewrite();
} }
} }

2
cg/cg5500d.uml
View File

@ -2,7 +2,7 @@
TOOLBAR "" 0 20 0 2 TOOLBAR "" 0 20 0 2
#include <toolbar.h> #include "cg5500t.h"
ENDPAGE ENDPAGE