Patch level :
Files correlati : Ricompilazione Demo : [ ] Commento : Statistiche: in tutte possibilita' di selezionare solo il riepilogo finale, se stampa una sola sezione non mi fa il riepilogo finale git-svn-id: svn://10.65.10.50/trunk@7903 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
4212a16944
commit
4c1e0aa5c7
@ -93,6 +93,8 @@ class TStatSogxEta : public TApplication
|
||||
TString16 _catdon;
|
||||
TDate _data;
|
||||
TArray _etaini, _etafin;
|
||||
bool _solotot;
|
||||
int _sezionistampate;
|
||||
|
||||
protected:
|
||||
virtual bool create();
|
||||
@ -208,6 +210,7 @@ bool TStatSogxEta::menu(MENU_TAG m)
|
||||
_sotfin = _msk->get(F_SOTFIN);
|
||||
_catdon = _msk->get(F_CATDON);
|
||||
_data = _msk->get_date(F_DATA);
|
||||
_solotot = msk.get_bool(F_SOLOTOT);
|
||||
TSheet_field& s = (TSheet_field&)_msk->field(F_FASCIE);
|
||||
for (int r=0; r<s.items(); r++)
|
||||
{
|
||||
@ -275,6 +278,7 @@ bool TStatSogxEta::stampa()
|
||||
{
|
||||
if (printer().open())
|
||||
{
|
||||
_sezionistampate = 0;
|
||||
crea_intestazione();
|
||||
TRelation* relstat = new TRelation(LF_ATSTATS);
|
||||
TCursor* curstat = new TCursor(relstat, "", 1);
|
||||
@ -334,9 +338,17 @@ void TStatSogxEta::stampa_sezione(TString16 codsez, TString16 codsot)
|
||||
TPrintrow row;
|
||||
TString256 rigastampa;
|
||||
if (codsez == "ZZ" && codsot == "ZZ")
|
||||
rigastampa = "RIEPILOGO TOTALE PER TUTTE LE SEZIONI STAMPATE";
|
||||
{
|
||||
if (_sezionistampate != 1)
|
||||
{
|
||||
//rigastampa = "RIEPILOGO TOTALE PER TUTTE LE SEZIONI STAMPATE";
|
||||
rigastampa = "";
|
||||
rigastampa << "RIEPILOGO TOTALE SEZIONI DA " << _sezini << '/' << _sotini << " A " << _sezfin << '/' << _sotfin;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
_sezionistampate++;
|
||||
rigastampa = "Sezione: ";
|
||||
rigastampa << codsez;
|
||||
if (codsot.not_empty())
|
||||
@ -362,6 +374,8 @@ void TStatSogxEta::stampa_sezione(TString16 codsez, TString16 codsot)
|
||||
}
|
||||
}
|
||||
}
|
||||
if ((codsez == "ZZ" && codsot == "ZZ" && _sezionistampate != 1) || (codsez != "ZZ"))
|
||||
{
|
||||
rigastampa.center_just(120);
|
||||
row.put(rigastampa);
|
||||
printer().setheaderline(1, row);
|
||||
@ -473,6 +487,7 @@ void TStatSogxEta::stampa_sezione(TString16 codsez, TString16 codsot)
|
||||
printer().print(row);
|
||||
printer().formfeed();
|
||||
}
|
||||
}
|
||||
|
||||
bool TStatSogxEta::riepilogo()
|
||||
{
|
||||
@ -596,6 +611,8 @@ bool TStatSogxEta::riepilogo()
|
||||
if (sesso.empty())
|
||||
sesso = "9";
|
||||
if (fascia != -1)
|
||||
{
|
||||
if (!_solotot)
|
||||
{
|
||||
stat.zero();
|
||||
stat.put(ATSS_CODSEZ, codsez);
|
||||
@ -619,6 +636,7 @@ bool TStatSogxEta::riepilogo()
|
||||
stat.put(ATSS_NUMERO, numero);
|
||||
stat.write();
|
||||
}
|
||||
}
|
||||
stat.zero();
|
||||
stat.put(ATSS_CODSEZ, "ZZ");
|
||||
stat.put(ATSS_CODSOT, "ZZ");
|
||||
|
@ -13,7 +13,8 @@
|
||||
#define F_CATDON 301
|
||||
#define F_D_CATDON 302
|
||||
#define F_DATA 303
|
||||
#define F_FASCIE 304
|
||||
#define F_SOLOTOT 304
|
||||
#define F_FASCIE 305
|
||||
|
||||
#define F_ETAINI 101
|
||||
#define F_ETAFIN 102
|
||||
|
@ -158,14 +158,19 @@ BEGIN
|
||||
PROMPT 25 9 "per tutte le categorie non di dimissione"
|
||||
END
|
||||
|
||||
BOOLEAN F_SOLOTOT
|
||||
BEGIN
|
||||
PROMPT 2 7 "Stampa solo totale finale (non stampa il dettaglio per sezione)"
|
||||
END
|
||||
|
||||
TEXT DLG_NULL
|
||||
BEGIN
|
||||
PROMPT 2 7 "Fascie di eta'"
|
||||
PROMPT 2 8 "Fascie di eta'"
|
||||
END
|
||||
|
||||
SPREADSHEET F_FASCIE 15 9
|
||||
BEGIN
|
||||
PROMPT 3 8 ""
|
||||
PROMPT 3 9 ""
|
||||
ITEM "Da "
|
||||
ITEM "A "
|
||||
END
|
||||
|
@ -92,6 +92,8 @@ class TMensileDonxGr : public TApplication
|
||||
TAssoc_array* _colonne;
|
||||
TArray _righe; // array per riepilogo donazioni
|
||||
TString16 _sezini, _sotini, _sezfin, _sotfin, _tipodon;
|
||||
bool _solotot;
|
||||
int _sezionistampate;
|
||||
|
||||
protected:
|
||||
virtual bool create();
|
||||
@ -301,6 +303,7 @@ bool TMensileDonxGr::menu(MENU_TAG m)
|
||||
_sezfin = _msk->get(F_SEZFIN);
|
||||
_sotfin = _msk->get(F_SOTFIN);
|
||||
_tipodon = _msk->get(F_TIPODON);
|
||||
_solotot = msk.get_bool(F_SOLOTOT);
|
||||
if (riepilogo())
|
||||
stampa();
|
||||
}
|
||||
@ -314,10 +317,10 @@ void TMensileDonxGr::crea_intestazione()
|
||||
sep = "MENSILE DONAZIONI PER GRUPPO E RH";
|
||||
if (!_tipodon.blank())
|
||||
sep << " - TIPO DONAZIONI " << _tipodon;
|
||||
sep.center_just(80);
|
||||
sep.center_just(101);
|
||||
row.put(sep);
|
||||
row.put("@>", 1);
|
||||
row.put("Pag. @#", 70);
|
||||
row.put("Pag. @#", 90);
|
||||
printer().setheaderline(2, row);
|
||||
row.reset();
|
||||
sep = "";
|
||||
@ -331,7 +334,7 @@ void TMensileDonxGr::crea_intestazione()
|
||||
sep << " al ";
|
||||
sep << _datafin.string();
|
||||
}
|
||||
sep.center_just(80);
|
||||
sep.center_just(101);
|
||||
row.put(sep);
|
||||
printer().setheaderline(3, row);
|
||||
row.reset();
|
||||
@ -343,7 +346,7 @@ void TMensileDonxGr::crea_intestazione()
|
||||
row.put(sep);
|
||||
printer().setheaderline(5, row);
|
||||
sep = "";
|
||||
sep.fill('-',80);
|
||||
sep.fill('-',101);
|
||||
row.reset();
|
||||
row.put(sep);
|
||||
printer().setheaderline(6, row);
|
||||
@ -353,6 +356,7 @@ bool TMensileDonxGr::stampa()
|
||||
{
|
||||
if (printer().open())
|
||||
{
|
||||
_sezionistampate = 0;
|
||||
crea_intestazione();
|
||||
TRelation* relstat = new TRelation(LF_ATSTATD);
|
||||
TCursor* curstat = new TCursor(relstat, "", 1);
|
||||
@ -427,9 +431,17 @@ void TMensileDonxGr::stampa_sezione(TString16 codsez, TString16 codsot)
|
||||
TPrintrow row;
|
||||
TString256 rigastampa;
|
||||
if (codsez == "ZZ" && codsot == "ZZ")
|
||||
rigastampa = "RIEPILOGO TOTALE PER TUTTE LE SEZIONI STAMPATE";
|
||||
{
|
||||
if (_sezionistampate != 1)
|
||||
{
|
||||
//rigastampa = "RIEPILOGO TOTALE PER TUTTE LE SEZIONI STAMPATE";
|
||||
rigastampa = "";
|
||||
rigastampa << "RIEPILOGO TOTALE SEZIONI DA " << _sezini << '/' << _sotini << " A " << _sezfin << '/' << _sotfin;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
_sezionistampate++;
|
||||
rigastampa = "Sezione: ";
|
||||
rigastampa << codsez;
|
||||
if (codsot.not_empty())
|
||||
@ -455,7 +467,9 @@ void TMensileDonxGr::stampa_sezione(TString16 codsez, TString16 codsot)
|
||||
}
|
||||
}
|
||||
}
|
||||
rigastampa.center_just(80);
|
||||
if ((codsez == "ZZ" && codsot == "ZZ" && _sezionistampate != 1) || (codsez != "ZZ"))
|
||||
{
|
||||
rigastampa.center_just(101);
|
||||
row.put(rigastampa);
|
||||
printer().setheaderline(1, row);
|
||||
|
||||
@ -501,7 +515,7 @@ void TMensileDonxGr::stampa_sezione(TString16 codsez, TString16 codsot)
|
||||
}
|
||||
// stampa totali per sezione
|
||||
rigastampa = "";
|
||||
rigastampa.fill('-',80);
|
||||
rigastampa.fill('-',101);
|
||||
row.reset();
|
||||
row.put(rigastampa);
|
||||
printer().print(row);
|
||||
@ -525,6 +539,7 @@ void TMensileDonxGr::stampa_sezione(TString16 codsez, TString16 codsot)
|
||||
printer().print(row);
|
||||
printer().formfeed();
|
||||
}
|
||||
}
|
||||
|
||||
bool TMensileDonxGr::riepilogo()
|
||||
{
|
||||
@ -614,6 +629,8 @@ bool TMensileDonxGr::riepilogo()
|
||||
mese = datadon.month();
|
||||
gruppo = recsog.get(SOG_GRUPPOAB0);
|
||||
rh = recsog.get(SOG_RHANTID);
|
||||
if (!_solotot)
|
||||
{
|
||||
stat.zero();
|
||||
stat.put(ATS_CODSEZ, codsez);
|
||||
stat.put(ATS_CODSOT, codsot);
|
||||
@ -643,6 +660,7 @@ bool TMensileDonxGr::riepilogo()
|
||||
stat.put(ATS_NUMERO, numero);
|
||||
stat.write();
|
||||
}
|
||||
}
|
||||
stat.zero();
|
||||
stat.put(ATS_CODSEZ, "ZZ");
|
||||
stat.put(ATS_CODSOT, "ZZ");
|
||||
|
@ -14,3 +14,4 @@
|
||||
#define F_DATAFIN 302
|
||||
#define F_TIPODON 303
|
||||
#define F_D_TIPODON 304
|
||||
#define F_SOLOTOT 305
|
||||
|
@ -117,7 +117,7 @@ BEGIN
|
||||
HELP "Sottogruppo finale"
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 77 4
|
||||
GROUPBOX DLG_NULL 77 5
|
||||
BEGIN
|
||||
PROMPT 1 5 "Opzioni per la statistica"
|
||||
END
|
||||
@ -154,6 +154,11 @@ BEGIN
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
BOOLEAN F_SOLOTOT
|
||||
BEGIN
|
||||
PROMPT 2 8 "Stampa solo totale finale (non stampa il dettaglio per sezione)"
|
||||
END
|
||||
|
||||
|
||||
BUTTON DLG_OK 9 2
|
||||
BEGIN
|
||||
|
@ -89,6 +89,8 @@ class TStatSogxCat : public TApplication
|
||||
TArray _righe;
|
||||
TString16 _sezini, _sotini, _sezfin, _sotfin;
|
||||
TDate _dataini, _datafin;
|
||||
bool _solotot;
|
||||
int _sezionistampate;
|
||||
|
||||
protected:
|
||||
virtual bool create();
|
||||
@ -190,6 +192,7 @@ bool TStatSogxCat::menu(MENU_TAG m)
|
||||
_sotfin = _msk->get(F_SOTFIN);
|
||||
_dataini = _msk->get_date(F_DATAINI);
|
||||
_datafin = _msk->get_date(F_DATAFIN);
|
||||
_solotot = msk.get_bool(F_SOLOTOT);
|
||||
if (riepilogo())
|
||||
stampa();
|
||||
}
|
||||
@ -230,6 +233,7 @@ bool TStatSogxCat::stampa()
|
||||
{
|
||||
if (printer().open())
|
||||
{
|
||||
_sezionistampate = 0;
|
||||
crea_intestazione();
|
||||
TRelation* relstat = new TRelation(LF_ATSTATS);
|
||||
TCursor* curstat = new TCursor(relstat, "", 1);
|
||||
@ -300,9 +304,17 @@ void TStatSogxCat::stampa_sezione(TString16 codsez, TString16 codsot)
|
||||
TPrintrow row;
|
||||
TString256 rigastampa;
|
||||
if (codsez == "ZZ" && codsot == "ZZ")
|
||||
rigastampa = "RIEPILOGO TOTALE PER TUTTE LE SEZIONI STAMPATE";
|
||||
{
|
||||
if (_sezionistampate != 1)
|
||||
{
|
||||
//rigastampa = "RIEPILOGO TOTALE PER TUTTE LE SEZIONI STAMPATE";
|
||||
rigastampa = "";
|
||||
rigastampa << "RIEPILOGO TOTALE SEZIONI DA " << _sezini << '/' << _sotini << " A " << _sezfin << '/' << _sotfin;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
_sezionistampate++;
|
||||
rigastampa = "Sezione: ";
|
||||
rigastampa << codsez;
|
||||
if (codsot.not_empty())
|
||||
@ -328,6 +340,8 @@ void TStatSogxCat::stampa_sezione(TString16 codsez, TString16 codsot)
|
||||
}
|
||||
}
|
||||
}
|
||||
if ((codsez == "ZZ" && codsot == "ZZ" && _sezionistampate != 1) || (codsez != "ZZ"))
|
||||
{
|
||||
rigastampa.center_just(80);
|
||||
row.put(rigastampa);
|
||||
printer().setheaderline(1, row);
|
||||
@ -391,6 +405,7 @@ void TStatSogxCat::stampa_sezione(TString16 codsez, TString16 codsot)
|
||||
printer().print(row);
|
||||
printer().formfeed();
|
||||
}
|
||||
}
|
||||
|
||||
bool TStatSogxCat::riepilogo()
|
||||
{
|
||||
@ -488,6 +503,8 @@ bool TStatSogxCat::riepilogo()
|
||||
}
|
||||
}
|
||||
if (cati.not_empty())
|
||||
{
|
||||
if (!_solotot)
|
||||
{
|
||||
stat.zero();
|
||||
stat.put(ATSS_CODSEZ, codsez);
|
||||
@ -522,6 +539,7 @@ bool TStatSogxCat::riepilogo()
|
||||
stat.put(ATSS_NUMERO2, numero2);
|
||||
stat.write();
|
||||
}
|
||||
}
|
||||
stat.zero();
|
||||
stat.put(ATSS_CODSEZ, "ZZ");
|
||||
stat.put(ATSS_CODSOT, "ZZ");
|
||||
@ -557,6 +575,8 @@ bool TStatSogxCat::riepilogo()
|
||||
}
|
||||
}
|
||||
if (catd.not_empty())
|
||||
{
|
||||
if (!_solotot)
|
||||
{
|
||||
stat.zero();
|
||||
stat.put(ATSS_CODSEZ, codsez);
|
||||
@ -591,6 +611,7 @@ bool TStatSogxCat::riepilogo()
|
||||
stat.put(ATSS_NUMERO2, numero2);
|
||||
stat.write();
|
||||
}
|
||||
}
|
||||
stat.zero();
|
||||
stat.put(ATSS_CODSEZ, "ZZ");
|
||||
stat.put(ATSS_CODSOT, "ZZ");
|
||||
|
@ -12,3 +12,4 @@
|
||||
|
||||
#define F_DATAINI 301
|
||||
#define F_DATAFIN 302
|
||||
#define F_SOLOTOT 303
|
||||
|
@ -117,7 +117,7 @@ BEGIN
|
||||
HELP "Sottogruppo finale"
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 77 3
|
||||
GROUPBOX DLG_NULL 77 4
|
||||
BEGIN
|
||||
PROMPT 1 5 "Opzioni per la statistica"
|
||||
END
|
||||
@ -132,6 +132,11 @@ BEGIN
|
||||
PROMPT 50 6 "al "
|
||||
END
|
||||
|
||||
BOOLEAN F_SOLOTOT
|
||||
BEGIN
|
||||
PROMPT 2 7 "Stampa solo totale finale (non stampa il dettaglio per sezione)"
|
||||
END
|
||||
|
||||
BUTTON DLG_OK 9 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
|
@ -89,12 +89,13 @@ class TRiepilogoDonazioni : public TApplication
|
||||
TLocalisamfile* _donaz;
|
||||
TLocalisamfile* _atstatd;
|
||||
TDate _dataini, _datafin;
|
||||
bool _primedon;
|
||||
bool _primedon, _solotot;
|
||||
bool _perpunto;
|
||||
TAssoc_array* _colonne;
|
||||
TArray _righe; // array per riepilogo donazioni
|
||||
TArray _righe_prime; // array per riepilogo prime don
|
||||
TString16 _sezini, _sotini, _sezfin, _sotfin;
|
||||
int _sezionistampate;
|
||||
|
||||
protected:
|
||||
virtual bool create();
|
||||
@ -245,6 +246,7 @@ bool TRiepilogoDonazioni::menu(MENU_TAG m)
|
||||
_dataini = msk.get(F_DATAINI);
|
||||
_datafin = msk.get(F_DATAFIN);
|
||||
_primedon = msk.get_bool(F_PRIMEDON);
|
||||
_solotot = msk.get_bool(F_SOLOTOT);
|
||||
//_perpunto = msk.get_bool(F_PERPUNTO);
|
||||
_sezini = _msk->get(F_SEZINI);
|
||||
_sotini = _msk->get(F_SOTINI);
|
||||
@ -302,6 +304,7 @@ bool TRiepilogoDonazioni::stampa()
|
||||
{
|
||||
if (printer().open())
|
||||
{
|
||||
_sezionistampate = 0;
|
||||
crea_intestazione();
|
||||
TRelation* relstat = new TRelation(LF_ATSTATD);
|
||||
TCursor* curstat = new TCursor(relstat, "", 2);
|
||||
@ -386,9 +389,17 @@ void TRiepilogoDonazioni::stampa_sezione(TString16 codsez, TString16 codsot)
|
||||
TPrintrow row;
|
||||
TString256 rigastampa;
|
||||
if (codsez == "ZZ" && codsot == "ZZ")
|
||||
rigastampa = "RIEPILOGO TOTALE PER TUTTE LE SEZIONI STAMPATE";
|
||||
{
|
||||
if (_sezionistampate != 1)
|
||||
{
|
||||
//rigastampa = "RIEPILOGO TOTALE PER TUTTE LE SEZIONI STAMPATE";
|
||||
rigastampa = "";
|
||||
rigastampa << "RIEPILOGO TOTALE SEZIONI DA " << _sezini << '/' << _sotini << " A " << _sezfin << '/' << _sotfin;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
_sezionistampate++;
|
||||
rigastampa = "Sezione: ";
|
||||
rigastampa << codsez;
|
||||
if (codsot.not_empty())
|
||||
@ -414,6 +425,8 @@ void TRiepilogoDonazioni::stampa_sezione(TString16 codsez, TString16 codsot)
|
||||
}
|
||||
}
|
||||
}
|
||||
if ((codsez == "ZZ" && codsot == "ZZ" && _sezionistampate != 1) || (codsez != "ZZ"))
|
||||
{
|
||||
rigastampa.center_just(80);
|
||||
row.put(rigastampa);
|
||||
printer().setheaderline(1, row);
|
||||
@ -648,6 +661,7 @@ void TRiepilogoDonazioni::stampa_sezione(TString16 codsez, TString16 codsot)
|
||||
}
|
||||
printer().formfeed();
|
||||
}
|
||||
}
|
||||
|
||||
bool TRiepilogoDonazioni::riepilogo()
|
||||
{
|
||||
@ -729,6 +743,8 @@ bool TRiepilogoDonazioni::riepilogo()
|
||||
primadon = recdon.get_bool(DON_PRIMADON);
|
||||
anno = datadon.year();
|
||||
mese = datadon.month();
|
||||
if (!_solotot)
|
||||
{
|
||||
stat.zero();
|
||||
stat.put(ATS_CODSEZ, codsez);
|
||||
stat.put(ATS_CODSOT, codsot);
|
||||
@ -762,6 +778,7 @@ bool TRiepilogoDonazioni::riepilogo()
|
||||
stat.put(ATS_NUMPRIME, numero);
|
||||
stat.write();
|
||||
}
|
||||
}
|
||||
stat.zero();
|
||||
stat.put(ATS_CODSEZ, "ZZ");
|
||||
stat.put(ATS_CODSOT, "ZZ");
|
||||
|
@ -13,4 +13,5 @@
|
||||
#define F_DATAINI 301
|
||||
#define F_DATAFIN 302
|
||||
#define F_PRIMEDON 303
|
||||
#define F_SOLOTOT 304
|
||||
//#define F_PERPUNTO 304
|
||||
|
@ -117,7 +117,7 @@ BEGIN
|
||||
HELP "Sottogruppo finale"
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 77 5
|
||||
GROUPBOX DLG_NULL 77 6
|
||||
BEGIN
|
||||
PROMPT 1 5 "Opzioni per il riepilogo"
|
||||
END
|
||||
@ -139,6 +139,12 @@ BEGIN
|
||||
PROMPT 2 7 "Riepilogo per prime donazioni"
|
||||
END
|
||||
|
||||
BOOLEAN F_SOLOTOT
|
||||
BEGIN
|
||||
PROMPT 2 8 "Stampa solo totale finale (non stampa il dettaglio per sezione)"
|
||||
END
|
||||
|
||||
|
||||
BUTTON DLG_OK 9 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
|
@ -95,6 +95,7 @@ class TStatDonGrRh : public TApplication
|
||||
TString16 _sezini, _sotini, _sezfin, _sotfin;
|
||||
TAssoc_array* _asoggetti;
|
||||
bool _solotot;
|
||||
int _sezionistampate;
|
||||
|
||||
protected:
|
||||
virtual bool create();
|
||||
@ -299,6 +300,7 @@ bool TStatDonGrRh::stampa()
|
||||
{
|
||||
if (printer().open())
|
||||
{
|
||||
_sezionistampate = 0;
|
||||
crea_intestazione();
|
||||
TRelation* relstat = new TRelation(LF_ATSTATD);
|
||||
TCursor* curstat = new TCursor(relstat, "", 3);
|
||||
@ -396,9 +398,17 @@ void TStatDonGrRh::stampa_sezione(TString16 codsez, TString16 codsot)
|
||||
TPrintrow row;
|
||||
TString256 rigastampa;
|
||||
if (codsez == "ZZ" && codsot == "ZZ")
|
||||
rigastampa = "RIEPILOGO TOTALE PER TUTTE LE SEZIONI SELEZIONATE";
|
||||
{
|
||||
if (_sezionistampate != 1)
|
||||
{
|
||||
//rigastampa = "RIEPILOGO TOTALE PER TUTTE LE SEZIONI STAMPATE";
|
||||
rigastampa = "";
|
||||
rigastampa << "RIEPILOGO TOTALE SEZIONI DA " << _sezini << '/' << _sotini << " A " << _sezfin << '/' << _sotfin;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
_sezionistampate++;
|
||||
rigastampa = "Sezione: ";
|
||||
rigastampa << codsez;
|
||||
if (codsot.not_empty())
|
||||
@ -424,6 +434,8 @@ void TStatDonGrRh::stampa_sezione(TString16 codsez, TString16 codsot)
|
||||
}
|
||||
}
|
||||
}
|
||||
if ((codsez == "ZZ" && codsot == "ZZ" && _sezionistampate != 1) || (codsez != "ZZ"))
|
||||
{
|
||||
rigastampa.center_just(80);
|
||||
row.put(rigastampa);
|
||||
printer().setheaderline(1, row);
|
||||
@ -629,6 +641,7 @@ void TStatDonGrRh::stampa_sezione(TString16 codsez, TString16 codsot)
|
||||
printer().print(row);
|
||||
printer().formfeed();
|
||||
}
|
||||
}
|
||||
|
||||
bool TStatDonGrRh::riepilogo()
|
||||
{
|
||||
|
@ -91,6 +91,8 @@ class TStatisticaSog : public TApplication
|
||||
TString16 _sezini, _sotini, _sezfin, _sotfin;
|
||||
TString16 _catdon;
|
||||
TDate _data;
|
||||
bool _solotot;
|
||||
int _sezionistampate;
|
||||
|
||||
protected:
|
||||
virtual bool create();
|
||||
@ -232,6 +234,7 @@ bool TStatisticaSog::menu(MENU_TAG m)
|
||||
_sotfin = _msk->get(F_SOTFIN);
|
||||
_catdon = _msk->get(F_CATDON);
|
||||
_data = _msk->get_date(F_DATA);
|
||||
_solotot = msk.get_bool(F_SOLOTOT);
|
||||
if (riepilogo())
|
||||
stampa();
|
||||
}
|
||||
@ -282,6 +285,7 @@ bool TStatisticaSog::stampa()
|
||||
{
|
||||
if (printer().open())
|
||||
{
|
||||
_sezionistampate = 0;
|
||||
crea_intestazione();
|
||||
TRelation* relstat = new TRelation(LF_ATSTATS);
|
||||
TCursor* curstat = new TCursor(relstat, "", 1);
|
||||
@ -363,9 +367,17 @@ void TStatisticaSog::stampa_sezione(TString16 codsez, TString16 codsot)
|
||||
TPrintrow row;
|
||||
TString256 rigastampa;
|
||||
if (codsez == "ZZ" && codsot == "ZZ")
|
||||
rigastampa = "RIEPILOGO TOTALE PER TUTTE LE SEZIONI STAMPATE";
|
||||
{
|
||||
if (_sezionistampate != 1)
|
||||
{
|
||||
//rigastampa = "RIEPILOGO TOTALE PER TUTTE LE SEZIONI STAMPATE";
|
||||
rigastampa = "";
|
||||
rigastampa << "RIEPILOGO TOTALE SEZIONI DA " << _sezini << '/' << _sotini << " A " << _sezfin << '/' << _sotfin;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
_sezionistampate++;
|
||||
rigastampa = "Sezione: ";
|
||||
rigastampa << codsez;
|
||||
if (codsot.not_empty())
|
||||
@ -391,6 +403,8 @@ void TStatisticaSog::stampa_sezione(TString16 codsez, TString16 codsot)
|
||||
}
|
||||
}
|
||||
}
|
||||
if ((codsez == "ZZ" && codsot == "ZZ" && _sezionistampate != 1) || (codsez != "ZZ"))
|
||||
{
|
||||
rigastampa.center_just(80);
|
||||
row.put(rigastampa);
|
||||
printer().setheaderline(1, row);
|
||||
@ -475,6 +489,7 @@ void TStatisticaSog::stampa_sezione(TString16 codsez, TString16 codsot)
|
||||
printer().print(row);
|
||||
printer().formfeed();
|
||||
}
|
||||
}
|
||||
|
||||
bool TStatisticaSog::riepilogo()
|
||||
{
|
||||
@ -597,6 +612,8 @@ bool TStatisticaSog::riepilogo()
|
||||
gruppo = "A";
|
||||
if (gruppo == "A1B" || gruppo == "A2B")
|
||||
gruppo = "AB";
|
||||
if (!_solotot)
|
||||
{
|
||||
stat.zero();
|
||||
stat.put(ATSS_CODSEZ, codsez);
|
||||
stat.put(ATSS_CODSOT, codsot);
|
||||
@ -621,6 +638,7 @@ bool TStatisticaSog::riepilogo()
|
||||
stat.put(ATSS_NUMERO, numero);
|
||||
stat.write();
|
||||
}
|
||||
}
|
||||
stat.zero();
|
||||
stat.put(ATSS_CODSEZ, "ZZ");
|
||||
stat.put(ATSS_CODSOT, "ZZ");
|
||||
|
@ -13,3 +13,4 @@
|
||||
#define F_CATDON 301
|
||||
#define F_D_CATDON 302
|
||||
#define F_DATA 303
|
||||
#define F_SOLOTOT 304
|
||||
|
@ -117,7 +117,7 @@ BEGIN
|
||||
HELP "Sottogruppo finale"
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 77 5
|
||||
GROUPBOX DLG_NULL 77 6
|
||||
BEGIN
|
||||
PROMPT 1 5 "Opzioni per la statistica"
|
||||
END
|
||||
@ -158,6 +158,11 @@ BEGIN
|
||||
PROMPT 2 8 "per tutte le categorie non di dimissione"
|
||||
END
|
||||
|
||||
BOOLEAN F_SOLOTOT
|
||||
BEGIN
|
||||
PROMPT 2 9 "Stampa solo totale finale (non stampa il dettaglio per sezione)"
|
||||
END
|
||||
|
||||
BUTTON DLG_OK 9 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
|
@ -92,6 +92,7 @@ class TRiepilogoPunto : public TApplication
|
||||
TArray _righe; // array per riepilogo donazioni
|
||||
TString16 _sezini, _sotini, _sezfin, _sotfin;
|
||||
bool _solotot;
|
||||
int _sezionistampate;
|
||||
|
||||
protected:
|
||||
virtual bool create();
|
||||
@ -253,6 +254,7 @@ bool TRiepilogoPunto::stampa()
|
||||
{
|
||||
if (printer().open())
|
||||
{
|
||||
_sezionistampate = 0;
|
||||
crea_intestazione();
|
||||
TRelation* relstat = new TRelation(LF_ATSTATD);
|
||||
TCursor* curstat = new TCursor(relstat, "", 1);
|
||||
@ -318,9 +320,17 @@ void TRiepilogoPunto::stampa_sezione(TString16 codsez, TString16 codsot)
|
||||
TPrintrow row;
|
||||
TString256 rigastampa;
|
||||
if (codsez == "ZZ" && codsot == "ZZ")
|
||||
rigastampa = "RIEPILOGO TOTALE PER TUTTE LE SEZIONI SELEZIONATE";
|
||||
{
|
||||
if (_sezionistampate != 1)
|
||||
{
|
||||
//rigastampa = "RIEPILOGO TOTALE PER TUTTE LE SEZIONI STAMPATE";
|
||||
rigastampa = "";
|
||||
rigastampa << "RIEPILOGO TOTALE SEZIONI DA " << _sezini << '/' << _sotini << " A " << _sezfin << '/' << _sotfin;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
_sezionistampate++;
|
||||
rigastampa = "Sezione: ";
|
||||
rigastampa << codsez;
|
||||
if (codsot.not_empty())
|
||||
@ -346,6 +356,8 @@ void TRiepilogoPunto::stampa_sezione(TString16 codsez, TString16 codsot)
|
||||
}
|
||||
}
|
||||
}
|
||||
if ((codsez == "ZZ" && codsot == "ZZ" && _sezionistampate != 1) || (codsez != "ZZ"))
|
||||
{
|
||||
rigastampa.center_just(80);
|
||||
row.put(rigastampa);
|
||||
printer().setheaderline(1, row);
|
||||
@ -441,6 +453,7 @@ void TRiepilogoPunto::stampa_sezione(TString16 codsez, TString16 codsot)
|
||||
printer().setheaderline(3, row);
|
||||
printer().formfeed();
|
||||
}
|
||||
}
|
||||
|
||||
bool TRiepilogoPunto::riepilogo()
|
||||
{
|
||||
|
Loading…
x
Reference in New Issue
Block a user