diff --git a/cg/cg0200a.uml b/cg/cg0200a.uml
index 63230b7e8..ba1f2e209 100755
--- a/cg/cg0200a.uml
+++ b/cg/cg0200a.uml
@@ -595,17 +595,11 @@ BEGIN
   GROUP 6
 END
 
-GROUPBOX DLG_NULL 76 4
-BEGIN
-  PROMPT 1 4 "Banca"
-END
-
 NUMBER F_CODABI 5
 BEGIN
-  PROMPT 2 5 "Codice ABI         "
+  PROMPT 2 4 "Codice ABI          "
   FIELD LF_CLIFO->CODABI
   FLAGS "Z"
-//  USE %BAN KEY 1 SELECT CODTAB ?= "?????"
   USE %BAN
   INPUT CODTAB F_CODABI
   DISPLAY "Codice ABI" CODTAB[1,5]
@@ -620,10 +614,9 @@ END
 
 NUMBER F_CODBAN 5
 BEGIN
-  PROMPT 55 5 "Codice CAB "
+  PROMPT 56 4 "Codice CAB "
   FIELD LF_CLIFO->CODCAB
   FLAGS "Z"
-//      USE %BAN
   COPY USE F_CODABI
   INPUT CODTAB[1,5] F_CODABI 
   INPUT CODTAB[6,10] F_CODBAN
@@ -635,7 +628,7 @@ END
 
 STRING F_DESBAN 50
 BEGIN
-  PROMPT 2 6 "Denominazione      "
+  PROMPT 2 5 "Denominazione       "
   USE %BAN KEY 2
   INPUT S0 F_DESBAN
   DISPLAY "Denominazione@50" S0
@@ -646,42 +639,56 @@ END
 
 STRING F_CODVAL 3
 BEGIN
-  PROMPT 2 8 "Codice valuta      "
+  PROMPT 2 6 "Valuta      "
   FIELD LF_CLIFO->CODVAL
   USE %VAL
   INPUT CODTAB F_CODVAL
   DISPLAY "Codice valuta" CODTAB
   DISPLAY "Descrizione@50" S0
   OUTPUT F_CODVAL CODTAB
-  HELP "Codice valute per C/F esteri"
+  OUTPUT F_DESVAL S0
+  CHECKTYPE NORMAL
+END
+
+STRING F_DESVAL 50
+BEGIN
+  PROMPT 22 6 ""
+  USE %VAL KEY 2
+  INPUT S0 F_DESVAL
+  DISPLAY "Descrizione@50" S0
+  DISPLAY "Codice valuta" CODTAB
+  COPY OUTPUT F_CODVAL
   CHECKTYPE NORMAL
 END
 
 STRING F_CODLIN 1
 BEGIN
-  PROMPT 45 8 "Codice lingua           "
+  PROMPT 2 7 "Lingua        "
   FIELD LF_CLIFO->CODLIN
   USE %LNG
   INPUT CODTAB F_CODLIN
   DISPLAY "Codice lingua " CODTAB
   DISPLAY "Descrizione@50" S0
   OUTPUT F_CODLIN CODTAB
+  OUTPUT F_DESLIN S0
   HELP "Codice lingua per C/F esteri"
   CHECKTYPE NORMAL
 END
 
-NUMBER F_FIDO 15
+STRING F_DESLIN 50
 BEGIN
-  PROMPT 2 9 "Fido               "
-  FIELD LF_CLIFO->FIDO
-  FLAGS "R"
-  PICTURE "."
-  HELP "Importo massimo fido del cliente/fornitore"
+  PROMPT 22 7 ""
+  USE %LNG KEY 2
+  INPUT S0 F_DESLIN
+  DISPLAY "Descrizione@50" S0
+  DISPLAY "Codice lingua" CODTAB
+  COPY OUTPUT F_CODLIN
+  CHECKTYPE NORMAL
 END
 
 STRING F_CODPAG 4
 BEGIN
