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 tessere associative: aggiunto selezione per data ultima donazione


git-svn-id: svn://10.65.10.50/trunk@6686 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
cris 1998-05-25 13:15:44 +00:00
parent 1b5d640384
commit 66dd053a34
3 changed files with 19 additions and 17 deletions

21
at/at4500.cpp

@ -12,13 +12,10 @@
#include "at4500a.h"
#include "at4500.h"
//#define ALIAS_COMRES 300
//#define ALIAS_COMNAS 400
//#define ALIAS_CTN1 500
//#define ALIAS_CTN2 600
#define ALIAS_COMDOM 501
#define ALIAS_COMNAS 500
#define ALIAS_LCP 100
//#define ALIAS_CTD 800
// definizione form per tessere associative
class TTessere_form : public TForm
{
@ -42,7 +39,7 @@ class TStampaTessere : public TPrintapp
int _numdon;
bool _aggiorna;
int _cur;
TDate _data_stampa;
TDate _data_stampa, _datault;
TString _riepilogodon;
static bool filter_func_auto(const TRelation* rel);
@ -128,6 +125,8 @@ bool TStampaTessere::filter_func_auto(const TRelation* rel)
filtrato = !(sog.get_bool(SOG_T_STAMPATA));
if (filtrato)
filtrato = (sog.get_int(SOG_TOTDON) >= app()._numdon);
if (filtrato)
filtrato = (sog.get_date(SOG_DATAULTDON) > app()._datault);
if (filtrato)
{
// filtro per categorie
@ -174,6 +173,7 @@ bool TStampaTessere::set_print(int m)
filtra_sezioni();
_numdon = _msk->get_int(F_NUMDON);
_aggiorna = _msk->get_bool(F_AGGIORNA);
_datault = _msk->get_date(F_DATAULT);
//const char* filtro = format("(NUM(TOTDON>=%i)) && (T_STAMPATA!=\"X\")",_numdon);
//const char* filtro = format("T_STAMPATA!=\"X\"");
//const char* filtro = format("TOTDON>=%i",_numdon);
@ -208,14 +208,11 @@ bool TStampaTessere::set_print(int m)
bool TStampaTessere::user_create()
{
_rel = new TRelation(LF_SOGGETTI);
//_rel->add(LF_COMUNI, "COM==COMNASC",1,0,ALIAS_COMNAS);
_rel->add(LF_COMUNI, "COM==DOM_CODCOM");
_rel->add(LF_COMUNI, "COM==DOM_CODCOM",1,0,ALIAS_COMDOM);
_rel->add(LF_COMUNI, "COM==COMNASC",1,0,ALIAS_COMNAS);
_rel->add("LCP", "CODTAB==DOM_CODLOC",1,0,ALIAS_LCP);
_rel->add(LF_SEZIONI, "CODSEZ==CODSEZ|CODSOT==CODSOT");
_rel->add(LF_SEZIONI, "CODSEZ==CODSEZ|CODSOT==CODSOT");
//_rel->add("CTN", "CODTAB==CATNOND1",1,0,ALIAS_CTN1);
//_rel->add("CTN", "CODTAB==CATNOND2",1,0,ALIAS_CTN2);
//_rel->add("CTD", "CODTAB==CATDON",1,0,ALIAS_CTD);
//cursore ordinamento per sezione+sottogruppo+cognome+nome
_cur = add_cursor(new TCursor(_rel, "", 3));
_msk = new TMask("at4500a");

4
at/at4500a.h

@ -24,7 +24,7 @@
#define F_D_CAT6 212
#define F_NUMDON 301
#define F_AGGIORNA 302
#define F_DATAULT 302
#define F_AGGIORNA 303
#define F_PRINTER 401

11
at/at4500a.uml

@ -263,19 +263,24 @@ BEGIN
FLAGS "D"
END
GROUPBOX DLG_NULL 77 3
GROUPBOX DLG_NULL 77 5
BEGIN
PROMPT 1 10 "Opzioni per la stampa tessere"
END
NUMBER F_NUMDON 3
BEGIN
PROMPT 2 11 "Numero minimo di donazioni "
PROMPT 2 11 "Numero minimo di donazioni "
END
DATE F_DATAULT
BEGIN
PROMPT 2 12 "Ultima donazione successiva al "
END
BOOLEAN F_AGGIORNA
BEGIN
PROMPT 40 11 "Aggiornare archivio soggetti"
PROMPT 2 13 "Aggiornare archivio soggetti"
END
ENDPAGE