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

Patch level : at 1.7 702

Browse Source 
Files correlati     : at5.exe
Ricompilazione Demo : [ ]
Commento            : stampa cartoline in turni per contorlli sanitari: preso formato dai parametri


git-svn-id: svn://10.65.10.50/trunk@12139 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
cris 2004-06-03 10:44:17 +00:00
parent 8c8c3427d6
commit 6470ebcc73
1 changed files with 24 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

33
at/at5300.cpp
View File

@ -64,6 +64,7 @@ class TTurniControlli : public TPrintapp
TString80 _invitoper, _data, _presso1, _presso2, _presso3, _presso4;
TString80 _note, _intest1, _intest2, _intest3, _intest4;
int _etlarghezza, _etcolonne;
int _caxpag, _cabordoini, _cabordofin, _ncartoline;
static bool filter_func_turnicon(const TRelation* rel);
@ -307,13 +308,23 @@ void TTurniControlli::set_page(int file, int cnt)
note.set(_note);
}
corpo.update();
for (word i = 0; i < corpo.height(); i++)
{
TPrintrow& riga = corpo.row(i);
set_row(i+1,riga);
word primariga = 0;
word ultimariga = corpo.height();
if (_caxpag > 0)
{
if (_ncartoline % _caxpag == 0) // numero cartoline per pagina
primariga = _cabordoini; // bordo iniziale
if (_ncartoline % _caxpag == _caxpag-1) // numero cartoline per pagina - 1
ultimariga -= _cabordofin; // bordo finale
}
int nriga = 1;
for (word i = primariga; i < ultimariga; i++)
{
TPrintrow& riga = corpo.row(i);
set_row(nriga++,riga);
}
force_setpage(TRUE); // serve perchè alla prossima etichetta rifaccia la setpage
// altrimenti stampa sempre la stessa etichetta
force_setpage(TRUE);
_ncartoline++;
}
break;
case etichette:
@ -489,6 +500,7 @@ bool TTurniControlli::set_print(int)
_datafin = _msk->get_date(F_DATAFIN);
_contatore = 0;
_totale = 0;
_ncartoline = 0;
reset_files();
add_file(LF_SOGGETTI);
filtra_sezioni();
@ -564,9 +576,7 @@ bool TTurniControlli::user_create()
_rel = new TRelation(LF_SOGGETTI);
_rel->add(LF_SEZIONI,"CODSEZ==CODSEZ|CODSOT==CODSOT");
_rel->add("TCS", "CODTAB==STATO",1,0,ALIAS_TCS);
// _rel->add("LCP", "CODTAB==RES_CODLOC",1,LF_SOGGETTI,ALIAS_LCPRES);
_rel->add("LCP", "CODTAB==DOM_CODLOC",1,LF_SOGGETTI,ALIAS_LCPDOM);
// _rel->add(LF_COMUNI, "COM==RES_CODCOM",1,LF_SOGGETTI,ALIAS_COMRES);
_rel->add(LF_COMUNI, "COM==DOM_CODCOM",1,LF_SOGGETTI,ALIAS_COMDOM);
_rel->add(LF_COMUNI, "COM==COMNASC",1,LF_SOGGETTI,ALIAS_COMNAS);
@ -579,7 +589,12 @@ bool TTurniControlli::user_create()
_etlarghezza = config.get_int("EtLarghezza");
_etcolonne = config.get_int("EtColonne");
_form_eti = new TEti_turnicon_form(etformato);
_form_car = new TEti_turnicon_form("ATCARTO1");
TString16 caformato = config.get("CaFormato");
_form_car = new TEti_turnicon_form(caformato);
_caxpag = config.get_int("CaPerPag");
_cabordoini = config.get_int("CaBordoIni");
_cabordofin = config.get_int("CaBordoFin");
return TRUE;
}