From 93dd671c64d9f088a07a55502add9c3692070063 Mon Sep 17 00:00:00 2001 From: cris Date: Wed, 12 Aug 1998 10:59:34 +0000 Subject: [PATCH] Patch level : Files correlati : Ricompilazione Demo : [ ] Commento : Turni per controlli: stampa sia chi non ha mai fatto il controllo sia chi ha fatto l'ultimo prima di una data selezionabile git-svn-id: svn://10.65.10.50/trunk@6953 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- at/at5300.cpp | 52 +++++++++++++++++++++++++++++++------------------- at/at5300a.h | 2 ++ at/at5300a.uml | 18 +++++++++++++---- 3 files changed, 48 insertions(+), 24 deletions(-) diff --git a/at/at5300.cpp b/at/at5300.cpp index 3d1354ab5..887c1a64f 100755 --- a/at/at5300.cpp +++ b/at/at5300.cpp @@ -51,7 +51,9 @@ class TTurniControlli : public TPrintapp int _contatore, _totale; TDate _data_stampa; TString16 _codsez, _codsot; - TString16 _tipo1, _tipo2, _tipo3, _tipo4, _tipo5; + TString16 _tipo1; + bool _maifatto; + TDate _primadel; TParagraph_string _cognome_nome, _rigastampa, _dencom; ts _tipostampa; int _etlarghezza, _etcolonne; @@ -171,7 +173,7 @@ bool TTurniControlli::preprocess_page(int file, int counter) localita.trim(); _dencom = localita; - TDate data1(NULLDATE), data2(NULLDATE), data3(NULLDATE), data4(NULLDATE), data5(NULLDATE); + TDate data1(NULLDATE); TRectype* key = new TRectype(LF_CONTSAN); long codice = recsog.get_long(SOG_CODICE); @@ -184,22 +186,13 @@ bool TTurniControlli::preprocess_page(int file, int counter) TDate datacon = riga.get(CON_DATACON); if (tipocon == _tipo1 && _tipo1.not_empty()) data1 = datacon; - if (tipocon == _tipo2 && _tipo2.not_empty()) - data2 = datacon; - if (tipocon == _tipo3 && _tipo3.not_empty()) - data3 = datacon; - if (tipocon == _tipo4 && _tipo4.not_empty()) - data4 = datacon; - if (tipocon == _tipo5 && _tipo5.not_empty()) - data5 = datacon; } TString80 rigastampa; rigastampa = ""; - rigastampa << "@72g"<row(r); TString16 tipocon = riga.get(CON_TIPOCON); if (tipocon == app()._tipo1) - filtrato = FALSE; + { + if (app()._maifatto) + { + if (app()._primadel.ok()) + { + TDate datacon = riga.get(CON_DATACON); + if (datacon >= app()._primadel) + filtrato = FALSE; + } + else + filtrato = FALSE; + } + else + filtrato = FALSE; + } } } return filtrato; @@ -335,6 +342,8 @@ bool TTurniControlli::set_print(int) if (_tipostampa != undefined) { _tipo1 = _msk->get(F_TIPO1); + _maifatto = _msk->get_bool(F_MAIFATTO); + _primadel = _msk->get_date(F_PRIMADEL); _contatore = 0; _totale = 0; reset_files(); @@ -373,8 +382,12 @@ void TTurniControlli::crea_intestazione() { reset_header(); TString sep(132); - sep = "STAMPA SOGGETTI CHE NON HANNO MAI EFFETTUATO IL CONTROLLO "; + sep = "STAMPA TURNI PER CONTROLLI SANITARI "; sep << _tipo1; + if (_maifatto) + sep << " - mai effettuato"; + if (_primadel.ok()) + sep << " - effettuato prima del " << _primadel.string(); sep.center_just(); set_header(2, "@0g%s", (const char*) sep); TDate data_stampa = _data_stampa.string(); @@ -388,8 +401,7 @@ void TTurniControlli::crea_intestazione() set_header(3, (const char *) sep); set_header(4,"@0gCodice@9gCognome e nome@61gNato il@72gTelefono abit.@87gTelefono lav.@102gTelefono altro"); set_header(5,"@0gTessera@9gIndirizzo"); - TString256 riga = "@0gCat.@61gGruppo Rh@"; - set_header(6,riga); + set_header(6,"@0gCat.@61gGruppo Rh@72gData ult. controllo scelto"); set_header(7,"@0g--------@9g---------------------------------------------------@61g----------@72g------------------------------------------------------"); printer().footerlen(3); } diff --git a/at/at5300a.h b/at/at5300a.h index 376875b5f..46b2aa5ea 100755 --- a/at/at5300a.h +++ b/at/at5300a.h @@ -25,6 +25,8 @@ #define F_TIPO1 301 #define F_D_TIPO1 302 +#define F_MAIFATTO 303 +#define F_PRIMADEL 304 #define F_ELENCO 401 #define F_ETICHETTE 402 diff --git a/at/at5300a.uml b/at/at5300a.uml index 5dca0faef..1e8a7ac30 100755 --- a/at/at5300a.uml +++ b/at/at5300a.uml @@ -4,13 +4,13 @@ TOOLBAR "" 0 20 0 2 BUTTON F_ELENCO 9 2 BEGIN - PROMPT -13 -11 "Elenco" + PROMPT -13 -11 "E~lenco" MESSAGE EXIT,F_ELENCO END BUTTON F_ETICHETTE 9 2 BEGIN - PROMPT -23 -11 "Etichette" + PROMPT -23 -11 "~Etichette" MESSAGE EXIT,F_ETICHETTE END @@ -265,9 +265,9 @@ BEGIN FLAGS "D" END -GROUPBOX DLG_NULL 77 3 +GROUPBOX DLG_NULL 77 5 BEGIN - PROMPT 1 10 "Stampa i soggetti che non hanno mai effettuato" + PROMPT 1 10 "Opzioni per la stampa" END STRING F_TIPO1 2 @@ -291,5 +291,15 @@ BEGIN FLAGS "D" END +BOOLEAN F_MAIFATTO +BEGIN + PROMPT 2 12 "Includi chi non ha mai effettuato il controllo scelto" +END + +DATE F_PRIMADEL +BEGIN + PROMPT 2 13 "Includi chi ha fatto l'ultimo controllo scelto prima del " +END + ENDPAGE ENDMASK