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

Patch level : 12.00 1394

Browse Source 
Files correlati     : ca3.exe

Commento:
Corretta selezione commesse attive
This commit is contained in:
Alessandro Bonazzi 2025-05-12 23:30:07 +02:00
parent 366f5eccd8
commit ba7dcc8f09
1 changed files with 12 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
src/ca/ca3700.cpp
View File

@ -1570,8 +1570,7 @@ void TPrint_rendiconto_ca_recordset::crea_righe_da_rmovana(TLocalisamfile& tmp,
cur_rmovana.freeze();
const TRectype& rmovana = cur_rmovana.curr();
// const TRectype& movana = rel_rmovana.curr(LF_MOVANA);
const long numreg = rmovana.get_long(RMOVANA_NUMREG);
const TRectype & movana = cache().get(LF_MOVANA, numreg);
TProgress_monitor pi((long)rmovana_items, "Scansione righe movimenti...", true);
//aggiunta adolfica di implosione righe movimenti eventualmente ripartite in precedenza..
@ -1589,6 +1588,7 @@ void TPrint_rendiconto_ca_recordset::crea_righe_da_rmovana(TLocalisamfile& tmp,
{
//legge la testata iniziale
const long numreg = rmovana.get_long(RMOVANA_NUMREG);
const TRectype & movana = cache().get(LF_MOVANA, numreg);
//se la testata e' cambiata, allora ha cambiato movana e quindi le righe da compattare sono..
//..quelle che ha gia' messo nell'array delle righe_attuali
@ -1622,23 +1622,22 @@ void TPrint_rendiconto_ca_recordset::crea_righe_da_rmovana(TLocalisamfile& tmp,
}
else //if(_implode_rows.. metodo standard senza ripartizioni
{
for (cur_rmovana = 0; cur_rmovana.pos() < rmovana_items; ++cur_rmovana)
for (cur_rmovana = 0; pi.addstatus(1) && cur_rmovana.pos() < rmovana_items; ++cur_rmovana)
{
if (!pi.addstatus(1))
break;
const TString & cms = cur_rmovana.curr().get(RMOVANA_CODCMS);
const TString & cms = rmovana.get(RMOVANA_CODCMS);
const long numreg = rmovana.get_long(RMOVANA_NUMREG);
const TRectype & movana = cache().get(LF_MOVANA, numreg);
if (cms != _codcms)
{
if (cms == _codcms)
scrive_riga(tmp, rmovana, movana, NULL, log);
#ifdef DBG
TString msg; msg << "Mov - Commessa " << _codcms << " - Scartato " << movana.get(MOVANA_DCODNUM) << "." << movana.get_int(MOVANA_DANNO) << "." << movana.get_int(MOVANA_DNDOC) << " - Commessa " << cms;
else
{
TString msg; msg << "Mov - Commessa " << _codcms << " - Scartato " << movana.get(MOVANA_DCODNUM) << "." << movana.get_int(MOVANA_DANNO) << "." << movana.get_int(MOVANA_DNDOC) << " - Commessa " << cms;
log.log(2, msg);
#endif
continue;
}
scrive_riga(tmp, rmovana, movana, NULL, log);
#endif
}
}
}