diff --git a/cg/cg0300a.uml b/cg/cg0300a.uml
index 0b74bd1df..b071459d9 100755
--- a/cg/cg0300a.uml
+++ b/cg/cg0300a.uml
@@ -129,7 +129,7 @@ BEGIN
   FIELD LF_ALLEG->CODCF
   FLAGS "R"
   KEY 1
-	COPY ALL,F_ANNO
+	COPY ALL F_ANNO
   HELP "Indicare il codice relativo al cliente o fornitore"
   ADD RUN cg0 -1
 	WARNING "Registrazione assente"
diff --git a/cg/cg0500.cpp b/cg/cg0500.cpp
index d800876c0..f08d68d33 100755
--- a/cg/cg0500.cpp
+++ b/cg/cg0500.cpp
@@ -1,10 +1,10 @@
 // cg0500.cpp  - Tabella causali
 
 #include <applicat.h>
+#include <config.h>
 #include <msksheet.h>
 #include <relapp.h>
 #include <tabutil.h>
-#include <config.h>
 #include <utility.h>
 
 #include <causali.h>
@@ -290,17 +290,16 @@ bool TCaus_app::tipodoc_hndl (TMask_field& f, KEY k)
       f.mask().hide(F_TIPO_MOV_2);      
       if (app().saldaconto()) f.mask().show(F_TIPO_MOV_1);
 
-      f.mask().enable(F_COD_REG);
+      field_reg.enable();
       field_reg.check_type(CHECK_REQUIRED);
       
