From 67dee68ea4227e9cf7a3dee0bf856dad8aeb8436 Mon Sep 17 00:00:00 2001
From: Alessandro Bonazzi <alexbonazzi5652@gmail.com>
Date: Thu, 3 Oct 2024 18:57:44 +0200
Subject: [PATCH] Patch level         : 12.00 1358 Files correlati     :
 777.exe 777200c.msk xvaga.dll xi.dll
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Commento:
Possibilità di cambiare l'utente che invia la posta nell'invio certificazioni.
---
 src/m770/777200.cpp  |  3 +++
 src/m770/777200c.h   | 10 ++++++----
 src/m770/777200c.uml | 25 ++++++++++++++++++-------
 3 files changed, 27 insertions(+), 11 deletions(-)

diff --git a/src/m770/777200.cpp b/src/m770/777200.cpp
index 0c52d8920..89397bcba 100755
--- a/src/m770/777200.cpp
+++ b/src/m770/777200.cpp
@@ -1144,6 +1144,7 @@ bool TCU_mask::on_field_event(TOperable_field& o, TField_event e, long jolly)
         long percip;
         const long save_ditta = main_app().get_firm();
 
+				m.load();
         for (long codditta = daditta; codditta <= aditta; codditta++)
         {
           TString query;
@@ -1175,6 +1176,7 @@ bool TCU_mask::on_field_event(TOperable_field& o, TField_event e, long jolly)
           if (m.run() == K_ENTER)
           {
             set_test_mail(m.get(F_TESTEMAIL));
+						xvt_set_mail_params(nullptr, nullptr, m.get(F_FROMEMAIL), m.get(F_PASSWORD), nullptr);
 
             FOR_EACH_SHEET_ITEM(sh, r)
             {
@@ -1198,6 +1200,7 @@ bool TCU_mask::on_field_event(TOperable_field& o, TField_event e, long jolly)
             }
           }
         }
+				m.save();
         main_app().set_firm(save_ditta);
       }
       else
diff --git a/src/m770/777200c.h b/src/m770/777200c.h
index 7550f3cb9..c9e6e2278 100644
--- a/src/m770/777200c.h
+++ b/src/m770/777200c.h
@@ -1,8 +1,10 @@
 #define F_SHEET       201
-#define F_CCNEMAIL    202
-#define F_RECEIPT     203
-#define F_MESSAGE     204
-#define F_TESTEMAIL   205
+#define F_FROMEMAIL   202
+#define F_PASSWORD	  203
+#define F_CCNEMAIL    204
+#define F_RECEIPT     205
+#define F_MESSAGE     206
+#define F_TESTEMAIL   207
 
 #define S_SELECTED    101
 #define S_EMAIL       102
diff --git a/src/m770/777200c.uml b/src/m770/777200c.uml
index ca4a58bf1..20e17efe4 100644
--- a/src/m770/777200c.uml
+++ b/src/m770/777200c.uml
@@ -5,7 +5,7 @@ TOOLBAR "topbar" 0 0 0 2
 BUTTON DLG_ALL 2 2
 BEGIN
   PROMPT 1 2 "~Tutti"
-	PICTURE TOOL_MULTISEL
+  PICTURE TOOL_MULTISEL
 END
 
 BUTTON DLG_OK 2 2
@@ -20,30 +20,41 @@ ENDPAGE
 
 PAGE "Invio Certificazione unica" 0 2 0 0
 
+STRING F_FROMEMAIL 50
+BEGIN
+  PROMPT 1 1 "Email di invio   "
+END 
+
+STRING F_PASSWORD 50
+BEGIN
+  PROMPT 1 2 "Password         "
+  FLAGS "*"
+END 
+
 STRING F_CCNEMAIL 50
 BEGIN
-  PROMPT 1 1 "Email conoscenza "
+  PROMPT 1 3 "Email conoscenza "
 END 
 
 BOOLEAN F_RECEIPT
 BEGIN
-  PROMPT 70 1 "Ricevuta"
+  PROMPT 70 3 "Ricevuta"
 END
 
 ZOOM F_MESSAGE 50
 BEGIN
-  PROMPT 1 2 "Messaggio        "
+  PROMPT 1 4 "Messaggio        "
 END
 
 STRING F_TESTEMAIL 50
 BEGIN
-  PROMPT 1 3 "Email prova      "
+  PROMPT 1 5 "Email prova      "
   FLAGS "H"
 END
 
 SPREADSHEET F_SHEET -1 -1
 BEGIN
-  PROMPT 0 6 ""
+  PROMPT 0 7 ""
   ITEM "@1"
   ITEM "Email@50"
   ITEM "Tipo"
@@ -106,4 +117,4 @@ BEGIN
 END
 
 ENDPAGE
-ENDMASK
\ No newline at end of file
+ENDMASK