diff --git a/ca/ca3800.cpp b/ca/ca3800.cpp
index 9b0f3ead4..1ceb024e1 100755
--- a/ca/ca3800.cpp
+++ b/ca/ca3800.cpp
@@ -132,6 +132,10 @@ TPrint_bilancio_cms_mask::TPrint_bilancio_cms_mask()
     }	//if(levels>=2..
   }	//if(use_pdcc..
 	
+  //***ACHTUNG!!!***
+  //Questa chiamata serve per generare i campi fase/commessa esattamente come strutturati nella configurazione..
+  //..della contabilita' analitica; ma per il magico Adolfo non servono!!!
+  //ca_create_fields(*this, 0, LF_FASI, 2, 8, F_FASE1, F_DESCFASE1);
 	// setta gli handlers a tutti i campi generati della maschera;senza questa chiamata la on_field_event
 	// non puo' funzionare sui campi generati!!!
 	set_handlers();
diff --git a/ca/ca3800.uml b/ca/ca3800.uml
index 27dd47803..1ed214c51 100755
--- a/ca/ca3800.uml
+++ b/ca/ca3800.uml
@@ -76,29 +76,29 @@ BEGIN
   PROMPT 0 6 "@bParametri"
 END
 
+BOOLEAN F_VITAINTERA
+BEGIN
+  PROMPT 2 7 "Includere esercizi successivi (vita intera)"
+END
+
+RADIOBUTTON F_TIPOSTIMA 1 24
+BEGIN
+  PROMPT 45 7 "Tipo di stima"
+  FLAGS "Z"
+  ITEM "T|Tempo"
+  ITEM "C|Costi"
+END
+
 BOOLEAN F_FASI
 BEGIN
-  PROMPT 2 7 "Esplodere Fasi"
+  PROMPT 2 8 "Esplodere Fasi"
   MESSAGE FALSE CLEAR,F_FASE
   MESSAGE TRUE ENABLE,F_FASE
 END
 
 STRING F_FASE 10
 BEGIN
-  PROMPT 20 7 "Fase "
-END
-
-BOOLEAN F_VITAINTERA
-BEGIN
-  PROMPT 2 8 "Includere esercizi successivi (vita intera)"
-END
-
-RADIOBUTTON F_TIPOSTIMA 1 22
-BEGIN
-  PROMPT 40 8 "Tipo di stima"
-  FLAGS "Z"
-  ITEM "T|Tempo"
-  ITEM "C|Costi"
+  PROMPT 25 8 "Fase "
 END
 
 GROUPBOX F_PRE0 76 5
diff --git a/ca/ca3883.cpp b/ca/ca3883.cpp
index 24ee0e9d8..297cc089c 100755
--- a/ca/ca3883.cpp
+++ b/ca/ca3883.cpp
@@ -836,8 +836,17 @@ void TPrint_saldana_recordset::set_filter(const TMask& msk)
   {
     _tipostima = msk.get(F_TIPOSTIMA)[0];
 	  _vitaintera = msk.get_bool(F_VITAINTERA);
-	  _use_fasi = msk.get_bool(F_FASI);
-    _fase = msk.get(F_FASE);
-	  _depth = msk.get_int(F_DEPTH);
+    _depth = msk.get_int(F_DEPTH);
+
+    //trattazione delle fasi
+    _use_fasi = msk.get_bool(F_FASI);
+    _fase.cut(0);
+    if (_use_fasi)
+    {
+      /* ***gestione fasi multilivello
+      for (short id = F_FASE1; msk.id2pos(id) > 0; id++)
+        _fase << msk.get(id);*/
+      _fase = msk.get(F_FASE);
+    }  
   }
 }
diff --git a/ca/ca3883a.h b/ca/ca3883a.h
index 25254e43b..66372449c 100755
--- a/ca/ca3883a.h
+++ b/ca/ca3883a.h
@@ -13,6 +13,15 @@
 #define F_FASI					110
 #define F_DEPTH					111
 #define F_FASE          112
+/* campi per la generazione automatica
+#define F_FASE1         112
+#define F_FASE2         113
+#define F_FASE3         114
+#define F_FASE4         115
+#define F_DESCFASE1     116
+#define F_DESCFASE2     117
+#define F_DESCFASE3     118
+#define F_DESCFASE4     119*/
 
 //campi generati dai piani dei conti
 #define F_PRE0          320