From 5cf8928b911d36f43f1b2301f928d17b57b3c26d Mon Sep 17 00:00:00 2001
From: alex <alex@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Wed, 5 Jul 1995 16:55:25 +0000
Subject: [PATCH] Errore MI3188

git-svn-id: svn://10.65.10.50/trunk@1564 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 ba/ba4300.cpp  |  4 ++--
 ba/ba4500a.uml | 37 +++++++++++++++++++------------------
 2 files changed, 21 insertions(+), 20 deletions(-)

diff --git a/ba/ba4300.cpp b/ba/ba4300.cpp
index 3f3187a6c..26febc17d 100755
--- a/ba/ba4300.cpp
+++ b/ba/ba4300.cpp
@@ -214,7 +214,7 @@ void TDitte_application::set_att_prev(const TMask& m)
     _attiv->zero() ;
     _attiv->put(CODDITTA, codditta) ;
     _attiv->put(CODATT, _oldattprev);
-    if (_attiv->read() == NOERR)
+    if (_attiv->read(_isequal, _lock) == NOERR)
     {
       _attiv->put("ATTPREV", FALSE);
       if (_attiv->rewrite() != NOERR)
@@ -225,7 +225,7 @@ void TDitte_application::set_att_prev(const TMask& m)
   _attiv->put(CODDITTA, codditta) ;
   _attiv->put(CODATT, attprev) ;
   
-  const bool itwas = _attiv->read() == NOERR;
+  const bool itwas = _attiv->read(_isequal, _lock) == NOERR;
   if (!itwas)
   {
     _attiv->zero() ;
diff --git a/ba/ba4500a.uml b/ba/ba4500a.uml
index 9d90f5f40..9382ce80d 100755
--- a/ba/ba4500a.uml
+++ b/ba/ba4500a.uml
@@ -6,12 +6,6 @@ ENDPAGE
 
 PAGE "Attivita' 1/2" -1 -1 77 20
 
-GROUPBOX DLG_NULL 76 6
-BEGIN
-  PROMPT 0 0 ""
-  FLAGS "R"
-END
-
 STRING FLD_AT1_CODDITTA 5
 BEGIN
   PROMPT 1 1 "Ditta           "
@@ -101,7 +95,8 @@ BEGIN
   PROMPT 55 3 "Prevalente"
   FIELD LF_ATTIV->ATTPREV
   FLAGS "DG"
-  MESSAGE COPY,5@
+  MESSAGE TRUE  COPY,5@
+  MESSAGE FALSE COPY,5@
 END
 
 STRING FLD_AT1_ATTCODATT_TABATT_DESCR 50
@@ -109,10 +104,16 @@ BEGIN
   PROMPT 1 4 "Nome Attivita'  "
   FIELD LF_ATTIV->DESCR
   MESSAGE COPY,4@
-  KEY 1
+  KEY 2
   HELP "Nome dell'attivita'"
 END
 
+GROUPBOX DLG_NULL 76 6
+BEGIN
+  PROMPT 0 0 ""
+  FLAGS "R"
+END
+
 STRING FLD_AT1_OLDCODATT 4
 BEGIN
   PROMPT 1 6 "Vecchio codice  "
@@ -295,27 +296,21 @@ ENDPAGE
 
 PAGE "Attivita' 2/2" -1 -1 77 20
 
-GROUPBOX DLG_NULL 76 6
-BEGIN
-  PROMPT 0 0 ""
-	FLAGS "R"
-END
-
-STRING FLD_AT1_CODDITTA 5
+STRING DLG_NULL 5
 BEGIN
   PROMPT 1 1 "Ditta           "
   FLAGS "RD"
   GROUP 1
 END
 
-STRING FLD_AT1_PROGD_NDITTE_RAGSOC 50
+STRING DLG_NULL 50
 BEGIN
   PROMPT 1 2 "Ragione sociale "
   FLAGS "D"
   GROUP 2
 END
 
-STRING FLD_AT1_CODATTH 5
+STRING DLG_NULL 5
 BEGIN
   PROMPT 1 3 "Codice Attivita'"
   FLAGS "URZD"
@@ -329,13 +324,19 @@ BEGIN
   GROUP 5
 END
 
-STRING FLD_AT1_ATTCODATT_TABATT_DESCR 50
+STRING DLG_NULL 50
 BEGIN
   PROMPT 1 4 "Nome Attivita'  "
   FLAGS "D"
   GROUP 4
 END
 
+GROUPBOX DLG_NULL 76 6
+BEGIN
+  PROMPT 0 0 ""
+	FLAGS "R"
+END
+
 TEXT DLG_NULL
 BEGIN
   PROMPT 1 11 "Indirizzo (Solo se diverso)"