-  PROMPT 45 9 "Codice di pagamento     "
+  PROMPT 2 8 "Pagamento  "
   FIELD LF_CLIFO->CODPAG
   FLAGS "UZ"
   USE %CPG
@@ -689,10 +696,31 @@ BEGIN
   DISPLAY "Codice" CODTAB
   DISPLAY "Descrizione@50" S0
   OUTPUT F_CODPAG CODTAB
+  OUTPUT F_DESPAG S0
   HELP "Codice condizione di pagamento concordata"
   CHECKTYPE NORMAL
 END
 
+STRING F_DESPAG 50
+BEGIN
+  PROMPT 22 8 ""
+  USE %CPG KEY 2
+  INPUT S0 F_DESPAG
+  DISPLAY "Descrizione@50" S0
+  DISPLAY "Codice pagamento" CODTAB
+  COPY OUTPUT F_CODPAG
+  CHECKTYPE NORMAL
+END
+
+NUMBER F_FIDO 15
+BEGIN
+  PROMPT 2 9 "Fido                "
+  FIELD LF_CLIFO->FIDO
+  FLAGS "R"
+  PICTURE "."
+  HELP "Importo massimo fido del cliente/fornitore"
+END
+
 GROUPBOX DLG_NULL 76 4
 BEGIN
   PROMPT 1 10 "Conto cliente/fornitore"
diff --git a/cg/cg2200a.uml b/cg/cg2200a.uml
index 740dda614..7c07e0301 100755
--- a/cg/cg2200a.uml
+++ b/cg/cg2200a.uml
@@ -1,65 +1,65 @@
-#include "cg2200.h"
-
-PAGE "Eliminazione Movimenti Provvisori" -1 -1 42 9
-
-GROUPBOX DLG_NULL 40 3
-BEGIN
-  PROMPT 1 1 "Dal movimento"
-END
-
-DATE F_FROMDATE
-BEGIN
-  PROMPT 2 2 "Data "
-  HELP "Data del primo movimento provvisorio da eliminare"
-  USE LF_MOV KEY 2 SELECT PROVVIS="P"
-  INPUT DATAREG F_FROMDATE
-  INPUT NUMREG F_FROMREG
-  DISPLAY "Data@10" DATAREG
-  DISPLAY "Numero@6" NUMREG
-  DISPLAY "Causale" CODCAUS
-  DISPLAY "Documento" NUMDOC
-  DISPLAY "Descrizione@50" DESCR
-  OUTPUT F_FROMDATE DATAREG
-  OUTPUT F_FROMREG NUMREG
-END
-
-NUMBER F_FROMREG 5
-BEGIN
-  PROMPT 22 2 "Operazione "
-  FLAGS "DR"
-END
-
-GROUPBOX DLG_NULL 40 3
-BEGIN
-  PROMPT 1 4 "Al movimento"
-  HELP "Data dell'ultimo movimento provvisorio da eliminare"
-END
-
-DATE F_TODATE
-BEGIN
-  PROMPT 2 5 "Data "
-  COPY USE F_FROMDATE
-  INPUT DATAREG F_TODATE
-  INPUT NUMREG F_TOREG
-  COPY DISPLAY F_FROMDATE
-  OUTPUT F_TODATE DATAREG 
-  OUTPUT F_TOREG NUMREG 
-END
-
-NUMBER F_TOREG 5
-BEGIN
-  PROMPT 22 5 "Operazione "
-  FLAGS "DR"
-END
-
-BUTTON DLG_OK 10 2
-BEGIN 
-  PROMPT -12 -1 ""
-END  
-
-BUTTON DLG_QUIT 10 2
-BEGIN 
-  PROMPT -22 -1 ""
-END  
-
-ENDPAGE
+#include "cg2200.h"
+
+PAGE "Eliminazione Movimenti Provvisori" -1 -1 42 9
+
+GROUPBOX DLG_NULL 40 3
+BEGIN
+  PROMPT 1 1 "Dal movimento"
+END
+
+DATE F_FROMDATE
+BEGIN
+  PROMPT 2 2 "Data "
+  HELP "Data del primo movimento provvisorio da eliminare"
+  USE LF_MOV KEY 2 SELECT PROVVIS="P"
+  INPUT DATAREG F_FROMDATE
+  INPUT NUMREG F_FROMREG
+  DISPLAY "Data@10" DATAREG
+  DISPLAY "Numero@6" NUMREG
+  DISPLAY "Causale" CODCAUS
+  DISPLAY "Documento" NUMDOC
+  DISPLAY "Descrizione@50" DESCR
+  OUTPUT F_FROMDATE DATAREG
+  OUTPUT F_FROMREG NUMREG
+END
+
+NUMBER F_FROMREG 5
+BEGIN
+  PROMPT 22 2 "Operazione "
+  FLAGS "DR"
+END
+
+GROUPBOX DLG_NULL 40 3
+BEGIN
+  PROMPT 1 4 "Al movimento"
+  HELP "Data dell'ultimo movimento provvisorio da eliminare"
+END
+
+DATE F_TODATE
+BEGIN
+  PROMPT 2 5 "Data "
+  COPY USE F_FROMDATE
+  INPUT DATAREG F_TODATE
+  INPUT NUMREG F_TOREG
+  COPY DISPLAY F_FROMDATE
+  OUTPUT F_TODATE DATAREG 
+  OUTPUT F_TOREG NUMREG 
+END
+
+NUMBER F_TOREG 5
+BEGIN
+  PROMPT 22 5 "Operazione "
+  FLAGS "DR"
+END
+
+BUTTON DLG_OK 10 2
+BEGIN 
+  PROMPT -12 -1 ""
+END  
+
+BUTTON DLG_QUIT 10 2
+BEGIN 
+  PROMPT -22 -1 ""
+END  
+
+ENDPAGE
diff --git a/cg/cg5400b.uml b/cg/cg5400b.uml
index c12fdde0a..70b9c35f6 100755
--- a/cg/cg5400b.uml
+++ b/cg/cg5400b.uml
@@ -2,37 +2,9 @@
 
 PAGE "Ripristino stampa indici libro unico" -1 -1 78 11
 
