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

Patch level :

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            : Elenco iscritti/dimessi: corretto in caso di iscrizione seguita immediatamente da dimissione


git-svn-id: svn://10.65.10.50/trunk@6673 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
cris 1998-05-15 14:31:23 +00:00
parent 3c2d20dd48
commit 9f58f6898e
1 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
at/at2600.cpp
View File

@ -9,7 +9,8 @@
#include "at2.h"
#include "at2600a.h"
#define ALIAS_LCP 100
#define ALIAS_LCP 100 // localita' postali
#define ALIAS_CTD 700 // categoria donatori
#define ISCRITTI 'I'
enum ts { undefined = 0, elenco = 1, etichette = 2 };
@ -141,6 +142,11 @@ bool TStampaIscritti::filter_func_iscritti(const TRelation * rel)
{
const TString16 cat = sog.get(SOG_CATDON);
filtrato = categorie.is_key((const char*) cat);
if (!filtrato)
{
const TString16 catcoll = rel->lfile(-ALIAS_CTD).get("S6");
filtrato = categorie.is_key((const char*) catcoll);
}
}
// filtro per date iscrizione/dimissione
if (filtrato)
@ -275,7 +281,7 @@ bool TStampaIscritti::set_print(int m)
_tipo_iscdim = _msk->get(F_TIPO)[0];
_dataini = _msk->get(F_DATAINI);
_datafin = _msk->get(F_DATAFIN);
current_cursor()->set_filterfunction(filter_func_iscritti);
current_cursor()->set_filterfunction(filter_func_iscritti, TRUE);
reset_print();
crea_intestazione();
return TRUE;
@ -325,6 +331,7 @@ bool TStampaIscritti::user_create()
{
_rel = new TRelation(LF_SOGGETTI);
_rel->add("LCP", "CODTAB==DOM_CODLOC",1,0,ALIAS_LCP);
_rel->add("CTD", "CODTAB==CATDON",1,0,ALIAS_CTD);
_rel->add(LF_COMUNI, "COM==DOM_CODCOM");
_rel->add(LF_SEZIONI, "CODSEZ==CODSEZ|CODSOT==CODSOT");
add_cursor(new TCursor(_rel, "", 3));