Patch level :

Files correlati     :
Ricompilazione Demo : [ ]
Commento            : Stampa etichette per categorie: corretto funzionamento famiglie (sbagliava il comune nei nuclei famigliari)


git-svn-id: svn://10.65.10.50/trunk@7138 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
cris 1998-09-25 13:05:55 +00:00
parent f4561cc153
commit 5d7df3b5f8

View File

@ -268,13 +268,13 @@ void TStampaPerCategorie::set_page(int file, int cnt)
avanza = !(preprocess_page(file, cnt));
else
avanza = FALSE;
if (avanza)
if (avanza)
++(*current_cursor());
}
force_setpage(TRUE);
TForm_item& cognome = corpo.find_field(ETI_COGNOME);
cognome.set(_cognome_nome);
corpo.update();
corpo.update();
for (word i = 0; i < corpo.height(); i++)
{
TPrintrow& riga = corpo.row(i);
@ -648,7 +648,7 @@ bool TStampaPerCategorie::preprocess_page(int file, int counter)
const int err = _sfamiglia->read(key);
if (err == NOERR)
{
current_cursor()->save_status();
TRecnotype pos = current_cursor()->pos();
// controllo se qualcuno che lo precede nella famiglia rientra
// nella selezione, in questo caso ho gia' stampato la famiglia
// che viene stampata quando incontro il primo componente che
@ -728,8 +728,8 @@ bool TStampaPerCategorie::preprocess_page(int file, int counter)
}
_cognome_nome = cognome;
}
}
current_cursor()->restore_status();
}
(*current_cursor()) = pos;
if (!dastampare)
return FALSE;
}
@ -897,7 +897,7 @@ bool TStampaPerCategorie::set_print(int m)
_catnondon.add((const char*) catnqui);
if (catnses.not_empty() && catnses.ok())
_catnondon.add((const char*) catnses);
current_cursor()->set_filterfunction (filter_func_percat);
current_cursor()->set_filterfunction (filter_func_percat, TRUE);
reset_print();
printer().footerlen(0);
crea_intestazione();