From c686d6793a41bf986e6d8716f2a451fdb155891a Mon Sep 17 00:00:00 2001
From: cris <cris@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Fri, 26 Feb 1999 15:30:09 +0000
Subject: [PATCH] Patch level         : Files correlati     : Ricompilazione
 Demo : [ ] Commento            : Scadenze di don.: possibilita' di registrare
 la data di stampa nella data convc. del soggetto (chiesto da PR)

git-svn-id: svn://10.65.10.50/trunk@7868 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 at/at4100.cpp  | 10 +++++++++-
 at/at4100a.h   |  1 +
 at/at4100a.uml | 17 ++++++++++++++++-
 3 files changed, 26 insertions(+), 2 deletions(-)

diff --git a/at/at4100.cpp b/at/at4100.cpp
index 01c6ac1dc..36944d213 100755
--- a/at/at4100.cpp
+++ b/at/at4100.cpp
@@ -62,7 +62,7 @@ class TStampaScadenze : public TPrintapp
   TDate 						_data_stampa;
   TDate							_dataini, _datafin, _dataultid;
   int								_intminconv;
-	bool							_usomodo, _usasez;
+	bool							_usomodo, _usasez, _registra;
 	TString16					_giorni, _punto;
 	TString16					_procdon, _modo, _ab01, _ab02, _ab03, _rh;
 	ts 	      				_tipostampa;
@@ -470,6 +470,7 @@ bool TStampaScadenze::filter_func_scadenze(const TRelation* rel)
 
 bool TStampaScadenze::preprocess_page(int file, int counter)
 {
+	TRectype& recsog = current_cursor()->curr();
 	if (_tipostampa==elenco || _tipostampa==completo || _tipostampa==personale)
 	{
 		TRectype& recsog = current_cursor()->curr();
@@ -516,6 +517,12 @@ bool TStampaScadenze::preprocess_page(int file, int counter)
 		_contatore++;
 		_totfinestampa++;
 	}
+	if (_registra)
+	{
+		recsog.put(SOG_DATACONV, _data_stampa);
+		recsog.put(SOG_NUMCONV, 0);
+		current_cursor()->file().rewrite();
+	}
 	if (_tipostampa==etichette)		
 		if (printer().rows_left() < _form_eti->get_body().height())
 			printer().formfeed();
@@ -626,6 +633,7 @@ bool TStampaScadenze::set_print(int m)
     _ab03		 		= _msk->get(F_AB03);
     _rh			 		= _msk->get(F_RHANTID);
     _punto	 		= _msk->get(F_PUNTO);
+    _registra   = _msk->get_bool(F_REGISTRA);
 		_giorni 		= "NNNNNNN";    
     if (_msk->get_bool(F_GPD_LUN))
     	_giorni[0] = 'X';
diff --git a/at/at4100a.h b/at/at4100a.h
index 9b3ecb7e7..b244aa43c 100755
--- a/at/at4100a.h
+++ b/at/at4100a.h
@@ -44,6 +44,7 @@
 #define F_INTMINCONV    319
 #define F_PUNTO         320
 #define F_D_PUNTO       321
+#define F_REGISTRA      322
 
 #define F_ELENCO    401
 #define F_COMPLETO  402
diff --git a/at/at4100a.uml b/at/at4100a.uml
index c4127a206..a1bd6574e 100755
--- a/at/at4100a.uml
+++ b/at/at4100a.uml
@@ -415,7 +415,7 @@ BEGIN
    OUTPUT F_D_PUNTO S0
    CHECKTYPE NORMAL
    WARNING "Codice non presente"
-   HELP "Punto di prelievo per la convocazione"
+   HELP "Punto di prelievo"
 END
 
 STRING F_D_PUNTO 50
@@ -424,5 +424,20 @@ BEGIN
   FLAGS "D"
 END
 
+TEXT DLG_NULL
+BEGIN
+   PROMPT 2 18 "Stampa solo chi fatto l'ultima donazione nel punto scelto o,"
+END
+
+TEXT DLG_NULL
+BEGIN
+   PROMPT 2 19 "se non ha donazioni, ha come preferenza quel punto prelievo"
+END
+
+BOOLEAN F_REGISTRA
+BEGIN
+   PROMPT 2 20 "Registra la data di stampa nel campo data convocazione del soggetto"
+END
+
 ENDPAGE
 ENDMASK