From fe0289a048b4110d323d22bb6673931da4f6b35b Mon Sep 17 00:00:00 2001 From: cris Date: Mon, 30 Mar 1998 13:24:03 +0000 Subject: [PATCH] Patch level : Files correlati : Ricompilazione Demo : [ ] Commento : Stampa urgenze - possibilita' di non suddividere per sezione/sottogruppo git-svn-id: svn://10.65.10.50/trunk@6453 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- at/at4200.cpp | 7 ++++--- at/at4200a.h | 3 ++- at/at4200a.uml | 51 +++++++++++++++++++++++++++----------------------- 3 files changed, 34 insertions(+), 27 deletions(-) diff --git a/at/at4200.cpp b/at/at4200.cpp index bc4a1684f..7127d4b98 100755 --- a/at/at4200.cpp +++ b/at/at4200.cpp @@ -42,10 +42,10 @@ class TStampaUrgenze : public TPrintapp long _giorni; TParagraph_string _cognome_nome, _dencom; TDate _data_stampa; - TDate _dataini, _datafin; ts _tipostampa; TString16 _codsez, _codsot; int _etlarghezza, _etcolonne; + bool _unica; protected: virtual bool user_create(); @@ -242,7 +242,7 @@ bool TStampaUrgenze::preprocess_page(int file, int counter) // salto pagina se cambio sezione const TString16 codsez = recsog.get(SOG_CODSEZ); const TString16 codsot = recsog.get(SOG_CODSOT); - if ((_codsez!=codsez)||(_codsot!=codsot)) + if ((!_unica) && ((_codsez!=codsez)||(_codsot!=codsot))) { if (_codsez != "**") printer().formfeed(); @@ -339,8 +339,9 @@ bool TStampaUrgenze::set_print(int) _sangue->put(SOG_FENOTIPORH, fenotiporh); if ((du.ok()) && (du.not_empty())) _sangue->put(SOG_DU, du); - _giorni = _msk->get_long(F_GIORNI); + _giorni = _msk->get_long(F_GIORNI); _tipodon = _msk->get(F_TIPODON); + _unica = _msk->get_bool(F_UNICA); // filtra solo idonei current_cursor()->setfilter("TCS->S6 == \"I\"", TRUE); // filtra per categorie, tipizzazione e data donazione diff --git a/at/at4200a.h b/at/at4200a.h index 954926673..ad0c5405b 100755 --- a/at/at4200a.h +++ b/at/at4200a.h @@ -31,7 +31,8 @@ #define F_FENOTIPORH 305 #define F_DU 306 #define F_GIORNI 307 -#define F_D_TIPODON 308 +#define F_UNICA 308 +#define F_D_TIPODON 309 #define F_ELENCO 401 #define F_ETICHETTE 402 diff --git a/at/at4200a.uml b/at/at4200a.uml index 60a1fdadf..540ea5f7b 100755 --- a/at/at4200a.uml +++ b/at/at4200a.uml @@ -1,5 +1,26 @@ #include "at4200a.h" +TOOLBAR "" 0 20 0 2 + +BUTTON F_ELENCO 9 2 +BEGIN + PROMPT -13 -11 "Elenco" + MESSAGE EXIT,F_ELENCO +END + +BUTTON F_ETICHETTE 9 2 +BEGIN + PROMPT -23 -11 "Etichette" + MESSAGE EXIT,F_ETICHETTE +END + +BUTTON DLG_QUIT 9 2 +BEGIN + PROMPT -33 -11 "" +END + +ENDPAGE + PAGE "Urgenze" -1 -1 78 20 GROUPBOX DLG_NULL 77 4 @@ -252,7 +273,7 @@ END STRING F_TIPODON 2 BEGIN - PROMPT 2 11 "Tipo donazione " + PROMPT 2 11 "Tipo don. " FLAGS "U" USE TDN INPUT CODTAB F_TIPODON @@ -306,12 +327,13 @@ END STRING F_D_TIPODON 25 BEGIN - PROMPT 24 11 "" + PROMPT 19 11 "" FLAGS "D" END -GROUPBOX DLG_NULL 77 3 + +GROUPBOX DLG_NULL 77 4 BEGIN - PROMPT 1 14 "Richieste" + PROMPT 1 14 "Opzioni per la stampa" END //NUMBER F_NUMERO 3 @@ -330,26 +352,9 @@ BEGIN HELP "N.ro minimo di giorni che devono essere trascorsi dall'ultima donazione" END -GROUPBOX DLG_NULL 77 4 +BOOLEAN F_UNICA BEGIN - PROMPT 1 17 "Stampa" -END - -BUTTON F_ELENCO 9 2 -BEGIN - PROMPT -13 18 "Elenco" - MESSAGE EXIT,F_ELENCO -END - -BUTTON F_ETICHETTE 9 2 -BEGIN - PROMPT -23 18 "Etichette" - MESSAGE EXIT,F_ETICHETTE -END - -BUTTON DLG_QUIT 9 2 -BEGIN - PROMPT -33 18 "" + PROMPT 2 16 "Stampa non suddivisa per sezione/sottogruppo" END ENDPAGE