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            : Corretto stampa urgenze unica: ordinamento per cognome e nome


git-svn-id: svn://10.65.10.50/trunk@6817 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
cris 1998-07-03 13:17:49 +00:00
parent f85869dcd4
commit 05391a45f9
1 changed files with 11 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
at/at4200.cpp
View File

@ -45,6 +45,7 @@ class TStampaUrgenze : public TPrintapp
TString16 _codsez, _codsot;
int _etlarghezza, _etcolonne;
bool _unica;
int _cur;
protected:
virtual bool user_create();
@ -119,8 +120,10 @@ void TStampaUrgenze::set_page(int file, int cnt)
break;
case elenco:
{
set_row(2,"");
//set_row(2,"");
set_row(1,"@0g@pn", FLD(LF_SOGGETTI,SOG_CODICE,"########"));
set_row(2,"@3g@S", FLD(LF_SOGGETTI,SOG_CODSEZ));
set_row(2,"@6g@S", FLD(LF_SOGGETTI,SOG_CODSOT));
set_row(1,"@9g@S", FLD(LF_SOGGETTI,SOG_CATDON));
set_row(1,"@12g#a", &_cognome_nome);
set_row(1,"@38g@ld", FLD(LF_SOGGETTI,SOG_DATANASC));
@ -293,7 +296,6 @@ bool TStampaUrgenze::set_print(int)
{
reset_files();
add_file(LF_SOGGETTI);
filtra_sezioni();
// filtro per categorie
_categorie.destroy();
const TString16 catpri = _msk->get(F_CAT1);
@ -335,6 +337,12 @@ bool TStampaUrgenze::set_print(int)
_giorni = _msk->get_long(F_GIORNI);
_tipodon = _msk->get(F_TIPODON);
_unica = _msk->get_bool(F_UNICA);
// filtro per sezioni
filtra_sezioni();
if (_unica)
((TSorted_cursor*)current_cursor())->change_order("90->COGNOME|90->NOME|90->DATANASC");
else
((TSorted_cursor*)current_cursor())->change_order("90->CODSEZ|90->CODSOT|90->COGNOME|90->NOME|90->DATANASC");
// filtra solo idonei
current_cursor()->setfilter(filtro, TRUE);
// filtra per categorie, tipizzazione e data donazione
@ -377,9 +385,8 @@ bool TStampaUrgenze::user_create()
_rel->add("LCP", "CODTAB==DOM_CODLOC",1,0,ALIAS_LCP);
_rel->add(LF_COMUNI, "COM==DOM_CODCOM");
_rel->add(LF_SEZIONI, "CODSEZ==CODSEZ|CODSOT==CODSOT");
add_cursor(new TCursor(_rel, "", 3));
add_cursor(new TSorted_cursor(_rel,"","",3));
_msk = new TMask("at4200a");
TConfig config(CONFIG_STUDIO);
TString16 etformato = config.get("EtFormato");
_etlarghezza = config.get_int("EtLarghezza");