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

Aggiunte segnalazioni di errore da non ricalcolo, eliminato ricalcolo

Browse Source 
ricorsivo in interattivo


git-svn-id: svn://10.65.10.50/trunk@829 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
villa 1995-01-05 12:44:53 +00:00
parent a23ef0bbc4
commit 0b11a22a09
3 changed files with 42 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
cg/cg4301.cpp
View File

@ -51,10 +51,16 @@ bool TLiquidazione_app::recalc_all()
if (!look_lim(m)) need_refresh = TRUE; if (!look_lim(m)) need_refresh = TRUE;
else if (!(_lim->get_bool("B0"))) need_refresh = TRUE; else if (!(_lim->get_bool("B0"))) need_refresh = TRUE;
} }
if (need_refresh) if (need_refresh)
if (yesno_box("Alcuni mesi precedenti non risultano ricalcolati. E' " {
"consigliabile il ricalcolo. Si desidera eseguirlo?")) if (_is_interactive)
_recalc = ever; {
if (yesno_box("Alcuni mesi precedenti non risultano ricalcolati. E' "
"consigliabile il ricalcolo. Si desidera eseguirlo?"))
_recalc = ever;
}
else _recalc = needed;
}
} }
if (_recalc == ever) if (_recalc == ever)

26
cg/cg4302.cpp
View File

@ -387,8 +387,15 @@ real TLiquidazione_app::credito_prec(int month)
bool ok = look_lim(previous_month(month)); bool ok = look_lim(previous_month(month));
if (!ok || !_lim->get_bool("B0")) if (!ok || !_lim->get_bool("B0"))
{ {
update_firm(previous_month(month), FALSE); if (_recalc != needed)
look_lim(previous_month(month)); {
describe_error("Ricalcolo non eseguito: possibili errori credito precedente","ALL");
}
else
{
update_firm(previous_month(month), FALSE);
look_lim(previous_month(month));
}
} }
// toglie il rimborso chiesto // toglie il rimborso chiesto
c = _lim->get_real("R0") + _lim->get_real("R1"); c = _lim->get_real("R0") + _lim->get_real("R1");
@ -422,10 +429,17 @@ real TLiquidazione_app::credito_costo_prec(int month, const char* codatt)
{ {
bool ok = look_lim(previous_month(month)); bool ok = look_lim(previous_month(month));
if (!ok || !_lim->get_bool("B0")) if (!ok || !_lim->get_bool("B0"))
{ {
// Super Prassi a questo punto vorrebbe una update_firm if (_recalc != needed)
update_att(previous_month(month), codatt, FALSE); {
look_lim(previous_month(month)); describe_error("Ricalcolo non eseguito: possibili errori credito di costo","ALL");
}
else
{
// Super Prassi a questo punto vorrebbe una update_firm
update_att(previous_month(month), codatt, FALSE);
look_lim(previous_month(month));
}
} }
// qui il rimborso non c'e' // qui il rimborso non c'e'
c = _lim->get_real("R2"); c = _lim->get_real("R2");

15
cg/cg4303.cpp
View File

@ -55,12 +55,21 @@ void TLiquidazione_app::zero_plafond (int month, const char* codatt)
// si ricalcola tutto // si ricalcola tutto
if (!look_ppa(previous_month(month),codatt,jj)) if (!look_ppa(previous_month(month),codatt,jj))
// mazza che bella chiamata ricorsiva // mazza che bella chiamata ricorsiva
{ {
if (!update_att(previous_month(month),codatt, FALSE)) if (_recalc != needed)
{
describe_error("Progressivi plafond non ricalcolati per " describe_error("Progressivi plafond non ricalcolati per "
"i mesi precedenti: possibili errori", "i mesi precedenti: possibili errori",
codatt); codatt);
look_ppa(previous_month(month),codatt,jj); }
else
{
if (!update_att(previous_month(month),codatt, FALSE))
describe_error("Progressivi plafond non ricalcolati per "
"i mesi precedenti: possibili errori",
codatt);
look_ppa(previous_month(month),codatt,jj);
}
} }
r = _ppa_r->get_real("R2") - r = _ppa_r->get_real("R2") -
_ppa_r->get_real("R0") - _ppa_r->get_real("R0") -