From a355f6bb048ae44ecc370880f2222fb0a19358a5 Mon Sep 17 00:00:00 2001
From: luca <luca@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Mon, 4 Apr 2011 14:22:36 +0000
Subject: [PATCH] =?UTF-8?q?Patch=20level=20=20=20=20=20=20=20=20=20:10.0?=
 =?UTF-8?q?=20Files=20correlati=20=20=20=20=20:=20Ricompilazione=20Demo=20?=
 =?UTF-8?q?:=20[=20]=20Commento=20=20=20=20=20=20=20=20=20=20=20=20:=20dat?=
 =?UTF-8?q?acomp=20viene=20salvata=20uguale=20a=20datareg=20se=20non=20e'?=
 =?UTF-8?q?=20compilata=20dall'utonto=20(anche=20se=20il=20motivo=20=C3=A8?=
 =?UTF-8?q?=20l'impossibilita'=20utontica=20di=20scrivere=20sul=20campo=20?=
 =?UTF-8?q?datacomp=20stesso)?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

git-svn-id: svn://10.65.10.50/branches/R_10_00@21878 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 cg/cg2100.cpp  | 9 ++++++++-
 cg/cg2100b.uml | 1 +
 cg/cg2100c.uml | 1 +
 3 files changed, 10 insertions(+), 1 deletion(-)

diff --git a/cg/cg2100.cpp b/cg/cg2100.cpp
index f675df3cb..233fef7b8 100755
--- a/cg/cg2100.cpp
+++ b/cg/cg2100.cpp
@@ -1233,7 +1233,14 @@ int TPrimanota_application::write(const TMask& m)
     mask2rel(m);                                        // Altrimenti raddoppia i saldi!
   
   _last_dreg = m.get(F_DATAREG);  
-  _last_dcom = m.get(F_DATACOMP);  
+  _last_dcom = m.get(F_DATACOMP);
+  //l'handler della datacomp non viene chiamato quando il campo è read_only (vedi crpa e dinamica)
+  //si è quindi costretti a salvarlo "a mano" sul file delle testate movimento (04-04-2011)
+  if (!_last_dcom.ok())
+  {
+    _last_dcom = _last_dreg;
+    get_relation()->curr().put(MOV_DATACOMP, _last_dcom);
+  }
   
   const int err = _rel->write(true);
   if (err == NOERR)
diff --git a/cg/cg2100b.uml b/cg/cg2100b.uml
index 985e4c3cf..917f9d1a2 100755
--- a/cg/cg2100b.uml
+++ b/cg/cg2100b.uml
@@ -52,6 +52,7 @@ BEGIN
   PROMPT 1 4 "Data di competenza      "
   FIELD DATACOMP
   MESSAGE COPY,K_DATACOMP
+  FLAGS "G"
 END
 
 NUMBER F_ANNOES 4
diff --git a/cg/cg2100c.uml b/cg/cg2100c.uml
index d8e831c10..fc60bc0b5 100755
--- a/cg/cg2100c.uml
+++ b/cg/cg2100c.uml
@@ -68,6 +68,7 @@ DATE F_DATACOMP
 BEGIN
   PROMPT 1 4 "Data competenza "
   FIELD DATACOMP
+  FLAGS "G"
 END
 
 NUMBER F_ANNOES 4