-      TipoIVA i = nessuna_iva;
       TTable tabtpd("%TPD");
       tabtpd.put("CODTAB", val);
 
       if (tabtpd.read() == NOERR)
       {
-        i = (TipoIVA)tabtpd.get_int("I0"); // IVA acquisti, vendite, generica
-        bool corrisp = tabtpd.get_bool("B0");
+        const TipoIVA i = (TipoIVA)tabtpd.get_int("I0"); // IVA acquisti, vendite, generica
+        const bool corrisp = tabtpd.get_bool("B0");
 
         if (i == 1)   // vendite
         {
@@ -327,16 +326,15 @@ bool TCaus_app::tipodoc_hndl (TMask_field& f, KEY k)
     }
     else         // TIPODOC vuoto || IN || PG || AN
     {
-      f.mask().set(F_COD_REG,"");
-      f.mask().disable(F_COD_REG);
-
+      field_reg.reset();
+      field_reg.disable();
       f.mask().hide(F_TIPO_MOV_1);
       if (app().saldaconto()) 
         f.mask().show(F_TIPO_MOV_2);      
     }
     
     // Ma davvero esiste il registro ?
-    const TString16 codreg(f.mask().get(F_COD_REG));
+    const TString16 codreg(field_reg.get());
     if (codreg.not_empty())
     {
       TRegistro registro(codreg, app().anno_iva());  
@@ -853,6 +851,7 @@ void TCaus_app::init_insert_mode(TMask& m)
 void TCaus_app::init_modify_mode(TMask& m)
 {
   init_mask(m);
+  m.efield(F_COD_REG).check_type(CHECK_NONE);   // Disabilita temporaneamente il check sui registri
 }
 
 
diff --git a/cg/cg1.url b/cg/cg1.url
index c44c674ef..b169aa746 100755
--- a/cg/cg1.url
+++ b/cg/cg1.url
@@ -3,21 +3,18 @@
 
 MENU TASK_MENUBAR
 	SUBMENU MENU_FILE "~File"
-	ITEM BAR_ITEM(1) "~Selezione" 
 
 
 MENUBAR MENU_BAR(1)
 
 MENU MENU_BAR(1)
 	SUBMENU MENU_FILE "~File"
-	ITEM BAR_ITEM(1) "~Selezione"
 
 
 MENUBAR MENU_BAR(2)
 
 MENU MENU_BAR(2)
 	SUBMENU MENU_FILE "~File"
-	SUBMENU BAR_ITEM(1) "~Sezione"
 
 MENU BAR_ITEM(1)
 	ITEM MENU_ITEM(1) "~Header"
@@ -33,17 +30,14 @@ MENUBAR MENU_BAR(4)
 
 MENU MENU_BAR(4)
 	SUBMENU MENU_FILE "~File"
-	ITEM BAR_ITEM(1)  "~Selezione"
 
 MENUBAR MENU_BAR(5)
 
 MENU MENU_BAR(5)
 	SUBMENU MENU_FILE   "~File"
-	ITEM BAR_ITEM(1)    "~Selezione"
 
 MENUBAR MENU_BAR(6)
 
 MENU MENU_BAR(6)
 	SUBMENU MENU_FILE   "~File"
-	ITEM BAR_ITEM(1)    "~Selezione"
 
diff --git a/cg/cg1500a.uml b/cg/cg1500a.uml
index 6644bb7c5..9a503bf24 100755
--- a/cg/cg1500a.uml
+++ b/cg/cg1500a.uml
@@ -1,239 +1,241 @@
-#include "cg1500.h"
-
-PAGE "Pag. 1" -1 -1 74 16
-
-NUMBER F_CODDITTA 5
-BEGIN
-	PROMPT 2 1 "Ditta             "
-    FLAGS "FRD"
-    USE LF_NDITTE KEY 1  
-    CHECKTYPE REQUIRED
-    INPUT CODDITTA F_CODDITTA
-    DISPLAY "Codice" CODDITTA
-	DISPLAY "Ragione sociale @50" RAGSOC
-	OUTPUT F_CODDITTA CODDITTA 
-    OUTPUT F_RAGSOC RAGSOC
-END
-
-STRING F_RAGSOC 50
-BEGIN
-  PROMPT 2 2 "Ragione sociale   "
-  FLAGS "D"
-END
-
-DATE F_DATASTAMPA 
-BEGIN
-  PROMPT 48 1 "Data stampa "
-  HELP "Data che verra' stampata sul bilancio"
-  FLAGS "A"
-END
-
-NUMBER F_ANNO 4
-BEGIN
-  PROMPT 2 3 "Anno esercizio    "
-  HELP "Anno di cui si vuole ottenre il bilancio"
-  USE ESC
-  INPUT CODTAB F_ANNO
-  DISPLAY "Anno" CODTAB
-  DISPLAY "Data inizio esercizio" D0
-  DISPLAY "Data fine esercizio" D1
-  OUTPUT F_ANNO CODTAB
-  //CHECKTYPE NORMAL
-  //MESSAGE HIDE,98|HIDE,99|SHOW,96|SHOW,97  //se il campo e' vuoto manda questi messaggi
-  //MESSAGE EMPTY HIDE,96|HIDE,97|SHOW,98|SHOW,99  //se invece e' pieno manda questi
-  FLAGS "RZ"
-END
-
-RADIOBUTTON F_BILANCIO 33
-BEGIN
-  PROMPT 2 5 "Tipo bilancio     "
-  HELP "Indicare il tipo di bilancio da stampare"
-  ITEM "1|Bilancio a sezioni contrapposte"
-  MESSAGE HIDE,F_STAMPA1|RESET,F_STAMPA1|HIDE,F_VERIFICA|RESET,F_VERIFICA
-  MESSAGE HIDE,F_STAMPAV|RESET,F_STAMPAV|HIDE,F_DATADA|RESET,F_DATADA
-  MESSAGE HIDE,F_DATAA|RESET,F_DATAA|HIDE,F_SITUAZIONE|RESET,F_SITUAZIONE
-  MESSAGE HIDE,F_ORDINAMENTO|RESET,F_ORDINAMENTO|HIDE,F_STAMPAC|RESET,F_STAMPAC 
-  MESSAGE HIDE,96|HIDE,97|HIDE,98|HIDE,99 
-  MESSAGE HIDE,F_MODULO|RESET,F_MODULO
-  MESSAGE SHOW,F_STAMPA|K_SPACE,F_STAMPA
-  ITEM "2|Bilancio di verifica"
-  MESSAGE HIDE,F_STAMPA|RESET,F_STAMPA
-  MESSAGE HIDE,F_DATALIM|RESET,F_DATALIM|HIDE,F_TOTALI|RESET,F_TOTALI
-  MESSAGE HIDE,F_CODICI|RESET,F_CODICI|HIDE,F_SALDO|RESET,F_SALDO
-  MESSAGE HIDE,F_STAMPAV|RESET,F_STAMPAV
-  MESSAGE SHOW,F_VERIFICA|K_SPACE,F_VERIFICA|SHOW,F_STAMPA1|K_SPACE,F_STAMPA1
-  MESSAGE SHOW,F_MODULO|K_SPACE,F_MODULO
-  MESSAGE SHOW,96|SHOW,97|SHOW,98|SHOW,99
-END  
-
-RADIOBUTTON F_STAMPA 28
-BEGIN
-  PROMPT 40 5 "Tipo stampa      "
-  HELP "Indicare il tipo di stampa"
-  ITEM "1|Per date limite"
-  MESSAGE SHOW,F_DATALIM|SHOW,F_TOTALI|SHOW,F_CODICI|SHOW,F_SALDO|SHOW,F_STAMPAMPROV
-  ITEM "2|All' ultima immissione"
-  MESSAGE HIDE,F_DATALIM|HIDE,F_STAMPAMPROV|RESET,F_DATALIM|RESET,F_STAMPAMPROV
-  MESSAGE SHOW,F_TOTALI|SHOW,F_CODICI|SHOW,F_SALDO
-END
-
-RADIOBUTTON F_STAMPA1 28
-BEGIN
-  PROMPT 40 5 "Tipo stampa      "
-  //FLAGS "G"
-  HELP "Indicare il tipo di stampa"
-  ITEM "1|Per date limite"
-  MESSAGE SHOW,F_VERIFICA|SHOW,F_MODULO
-  ITEM "2|All' ultima immissione"
-  MESSAGE SHOW,F_VERIFICA|SHOW,F_MODULO
-  MESSAGE COPY,F_STAMPA
-END  
-
-DATE F_DATALIM
-BEGIN
-  PROMPT 2 9 "Data limite      "
-  HELP "Data fino alla quale si vuole la stampa"
-END 
-
-BOOLEAN F_TOTALI 
-BEGIN
-  PROMPT 33 9 "Non stampare totali per gruppo "
-  HELP "Indicare se non si devono stampare i totali dei gruppi"
-END
-
-BOOLEAN F_CODICI 
-BEGIN
-  PROMPT 2 10 "Non stampare codici conti "
-  HELP "Indicare se non si devono stampare i codici dei conti"
-END
-
-BOOLEAN F_SALDO 
-BEGIN
-  PROMPT 33 10 "Non stampare movimenti con saldo a zero "
-  HELP "Indicare se non si devono stampare i movimenti con saldo nullo"
-END
-
-TEXT 96
-BEGIN
-  PROMPT 2 10 "Dalla data competenza "
-END
-
-TEXT 97
-BEGIN
-  PROMPT 38 10 "Alla data competenza "
-END
-
-TEXT 98
-BEGIN
-  PROMPT 2 10 "Dalla data operazione "
-END
-
-TEXT 99
-BEGIN
-  PROMPT 38 10 "Alla data operazione "
-END
-
-DATE F_DATADA
-BEGIN
-  PROMPT 24 10 ""
-  HELP "Data dalla quale iniziare la stampa"
-END
-
-DATE F_DATAA
-BEGIN
-  PROMPT 60 10 ""
-END
-
-BOOLEAN F_STAMPAMPROV
-BEGIN
-  PROMPT 2 11 "Stampa movimenti provvisori "
-  HELP "Indicare se stampare i movimenti provvisori"
-END
-
-BUTTON DLG_OK 9 2
-BEGIN
-  PROMPT -12 -1 ""
-END
-
-BUTTON DLG_QUIT 9 2
-BEGIN
-	PROMPT -22 -1 ""
-END
-
-ENDPAGE
-
-PAGE "Pag. 2" -1 -1 74 20
-
-RADIOBUTTON F_VERIFICA 27
-BEGIN
-  PROMPT 2 1 "Stampa bilancio di verifica "
-  HELP "Tipo di bilancio di verifica"
-  ITEM "1|Bilancio"
-  ITEM "2|Saldi di mastro"
-  ITEM "3|Situazione C/F"
-END  
-
-RADIOBUTTON F_STAMPAC 35
-BEGIN
-  PROMPT 35 1 "Tipo stampa "
-  HELP "Help tipo di stampa del bilancio"
-  ITEM "1|Conti movimentati"
-  ITEM "2|Conti con saldo diverso da zero"
-END
-
-RADIOBUTTON F_STAMPAV 35
-BEGIN
-  PROMPT 35 1 "Tipo stampa "
-  HELP "Help tipo di stampa del bilancio"
-  ITEM "1|Conti movimentati"
-  ITEM "2|Conti con saldo diverso da zero"
-  ITEM "3|Tutti i conti"
-END
-
-LIST F_MODULO 10
-BEGIN
-  PROMPT 2 8 "Stampa su modulo stretto "
-  HELP "Indicare il numero di caratteri del foglio (larghezza)"
-  ITEM "1|132 crt."
-  ITEM "2|198 crt."
-END
-
-LIST F_SITUAZIONE 11
-BEGIN
-  PROMPT 2 10 "Tipo situazione  "
-  HELP "Indicare il tipo di situazione che si vuole ottenere"
-  ITEM " |Entrambi"
-  ITEM "C|Clienti"
-  ITEM "F|Fornitori"
-END
-
-/*
-RADIOBUTTON F_STAMPAC 35
-BEGIN
-  PROMPT 37 10 "Tipo stampa "
-  ITEM "1|Conti movimentati"
-  ITEM "2|Conti con saldo diverso da zero"
-END
-*/
-
-LIST F_ORDINAMENTO 11
-BEGIN
-  PROMPT 2 11 "Tipo ordinamento "
-  HELP "Indicare il tipo di ordinamento da effettuare"
-  ITEM "1|Per codice"
-  ITEM "2|Alfabetico"
-END
-
-BUTTON DLG_OK 9 2
-BEGIN
-  PROMPT -12 -1 ""
-END
-
-BUTTON DLG_QUIT 9 2
-BEGIN
-  PROMPT -22 -1 ""
-END
-
-ENDPAGE
-
-ENDMASK
+#include "cg1500.h"
+
+PAGE "Stampa bilancio" -1 -1 74 16
+
+NUMBER F_CODDITTA 5
+BEGIN
+	PROMPT 2 1 "Ditta             "
+    FLAGS "FRD"
+    USE LF_NDITTE KEY 1  
+    CHECKTYPE REQUIRED
+    INPUT CODDITTA F_CODDITTA
+    DISPLAY "Codice" CODDITTA
+	DISPLAY "Ragione sociale @50" RAGSOC
+	OUTPUT F_CODDITTA CODDITTA 
+    OUTPUT F_RAGSOC RAGSOC
+END
+
+STRING F_RAGSOC 50
+BEGIN
+  PROMPT 2 2 "Ragione sociale   "
+  FLAGS "D"
+END
+
+DATE F_DATASTAMPA 
+BEGIN
+  PROMPT 48 1 "Data stampa "
+  HELP "Data che verra' stampata sul bilancio"
+  FLAGS "A"
+END
+
+NUMBER F_ANNO 4
+BEGIN
+  PROMPT 2 3 "Anno esercizio    "
+  HELP "Anno di cui si vuole ottenere il bilancio"
+  USE ESC
+  INPUT CODTAB F_ANNO
+  DISPLAY "Anno" CODTAB
+  DISPLAY "Data inizio esercizio" D0
+  DISPLAY "Data fine esercizio" D1
+  OUTPUT F_ANNO CODTAB
+  //CHECKTYPE NORMAL
+  //MESSAGE HIDE,98|HIDE,99|SHOW,96|SHOW,97  //se il campo e' vuoto manda questi messaggi
+  //MESSAGE EMPTY HIDE,96|HIDE,97|SHOW,98|SHOW,99  //se invece e' pieno manda questi
+  FLAGS "RZ"
+END
+
+RADIOBUTTON F_BILANCIO 33
+BEGIN
+  PROMPT 2 5 "Tipo bilancio     "
+  HELP "Indicare il tipo di bilancio da stampare"
+  ITEM "1|Bilancio a sezioni contrapposte"
+  MESSAGE HIDE,F_STAMPA1|RESET,F_STAMPA1|HIDE,F_VERIFICA|RESET,F_VERIFICA
+  MESSAGE HIDE,F_STAMPAV|RESET,F_STAMPAV|HIDE,F_DATADA|RESET,F_DATADA
+  MESSAGE HIDE,F_DATAA|RESET,F_DATAA|HIDE,F_SITUAZIONE|RESET,F_SITUAZIONE
+  MESSAGE HIDE,F_ORDINAMENTO|RESET,F_ORDINAMENTO|HIDE,F_STAMPAC|RESET,F_STAMPAC 
+  MESSAGE HIDE,96|HIDE,97|HIDE,98|HIDE,99 
+  MESSAGE HIDE,F_MODULO|RESET,F_MODULO
+  MESSAGE SHOW,F_STAMPA|K_SPACE,F_STAMPA
+  MESSAGE HIDE,DLG_PAGE
+  ITEM "2|Bilancio di verifica"
+  MESSAGE HIDE,F_STAMPA|RESET,F_STAMPA
+  MESSAGE HIDE,F_DATALIM|RESET,F_DATALIM|HIDE,F_TOTALI|RESET,F_TOTALI
+  MESSAGE HIDE,F_CODICI|RESET,F_CODICI|HIDE,F_SALDO|RESET,F_SALDO
+  MESSAGE HIDE,F_STAMPAV|RESET,F_STAMPAV
+  MESSAGE SHOW,F_VERIFICA|K_SPACE,F_VERIFICA|SHOW,F_STAMPA1|K_SPACE,F_STAMPA1
+  MESSAGE SHOW,F_MODULO|K_SPACE,F_MODULO
+  MESSAGE SHOW,96|SHOW,97|SHOW,98|SHOW,99
+  MESSAGE SHOW,DLG_PAGE
+END  
+
+RADIOBUTTON F_STAMPA 28
+BEGIN
+  PROMPT 40 5 "Tipo stampa      "
+  HELP "Indicare il tipo di stampa"
+  ITEM "1|Per date limite"
+  MESSAGE SHOW,F_DATALIM|SHOW,F_TOTALI|SHOW,F_CODICI|SHOW,F_SALDO|SHOW,F_STAMPAMPROV
+  ITEM "2|All' ultima immissione"
+  MESSAGE HIDE,F_DATALIM|HIDE,F_STAMPAMPROV|RESET,F_DATALIM|RESET,F_STAMPAMPROV
+  MESSAGE SHOW,F_TOTALI|SHOW,F_CODICI|SHOW,F_SALDO
+END
+
+RADIOBUTTON F_STAMPA1 28
+BEGIN
+  PROMPT 40 5 "Tipo stampa      "
+  //FLAGS "G"
+  HELP "Indicare il tipo di stampa"
+  ITEM "1|Per date limite"
+  MESSAGE SHOW,F_VERIFICA|SHOW,F_MODULO
+  ITEM "2|All' ultima immissione"
+  MESSAGE SHOW,F_VERIFICA|SHOW,F_MODULO
+  MESSAGE COPY,F_STAMPA
+END  
+
+DATE F_DATALIM
+BEGIN
+  PROMPT 2 9 "Data limite      "
+  HELP "Data fino alla quale si vuole la stampa"
+END 
+
+BOOLEAN F_TOTALI 
+BEGIN
+  PROMPT 33 9 "Non stampare totali per gruppo "
+  HELP "Indicare se non si devono stampare i totali dei gruppi"
+END
+
+BOOLEAN F_CODICI 
+BEGIN
+  PROMPT 2 10 "Non stampare codici conti "
+  HELP "Indicare se non si devono stampare i codici dei conti"
+END
+
+BOOLEAN F_SALDO 
+BEGIN
+  PROMPT 33 10 "Non stampare movimenti con saldo a zero "
+  HELP "Indicare se non si devono stampare i movimenti con saldo nullo"
+END
+
+TEXT 96
+BEGIN
+  PROMPT 2 10 "Dalla data competenza "
+END
+
+TEXT 97
+BEGIN
+  PROMPT 38 10 "Alla data competenza "
+END
+
+TEXT 98
+BEGIN
+  PROMPT 2 10 "Dalla data operazione "
+END
+
+TEXT 99
+BEGIN
+  PROMPT 38 10 "Alla data operazione "
+END
+
+DATE F_DATADA
+BEGIN
+  PROMPT 24 10 ""
+  HELP "Data dalla quale iniziare la stampa"
+END
+
+DATE F_DATAA
+BEGIN
+  PROMPT 60 10 ""
+END
+
+BOOLEAN F_STAMPAMPROV
+BEGIN
+  PROMPT 2 11 "Stampa movimenti provvisori "
+  HELP "Indicare se stampare i movimenti provvisori"
+END
+
+BUTTON DLG_OK 9 2
+BEGIN
+  PROMPT -12 -1 ""
+END
+
+BUTTON DLG_QUIT 9 2
+BEGIN
+	PROMPT -22 -1 ""
+END
+
+ENDPAGE
+
+PAGE "Stampa bilancio di verifica" -1 -1 74 20
+
+RADIOBUTTON F_VERIFICA 27
+BEGIN
+  PROMPT 2 1 "Stampa bilancio di verifica "
+  HELP "Tipo di bilancio di verifica"
+  ITEM "1|Bilancio"
+  ITEM "2|Saldi di mastro"
+  ITEM "3|Situazione C/F"
+END  
+
+RADIOBUTTON F_STAMPAC 35
+BEGIN
+  PROMPT 35 1 "Tipo stampa "
+  HELP "Help tipo di stampa del bilancio"
+  ITEM "1|Conti movimentati"
+  ITEM "2|Conti con saldo diverso da zero"
+END
+
+RADIOBUTTON F_STAMPAV 35
+BEGIN
+  PROMPT 35 1 "Tipo stampa "
+  HELP "Help tipo di stampa del bilancio"
+  ITEM "1|Conti movimentati"
+  ITEM "2|Conti con saldo diverso da zero"
+  ITEM "3|Tutti i conti"
+END
+
+LIST F_MODULO 10
+BEGIN
+  PROMPT 2 8 "Stampa su modulo stretto "
+  HELP "Indicare il numero di caratteri del foglio (larghezza)"
+  ITEM "1|132 crt."
+  ITEM "2|198 crt."
+END
+
+LIST F_SITUAZIONE 11
+BEGIN
+  PROMPT 2 10 "Tipo situazione  "
+  HELP "Indicare il tipo di situazione che si vuole ottenere"
+  ITEM " |Entrambi"
+  ITEM "C|Clienti"
+  ITEM "F|Fornitori"
+END
+
+/*
+RADIOBUTTON F_STAMPAC 35
+BEGIN
+  PROMPT 37 10 "Tipo stampa "
+  ITEM "1|Conti movimentati"
+  ITEM "2|Conti con saldo diverso da zero"
+END
+*/
+
+LIST F_ORDINAMENTO 11
+BEGIN
+  PROMPT 2 11 "Tipo ordinamento "
+  HELP "Indicare il tipo di ordinamento da effettuare"
+  ITEM "1|Per codice"
+  ITEM "2|Alfabetico"
+END
+
+BUTTON DLG_OK 9 2
+BEGIN
+  PROMPT -12 -1 ""
+END
+
+BUTTON DLG_QUIT 9 2
+BEGIN
+  PROMPT -22 -1 ""
+END
+
+ENDPAGE
+
+ENDMASK
diff --git a/cg/cg2103.cpp b/cg/cg2103.cpp
index 9d525680c..c93e6e03e 100755
--- a/cg/cg2103.cpp
+++ b/cg/cg2103.cpp
@@ -312,14 +312,14 @@ bool TCausale::read(const char* cod, int year)
     rcaus.put(CAU_CODCAUS, cod);
     rcaus.put(CAU_NRIGA, 0);          
     
-    err = rcaus.read(_isgteq);                         // Find first line
-    if (err != NOERR) return FALSE;
-    
-    while (err == NOERR && rcaus.get(CAU_CODCAUS) == cod)
+    for (err = rcaus.read(_isgteq);                       // Find first line
+         err == NOERR && rcaus.get(CAU_CODCAUS) == cod;
+         err = rcaus.next()                               // Read next line
+         )
     {
       const int riga = rcaus.get_int(CAU_NRIGA);
       add(rcaus.curr(), riga);
-      err = rcaus.next();                              // Read next line
+      
     } 
     rcaus.zero();                                      
     for (int riga = 1; riga < size(); riga++)          // Fill gaps