-NUMBER F_FIRM 5
-BEGIN
-  PROMPT 4 1 "Ditta     "
-  FLAGS "RF"
-  USE LF_NDITTE KEY 1
-  CHECKTYPE NORMAL
-  INPUT CODDITTA F_FIRM
-  DISPLAY "Codice" CODDITTA
-  DISPLAY "Ragione sociale @50" RAGSOC
-  OUTPUT F_FIRM CODDITTA
-  OUTPUT F_DFIRM RAGSOC
-  HELP "Codice della ditta da cui prelevare i dati"
-  WARNING "Ditta assente"
-END
-
-STRING F_DFIRM 50
-BEGIN
-  PROMPT 22 1 ""
-  USE LF_NDITTE KEY 2
-  CHECKTYPE NORMAL
-  INPUT RAGSOC F_DFIRM
-  DISPLAY "Ragione sociale @50" RAGSOC
-  DISPLAY "Codice" CODDITTA
-  COPY OUTPUT F_FIRM
-  HELP "Ragione sociale della ditta da cui prelevare i dati"
-  WARNING "Ditta assente"
-END
-
 NUMBER F_YEAR 4
 BEGIN
-  PROMPT 4 3 "Anno      "
+  PROMPT 4 1 "Anno      "
   FLAGS "AR"
   CHECKTYPE REQUIRED
   HELP "Anno IVA"
@@ -41,7 +13,7 @@ END
 
 STRING F_REG 3
 BEGIN
-  PROMPT 4 5 "Libro unico "
+  PROMPT 4 3 "Libro unico "
   FLAGS "UZ"
   USE %LBU
   INPUT CODTAB[1,4] F_YEAR