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

Corretti errori liquidazione

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@1600 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
nik 1995-07-17 09:31:47 +00:00
parent 6911723db1
commit b47e760e42
3 changed files with 2997 additions and 3001 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
cg/cg4300.cpp
View File

@ -42,7 +42,7 @@ bool TLiquidazione_app::user_create()
TMessage* msg = mail.next_s("RCL");
TToken_string subj(36);
_is_interactive = msg == NULL;
bool recalc_only = FALSE;
_recalc_only = FALSE;
bool is_header = TRUE;
int headerlen;
TDate printdate;
@ -206,7 +206,7 @@ bool TLiquidazione_app::user_create()
if (!_is_interactive)
{
TTemp_window w(TASK_WIN);
if (recalc_only)
if (_recalc_only)
_isprint = FALSE;
//else printer().set_export_file(filename, is_header, headerlen);
else printer().set_export_file(filename, is_header);
@ -250,7 +250,7 @@ bool TLiquidazione_app::user_create()
if (is_month_plain(mese) || _recalc == ever)
update_firm(mese);
if (is_month_ok_strict(_month) || _month == 13)
if (is_month_plain(_month) || _month == 13)
update_firm(_month);
if (_isprint && _descr_arr.items() > 0)

14
cg/cg4301.cpp
View File

@ -106,7 +106,6 @@ bool TLiquidazione_app::recalc_all()
_recalc = ever;
}
for (int m = 1; m <= _month; m++) // fino a 13 compreso
if (is_month_plain(m) || _recalc == ever)
{
@ -259,7 +258,7 @@ bool TLiquidazione_app::update_firm(int month, bool recalc)
for (_reg->first(); _reg->good(); _reg->next())
{
if (codatt == _reg->get("S8") || quater) // TBC quater: e' una pezza ma andra' cambiato
if (codatt == _reg->get("S8") || quater)
{
if (!riepliq) riepliq = _reg->get_bool("B6");
if (!stliq) stliq = _reg->get_bool("B7");
@ -370,7 +369,7 @@ void TLiquidazione_app::zero_att(int month, const char* codatt)
{
int m = atoi(*_pim_mese);
TString att = (const char*)*_pim_codatt;
if (m == month && att == codatt)
if (m == month && att == codatt && (_year == *_pim_anno))
{
_pim->put("R0","");
_pim->put("R1","");
@ -441,7 +440,7 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt)
real esenti_b2 = 0.0;
real esenti_b3 = 0.0;
real esenti_b14 = 0.0;
real esni_rimb = 0.0; // ci sommo tutti esenti e ni validi per rimborso
real esni_rimb = 0.0; // ci sommo tutti esenti e ni validi per rimborso
real corr_CEE = 0.0;
real corr_noCEE = 0.0;
real acq_CEE = 0.0;
@ -495,9 +494,6 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt)
const TRectype& rcs = _cur->curr(LF_CAUSALI);
const bool fattrit = rcs.get_bool("RITFATT");
// for degiubbing only
int numreg = _rmoviva->get_int("NUMREG");
if (dok || sreg || rs8 || cmt) continue;
/*
@ -836,7 +832,7 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt)
// Fine casi particolari
// Non che i casi normali siano tanto meglio
// *****************************************
} // non sosp_imp
} // non sosp_imp ne' altre casistiche che escludono la liq.
/*
* Calcolo e aggiornamento
* cerca o crea progressivo IVA
@ -1645,7 +1641,7 @@ void TLiquidazione_app::write_liq(int month, const char* codatts)
}
// questo serve anche per la visualizzazione e per l'estrazione deleghe
if (_freqviva == "T" && month != 13 && !_isbenzinaro)
if (_isintr && month < 13)
_lim->put("R10",interesse_trimestrale(_month));
// totale conguaglio su tutte le attivita'