From 251a0d079c6a68a379e2c95215730a8c03aa1aa5 Mon Sep 17 00:00:00 2001
From: cris <cris@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Tue, 2 Feb 1999 14:35:53 +0000
Subject: [PATCH] Patch level         : Files correlati     : Ricompilazione
 Demo : [ ] Commento            : Lo sblocco automatico aggiorna data e utente
 ultimo aggiornamento

git-svn-id: svn://10.65.10.50/trunk@7736 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 at/at0700.cpp | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/at/at0700.cpp b/at/at0700.cpp
index 52555ab08..d75891bbc 100755
--- a/at/at0700.cpp
+++ b/at/at0700.cpp
@@ -1,5 +1,6 @@
 #include <form.h>
 #include <mask.h>
+#include <prefix.h>
 #include <printapp.h>
 #include <recarray.h>
 #include <tabutil.h>
@@ -194,6 +195,9 @@ bool TSbloccoSospesi::preprocess_page(int file, int counter)
 			reccon.put(CON_PROGCON, progcon);
 			reccon.put(CON_DATACON, _data_stampa);
 			reccon.put(CON_TIPOCON, FINE_SOSPENSIONE);
+			TString80 resp = user();
+			resp << " - SBLOCCO AUTOMATICO";
+			reccon.put(CON_RESPONSAB, resp);
 			_scontrolli->add_row(reccon);
 			_scontrolli->rewrite();
 			recsog.put(SOG_DATACONV,NULLDATE);
@@ -252,10 +256,16 @@ bool TSbloccoSospesi::preprocess_page(int file, int counter)
 				recido.put(IDO_INTERVALLO, recsog.get(SOG_INTAF));				
 				if (recsog.get_int(SOG_INTAF) == 0)
 					recido.put(IDO_INTERVALLO, _intaf_m);
+				TString80 resp = user();
+				resp << " - SBLOCCO AUTOMATICO";
+				recido.put(IDO_RESPONSAB, resp);
 				_sidoneita->add_row(recido);
 				_sidoneita->rewrite();
 			}			
 			con_reord(recsog, _scontrolli, _sidoneita);
+		  const TDate oggi(TODAY);
+		  recsog.put(SOG_DATAULTAGG,oggi);
+		  recsog.put(SOG_UTENULTAGG,user());
 			current_cursor()->file().rewrite();
 		}			
 	}