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

Patch level : 10

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            : sistemato errore attribuzione benemerenze e aggiunto nati all'estero nella stampa frequenze


git-svn-id: svn://10.65.10.50/branches/R_10_00@21037 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
cris 2010-10-20 13:52:44 +00:00
parent 83f4f9e0d7
commit 36023c054f
4 changed files with 32 additions and 2 deletions

2
at/at1200.cpp

@ -330,6 +330,7 @@ bool TAttribuzioneBenemerenze::set_print(int)
donxanno = 4;
numdon += donxanno;
donxanno = 0;
anno = datadon.year();
}
donxanno++;
int eta = datadon.year() - datanasc.year();
@ -352,6 +353,7 @@ bool TAttribuzioneBenemerenze::set_print(int)
donxanno = 4;
numdon += donxanno;
}
if (_prevista)
{
// aggiungo le donazioni che puo' fare da oggi alla data elaborazione

9
at/at2900.cpp

@ -56,6 +56,7 @@ class TFrequenza : public TPrintapp
bool _stampa80, _ctrltotale;
int _contatore, _totale;
char _condizione, _sesso;
bool _natiestero;
protected:
virtual bool user_create();
@ -184,9 +185,15 @@ bool TFrequenza::filter_func_freq(const TRelation* rel)
const TDate datanulla(NULLDATE);
bool filtrato = TRUE;
TLocalisamfile& sog = rel->lfile();
// filtro per sesso
if (app()._sesso != 'I')
filtrato = (sog.get(SOG_SESSO)[0] == app()._sesso);
// filtro per nati all'estero
if (filtrato && app()._natiestero)
filtrato = (sog.get(SOG_COMNASC)[0] == 'Z');
// filtro per data nascita
if (filtrato)
{
@ -560,6 +567,8 @@ void TFrequenza::crea_intestazione()
sep << ' ' << _tipodon5;
sep << " DAL " << _dataini.string();
sep << " AL " << _datafin.string();
if (app()._natiestero)
sep << " *NATI ALL'ESTERO*";
if (_stampa80)
sep.center_just(80);
else

5
at/at2900a.h

@ -39,9 +39,10 @@
#define F_D_TIPODON5 314
#define F_SESSO 351
#define F_DNINI 352
#define F_DNFIN 353
#define F_DNINI 352
#define F_DNFIN 353
#define F_ORDINA 354
#define F_NATIESTERO 355
#define F_ELENCO 401
#define F_ETICHETTE 402

18
at/at2900a.uml

@ -409,12 +409,30 @@ BEGIN
ITEM "2|Femmine"
END
DATE F_DNINI
BEGIN
PROMPT 29 17 "Nati dal "
HELP "Data di nascita iniziale"
END
DATE F_DNFIN
BEGIN
PROMPT 50 17 "al "
HELP "Data di nascita finale"
END
LISTBOX F_ORDINA 10
BEGIN
PROMPT 2 18 "Ordinamento per sez./sott. e "
ITEM "A|Alfabetico"
ITEM "C|Cap"
END
BOOLEAN F_NATIESTERO
BEGIN
PROMPT 2 19 "Stampa SOLO nati all'estero"
END
ENDPAGE
ENDMASK