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            : stampa iscritti/dimessi: possibilitá di selezionare solo che é ancora della stessa categoria, per stampare chi si é iscritto in un periodo ed é ancora iscritto (prima stampava anche chi era giá dimesso)


git-svn-id: svn://10.65.10.50/trunk@9434 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
cris 2001-01-05 09:59:47 +00:00
parent 4ae44008da
commit 9bd426eaf9
3 changed files with 12 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
at/at2600.cpp
View File

@ -44,6 +44,7 @@ class TStampaIscritti : public TPrintapp
char _tipo_iscdim; // iscritti o dimessi char _tipo_iscdim; // iscritti o dimessi
TDate _dataini, _datafin; TDate _dataini, _datafin;
int _etlarghezza, _etcolonne; int _etlarghezza, _etcolonne;
bool _attuale;
static bool filter_func_iscritti(const TRelation* rel); static bool filter_func_iscritti(const TRelation* rel);
@ -145,7 +146,7 @@ bool TStampaIscritti::filter_func_iscritti(const TRelation * rel)
{ {
const TString16 cat = sog.get(SOG_CATDON); const TString16 cat = sog.get(SOG_CATDON);
filtrato = categorie.is_key((const char*) cat); filtrato = categorie.is_key((const char*) cat);
if (!filtrato) if ((!filtrato) && (!app()._attuale))
{ {
const TString16 catcoll = rel->lfile(-ALIAS_CTD).get("S6"); const TString16 catcoll = rel->lfile(-ALIAS_CTD).get("S6");
filtrato = categorie.is_key((const char*) catcoll); filtrato = categorie.is_key((const char*) catcoll);
@ -156,7 +157,7 @@ bool TStampaIscritti::filter_func_iscritti(const TRelation * rel)
{ {
if (app()._tipo_iscdim == ISCRITTI) if (app()._tipo_iscdim == ISCRITTI)
{ {
const TDate dataisc = sog.get(SOG_DATAISC); const TDate dataisc = sog.get_date(SOG_DATAISC);
filtrato = (dataisc >= app()._dataini && dataisc <= app()._datafin); filtrato = (dataisc >= app()._dataini && dataisc <= app()._datafin);
} }
else else
@ -312,6 +313,7 @@ bool TStampaIscritti::set_print(int m)
_tipo_iscdim = _msk->get(F_TIPO)[0]; _tipo_iscdim = _msk->get(F_TIPO)[0];
_dataini = _msk->get(F_DATAINI); _dataini = _msk->get(F_DATAINI);
_datafin = _msk->get(F_DATAFIN); _datafin = _msk->get(F_DATAFIN);
_attuale = _msk->get_bool(F_ATTUALE);
current_cursor()->set_filterfunction(filter_func_iscritti, TRUE); current_cursor()->set_filterfunction(filter_func_iscritti, TRUE);
reset_print(); reset_print();
printer().footerlen(0); printer().footerlen(0);

1
at/at2600a.h
View File

@ -26,6 +26,7 @@
#define F_TIPO 301 // iscritti o dimessi #define F_TIPO 301 // iscritti o dimessi
#define F_DATAINI 302 #define F_DATAINI 302
#define F_DATAFIN 303 #define F_DATAFIN 303
#define F_ATTUALE 304 // flag per stampare solo soggetti che sono ancora attualmente nella situazione richiesta (i/d)
#define F_ELENCO 401 #define F_ELENCO 401
#define F_ETICHETTE 402 #define F_ETICHETTE 402

7
at/at2600a.uml
View File

@ -289,5 +289,12 @@ BEGIN
PROMPT 60 11 "Al " PROMPT 60 11 "Al "
HELP "Data iscrizione o dimissione finale" HELP "Data iscrizione o dimissione finale"
END END
BOOLEAN F_ATTUALE
BEGIN
PROMPT 2 13 "Stampa solo soggetti ancora nella situazione scelta (iscritti o dimessi)"
HELP "Stampa solo i soggetti che sono ancora nella situazione scelta"
END
ENDPAGE ENDPAGE
ENDMASK ENDMASK