Patch level : 12.0 916
Files correlati : mg1.exe lv0.exe lv1.exe lv3.exe Commento : Corretta ricostruzione saldi per clifogiac sulle dotazioni lv0.exe lv1.exe lv3.exe
This commit is contained in:
parent
ee12d7efcc
commit
d4b37ac2d5
@ -741,7 +741,8 @@ int TArticolo_lavanderie::find_clifomag(int annoes, const char * livello, int fr
|
|||||||
TRecord_array & TArticolo_lavanderie::clifomag(int annoes) const
|
TRecord_array & TArticolo_lavanderie::clifomag(int annoes) const
|
||||||
{
|
{
|
||||||
const int es = annoes > 0 ? annoes : esercizi().last_mag();
|
const int es = annoes > 0 ? annoes : esercizi().last_mag();
|
||||||
const int esprec = esercizi().pred(annoes);
|
/*
|
||||||
|
const int esprec = esercizi().pred(annoes);
|
||||||
|
|
||||||
if (esprec != 0)
|
if (esprec != 0)
|
||||||
{
|
{
|
||||||
@ -769,7 +770,7 @@ TRecord_array & TArticolo_lavanderie::clifomag(int annoes) const
|
|||||||
{
|
{
|
||||||
TRecmag_lavanderie & rec = (TRecmag_lavanderie &) recarr[r];
|
TRecmag_lavanderie & rec = (TRecmag_lavanderie &) recarr[r];
|
||||||
TRecmag_lavanderie & old = (TRecmag_lavanderie &) recarrprec[r1];
|
TRecmag_lavanderie & old = (TRecmag_lavanderie &) recarrprec[r1];
|
||||||
::update_clifogiac(rec, old);
|
// ::update_clifogiac(rec, old);
|
||||||
recarrprec.destroy_row(r1, true);
|
recarrprec.destroy_row(r1, true);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
@ -785,9 +786,20 @@ TRecord_array & TArticolo_lavanderie::clifomag(int annoes) const
|
|||||||
return recarr;
|
return recarr;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
*/
|
||||||
((TArticolo_lavanderie*)this)->set_anno_lav(es);
|
((TArticolo_lavanderie*)this)->set_anno_lav(es);
|
||||||
TRecord_array & recarr = body(LF_CLIFOGIAC);
|
TRecord_array & recarr = body(LF_CLIFOGIAC);
|
||||||
|
|
||||||
|
if (recarr.rows() == 0)
|
||||||
|
{
|
||||||
|
const int esprec = esercizi().pred(annoes);
|
||||||
|
|
||||||
|
((TArticolo_lavanderie*)this)->set_anno_lav(esprec);
|
||||||
|
|
||||||
|
TRecord_array & recarr = body(LF_CLIFOGIAC);
|
||||||
|
|
||||||
|
return recarr;
|
||||||
|
}
|
||||||
return recarr;
|
return recarr;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user