diff --git a/ba/batbdpn.uml b/ba/batbdpn.uml
index 6ba1cf4ae..1b438185a 100755
--- a/ba/batbdpn.uml
+++ b/ba/batbdpn.uml
@@ -12,7 +12,7 @@ STRING F_CODICE 5
 BEGIN
   PROMPT 4 2 "Codice      "
   FIELD LF_TABCOM->CODTAB
-  FLAGS "U"
+  FLAGS "UZ"
   KEY 1
   USE %DPN 
   INPUT CODTAB F_CODICE
diff --git a/cg/cg2100b.uml b/cg/cg2100b.uml
index bef6a9caa..6b7b78229 100755
--- a/cg/cg2100b.uml
+++ b/cg/cg2100b.uml
@@ -86,7 +86,7 @@ STRING F_DESCAGG 5
 BEGIN
   PROMPT 1 6 "Descrizione     "
   HELP "Codice descrizione del movimento di contabilita'"
-  FLAGS "U"
+  FLAGS "UZ"
   USE %DPN
   INPUT CODTAB F_DESCAGG
   DISPLAY "Codice" CODTAB
diff --git a/cg/cg2100c.uml b/cg/cg2100c.uml
index 8a900abdd..1a877c0d7 100755
--- a/cg/cg2100c.uml
+++ b/cg/cg2100c.uml
@@ -1,666 +1,666 @@
-#include "cg2100.h"
-
-TOOLBAR "" 0 20 0 2
-#include <toolbar.h>
-ENDPAGE
-
-PAGE "OPERAZIONE DI PRIMA NOTA" -1 -1 77 20
-
-NUMBER F_GRUPPOCLIFO 3
-BEGIN
-  FLAGS "H"
-END
-
-NUMBER F_CONTOCLIFO 3
-BEGIN
-  FLAGS "H"
-END
-
-NUMBER F_GRUPPORIC 3
-BEGIN
-  FLAGS "H"
-END
-
-NUMBER F_CONTORIC 3
-BEGIN
-  FLAGS "H"
-END
-
-NUMBER F_SOTTOCONTORIC 6
-BEGIN
-  FLAGS "H"
-END
-
-GROUPBOX DLG_NULL 78 3
-BEGIN
-  PROMPT 1 0 "@BMovimento IVA"
-END
-
-NUMBER F_CODDITTA 5
-BEGIN
-  PROMPT 3 1 "Ditta  "
-  FLAGS "FGRD"
-  USE LF_NDITTE KEY 1
-  INPUT CODDITTA F_CODDITTA
-  DISPLAY "Codice" CODDITTA
-  OUTPUT F_RAGSOC RAGSOC
-  CHECKTYPE REQUIRED
-END
-
-STRING F_RAGSOC 50
-BEGIN
-  PROMPT 17 1 "Ragione "
-  FLAGS "DG"
-END
-
-NUMBER F_NUMREG 6
-BEGIN
-  PROMPT 57 3 "Operazione n. "
-  FIELD NUMREG
-  FLAGS "RDG"
-  KEY 1
-  MESSAGE COPY,H_NUMREG
-END
-
-DATE F_DATAREG
-BEGIN
-  PROMPT 1 3 "Data operazione "
-  HELP "Data in cui viene registrata l'operazione"
-  FIELD LF_MOV->DATAREG
-  MESSAGE COPY,H_DATAREG|COPY,F_DATA74TER|COPY,F_ANNOIVA,7,10
-END
-
-DATE F_DATACOMP
-BEGIN
-  PROMPT 1 4 "Data competenza "
-  HELP "Data di competenza dell'operazione"
-  FIELD LF_MOV->DATACOMP
-END
-
-DATE F_DATADOC
-BEGIN
-  PROMPT 1 5 "Data documento  "
-  FIELD LF_MOV->DATADOC 
-  HELP "Data del documento che ha generato il movimento"
-  WARNING "Inserire una data documento non superiore alla data dell'operazione"
-  VALIDATE DATE_CMP_FUNC <= F_DATAREG
-END
-
-NUMBER F_ANNOIVA 4
-BEGIN
-  PROMPT 32 3 "Anno IVA       "
-  FIELD LF_MOV->ANNOIVA
-  FLAGS "D"
-END
-
-NUMBER F_ANNOES 4
-BEGIN
-  PROMPT 32 4 "Anno esercizio "
-  FIELD LF_MOV->ANNOES
-  FLAGS "DGZ"
-  MESSAGE COPY,H_ANNOES
-END
-
-STRING F_TIPODOC 2
-BEGIN
-  PROMPT 32 5 "Tipo documento "
-  FIELD LF_MOV->TIPODOC
-  FLAGS "D"
-END
-
-STRING F_NUMDOC 7
-BEGIN
-  PROMPT 57 5 "Documento n. "
-  HELP "Numero del documento che ha generato il movimento"
-  FIELD LF_MOV->NUMDOC
-  WARNING "La causale impone di specificare il numero documento"
-END
-
-STRING F_DESCAGG 5
-BEGIN
-  PROMPT 1 6 "Descrizione     "
-  HELP "Codice della descrizione del movimento"
-  FLAGS "U"
-  USE %DPN
-  INPUT CODTAB F_DESCAGG
-  DISPLAY "Codice" CODTAB
-  DISPLAY "Descrizione@50" S0
-  OUTPUT F_DESCAGG CODTAB
-  OUTPUT F_DESCR S0
-  CHECKTYPE NORMAL
-  WARNING "Descrizione assente"
-END
-
-STRING F_DESCR 50
-BEGIN
-  PROMPT 25 6 ""
-  HELP "Descrizione del movimento"
-  FIELD LF_MOV->DESCR
-  USE %DPN KEY 2
-  INPUT S0 F_DESCR
-  DISPLAY "Descrizione@50" S0
-  DISPLAY "Codice" CODTAB
-  COPY OUTPUT F_DESCAGG
-END
-
-BOOLEAN F_SOLAIVA
-BEGIN
-  PROMPT 1 7 "Movimento di sola IVA"
-  HELP "Indicare se non vi sono righe di contabilita'"
-END
-
-LIST F_PROVVISORIO 1 25
-BEGIN
-  PROMPT 31 7 "Movimento provvisorio "
-  HELP "Indicare se si tratta di movimento provvisorio"
-  FIELD PROVVIS
-  ITEM " |No (movimento normale)"
-  ITEM "P|Si (cancellabile)"     
-  ITEM "N|Si (non cancellabile)"
-END
-
-STRING F_CODCAUS 3
-BEGIN
-  PROMPT 1 8 "Causale      "
-  HELP "Codice della causale generante l'operazione"
-  FLAGS "U"
-  FIELD LF_MOV->CODCAUS
-  USE LF_CAUSALI SELECT REG!=""
-  INPUT CODCAUS F_CODCAUS
-  DISPLAY "Codice" CODCAUS
-  DISPLAY "Descrizione@50" DESCR
-  DISPLAY "Tipo" TIPODOC
-  DISPLAY "Registro" REG
-  OUTPUT F_CODCAUS CODCAUS
-  OUTPUT F_DESCRCAUS DESCR
-  OUTPUT F_CODREG REG
-  OUTPUT F_TIPODOC TIPODOC
-  MESSAGE COPY,H_CODCAUS
-  CHECKTYPE REQUIRED
-  ADD RUN cg0 -4
-END
-
-STRING F_DESCRCAUS 50
-BEGIN
-  PROMPT 25 8 ""
-  HELP "Descrizione della causale generante l'operazione"
-  USE LF_CAUSALI KEY 2 SELECT REG!=""
-  INPUT DESCR F_DESCRCAUS
-  DISPLAY "Descrizione@50" DESCR
-  DISPLAY "Codice" CODCAUS
-  DISPLAY "Tipo" TIPODOC
-  DISPLAY "Registro" REG
-  COPY OUTPUT F_CODCAUS
-  MESSAGE COPY,H_DESCRCAUS
-  CHECKTYPE REQUIRED
-  ADD RUN cg0 -4
-END
-
-STRING F_CODREG 3
-BEGIN
-  PROMPT 1 9 "Registro IVA "
-  FLAGS "DG"
-  FIELD LF_MOV->REG
-END
-
-NUMBER F_PROTIVA 5
-BEGIN
-  PROMPT 27 9 "Protocollo IVA "
-  HELP "Numero progressivo di protocollo IVA"
-  FIELD LF_MOV->PROTIVA
-END
-
-NUMBER F_RIEPILOGO 5
-BEGIN
-  PROMPT 51 9 "Riepilogo fino al n. "
-  HELP "Numero finale del documento ripilogativo di protocollo IVA"
-  FIELD LF_MOV->UPROTIVA
-  NUM_EXPR {(#F_RIEPILOGO==0)||(#F_RIEPILOGO>=#F_PROTIVA)}
-  WARNING "Inserire un riepilogo non inferiore al protocollo IVA   (Obbigatorio se il cliete/fornitore ha codice inserimento in  allegati uguale a 3)"
-END
-
-STRING F_CLIFO 1
-BEGIN
-  PROMPT 0 10 ""
-  FIELD TIPO
-  FLAGS "H"
-END
-
-NUMBER F_CLIENTE 6
-BEGIN
-  PROMPT 1 10 "Cliente      "
-  HELP "Codice del cliente del documento"
-  FIELD LF_MOV->CODCF
-  GROUP 1
-  USE LF_CLIFO KEY 1
-  INPUT TIPOCF "C"
-  INPUT CODCF F_CLIENTE
-  DISPLAY "Codice" CODCF
-  DISPLAY "Ragione Sociale@50" RAGSOC
-  DISPLAY "Partita IVA@12" PAIV
-  OUTPUT F_CLIFO TIPOCF
-  OUTPUT F_CLIENTE CODCF
-  OUTPUT F_RAGSOCCLIENTE RAGSOC
-  OUTPUT F_GRUPPOCLIFO GRUPPO
-  OUTPUT F_CONTOCLIFO CONTO
-  OUTPUT F_GRUPPORIC GRUPPORIC
-  OUTPUT F_CONTORIC CONTORIC
-  OUTPUT F_SOTTOCONTORIC SOTTOCRIC
-  OUTPUT F_CODPAG CODPAG
-  OUTPUT F_STATOPAIV STATOPAIV
-  OUTPUT F_PIVACLIENTE PAIV
-  OUTPUT F_OCCASIONALE OCCAS
-  MESSAGE COPY,F_FORNITORE
-  CHECKTYPE REQUIRED
-  WARNING "Cliente assente"
-  ADD RUN cg0 -1 C
-END
-
-NUMBER F_FORNITORE 6
-BEGIN
-  PROMPT 1 10 "Fornitore    "
-  HELP "Codice del fornitore del documento"
-  FIELD LF_MOV->CODCF
-  GROUP 2
-  USE LF_CLIFO KEY 1
-  INPUT TIPOCF "F"
-  INPUT CODCF F_FORNITORE
-  DISPLAY "Codice" CODCF
-  DISPLAY "Ragione Sociale@50" RAGSOC
-  DISPLAY "Partita IVA@12" PAIV
-  OUTPUT F_CLIFO TIPOCF
-  OUTPUT F_FORNITORE CODCF
-  OUTPUT F_RAGSOCFORNITORE RAGSOC
-  OUTPUT F_GRUPPOCLIFO GRUPPO
-  OUTPUT F_CONTOCLIFO CONTO
-  OUTPUT F_GRUPPORIC GRUPPORIC
-  OUTPUT F_CONTORIC CONTORIC
-  OUTPUT F_SOTTOCONTORIC SOTTOCRIC
-  OUTPUT F_OCCASIONALE OCCAS
-  OUTPUT F_CODPAG CODPAG
-  OUTPUT F_STATOPAIV STATOPAIV
-  OUTPUT F_PIVAFORNITORE PAIV
-  MESSAGE COPY,F_CLIENTE
-  CHECKTYPE REQUIRED
-  WARNING "Fornitore assente"
-  ADD RUN cg0 -1 F
-END
-
-STRING F_RAGSOCFORNITORE 50
-BEGIN
-  PROMPT 25 10 ""
-  HELP "Ragione sociale del fornitore del documento"
-  GROUP 2
-  USE LF_CLIFO KEY 2
-  INPUT TIPOCF "F"
-  INPUT RAGSOC F_RAGSOCFORNITORE
-  DISPLAY "Ragione Sociale@50" RAGSOC
-  DISPLAY "Partita IVA@12" PAIV
-  DISPLAY "Codice" CODCF
-  COPY OUTPUT F_FORNITORE
-  CHECKTYPE REQUIRED
-  ADD RUN cg0 -1 F
-END
-
-STRING F_RAGSOCCLIENTE 50
-BEGIN
-  PROMPT 25 10 ""
-  HELP "Ragione sociale del cliente del documento"
-  GROUP 1
-  USE LF_CLIFO KEY 2
-  INPUT TIPOCF "C"
-  INPUT RAGSOC F_RAGSOCCLIENTE
-  DISPLAY "Ragione Sociale@50" RAGSOC
-  DISPLAY "Partita IVA@12" PAIV
-  DISPLAY "Codice" CODCF
-  COPY OUTPUT F_CLIENTE
-  CHECKTYPE REQUIRED
-  ADD RUN cg0 -1 C
-END
-
-STRING F_PIVACLIENTE 14
-BEGIN
-  PROMPT 1 11 "Partita IVA  "
-  HELP "Partita IVA del cliente del documento"
-  GROUP 1
-  USE LF_CLIFO KEY 5
-  INPUT TIPOCF "C"
-  INPUT STATOPAIV F_STATOPAIV
-  INPUT PAIV F_PIVACLIENTE
-  DISPLAY "Partita IVA@12" PAIV
-  DISPLAY "Ragione Sociale@50" RAGSOC
-  DISPLAY "Codice" CODCF
-  COPY OUTPUT F_CLIENTE
-  CHECKTYPE NORMAL
-  ADD RUN cg0 -1 C
-END
-
-STRING F_PIVAFORNITORE 14
-BEGIN
-  PROMPT 1 11 "Partita IVA  "
-  HELP "Partita IVA del fornitore del documento"
-  GROUP 2
-  USE LF_CLIFO KEY 5
-  INPUT TIPOCF "F"
-  INPUT STATOPAIV F_STATOPAIV
-  INPUT PAIV F_PIVAFORNITORE
-  COPY DISPLAY F_PIVACLIENTE
-  COPY OUTPUT F_FORNITORE
-  CHECKTYPE NORMAL
-  ADD RUN cg0 -1 F
-END
-
-LIST F_STATOPAIV 18
-BEGIN
-  PROMPT 32 11 "Stato "
-  HELP "Codice ISO dello stato per la partita IVA"
-  ITEM "  |Italia o extra CEE"
-  ITEM "BE|Belgio"
-  ITEM "DE|Germania"
-  ITEM "DK|Danimarca"
-  ITEM "EL|Grecia"
-  ITEM "ES|Spagna"
-  ITEM "FR|Francia"
-  ITEM "GB|Gran Bretagna"
-  ITEM "IE|Irlanda"
-  ITEM "IT|Italia"
-  ITEM "LU|Lussemburgo"
-  ITEM "NL|Olanda"
-  ITEM "PT|Portogallo"
-  GROUP 1
-END
-
-BUTTON F_OCCASEDIT 18
-BEGIN
-  PROMPT 32 11 "Dati anagrafici"
-  FLAGS "H"
-END
-
-BOOLEAN F_OCCASIONALE
-BEGIN
-  MESSAGE FALSE HIDE,F_OCCASEDIT|ENABLE,F_PIVACLIENTE|ENABLE,F_PIVAFORNITORE|SHOW,F_STATOPAIV
-  MESSAGE TRUE  SHOW,F_OCCASEDIT|DISABLE,F_PIVACLIENTE|DISABLE,F_PIVAFORNITORE|HIDE,F_STATOPAIV
-  FLAGS "GH"                    
-END
-
-STRING F_CODPAG 4
-BEGIN
-  PROMPT 60 11 "Pagamento  "
-  HELP "Codice del pagamento concordato per il movimento"
-  FIELD CODPAG
-  FLAGS "U"
-  USE %CPG
-  INPUT CODTAB F_CODPAG 
-  DISPLAY "Codice" CODTAB
-  DISPLAY "Descrizione@50" S0
-  OUTPUT F_CODPAG CODTAB
-  CHECKTYPE NORMAL
-  ADD RUN ba3 -6
-  WARNING "Codice pagamento assente"
-END
-
-STRING F_VALUTA 3
-BEGIN
-  PROMPT 1 12 "Valuta "
-  HELP "Codice della valuta per operazione con l'estero"
-  FIELD LF_MOV->CODVAL
-  FLAGS "U"
-  GROUP 3
-  USE %VAL
-  INPUT CODTAB F_VALUTA
-  DISPLAY "Codice" CODTAB
-  DISPLAY "Nome@50" S0
-  DISPLAY "Cambio@15" R10
-  DISPLAY "Ultimo aggiornamento" D0
-  OUTPUT F_VALUTA CODTAB
-  OUTPUT F_CAMBIO R10
-  CHECKTYPE NORMAL
-  WARNING "Codice valuta assente"
-END
-
-NUMBER F_CAMBIO 12 5
-BEGIN
-  PROMPT 20 12 "Cambio "
-  HELP "Cambio della valuta per operazione con l'estero"
-  FIELD LF_MOV->CAMBIO
-  FLAGS "RU"
-  GROUP 3
-  PICTURE ".5"
-END
-
-BOOLEAN F_VISVAL
-BEGIN
-  PROMPT 47 12 "Visualizza importi in valuta"
-  HELP "Indicare se visualizzare gli importi in valuta (non in Lit.)"
-  GROUP 3
-END
-
-NUMBER F_TOTALE 15
-BEGIN
-  PROMPT 1 13 "Totale documento   "
-  HELP "Totale del documento generante il movimento"
-  FIELD TOTDOC
-  FLAGS "RV"
-  PICTURE "."
-END
-
-NUMBER F_RITFIS 15
-BEGIN
-  PROMPT 1 14 "Ritenute fiscali   "
-  HELP "Ritenute fiscali del documento generante il movimento"
-  FIELD RITFIS
-  FLAGS "RV"
-  PICTURE "."
-END
-
-NUMBER F_RITSOC 15
-BEGIN
-  PROMPT 1 15 "Ritenute sociali   "
-  HELP "Ritenute fiscali del documento generante il movimento"
-  FIELD LF_MOV->RITSOC
-  FLAGS "RV"
-  PICTURE "."
-END
-
-STRING F_CODIVA 4
-BEGIN
-  PROMPT 60 13 "Codice IVA "
-  HELP "Codice IVA del documento generante il movimento"
-  FLAGS "U"
-  USE %IVA
-  INPUT CODTAB F_CODIVA
-  DISPLAY "Codice" CODTAB
-  DISPLAY "Descrizione@50" S0
-  DISPLAY "%@6" R0
-  DISPLAY "Tipo" S1
-  OUTPUT F_CODIVA CODTAB
-  CHECKTYPE NORMAL
-  WARNING "Codice IVA assente"
-END
-
-DATE F_DATA74TER
-BEGIN
-  PROMPT 54 14 "Data 74/ter  "
-  HELP "Data per aliquota IVA ex art.74 ter"
-  WARNING "E' richiesta la data del 74/ter"
-  CHECKTYPE REQUIRED
-  FIELD DATA74TER
-END
-
-NUMBER F_ANNORIF 4
-BEGIN
-  PROMPT 45 15 "Rif.partita      "
-  FIELD LF_PARTITE->ANNO
-  FLAGS "D"
-  HELP "Anno di riferimento partita"
-  WARNING "E' richiesto l'anno di riferimento"
-  CHECKTYPE REQUIRED
-END
-
-STRING F_NUMRIF 7
-BEGIN
-  PROMPT 68 15 "/ "
-  FIELD LF_PARTITE->NUMPART
-  FLAGS "D"
-  HELP "Numero documento (o protocollo IVA) di riferimento"
-  WARNING "E' richiesto il numero di riferimento partita"
-  CHECKTYPE REQUIRED
-END
-
-STRING F_VALUTAINTRA 3
-BEGIN
-  PROMPT 1 17 "Valuta intracom.   "
-  HELP "Codice della valuta per operazione intracomunitaria"
-  FIELD CODVALI
-  FLAGS "U"
-  GROUP 4
-  USE %VAL
-  INPUT CODTAB F_VALUTAINTRA
-  DISPLAY "Codice" CODTAB
-  DISPLAY "Nome@50" S0
-  DISPLAY "Cambio@15" R10
-  DISPLAY "Ultimo aggiornamento" D0
-  OUTPUT F_VALUTAINTRA CODTAB
-//  OUTPUT F_CAMBIOINTRA R10
-  CHECKTYPE NORMAL
-  WARNING "Codice valuta assente"
-END
-
-NUMBER F_CAMBIOINTRA 12 5
-BEGIN
-  PROMPT 37 17 "Cambio intracom.     "
-  HELP "Cambio della valuta per operazione intracomunitaria"
-  FIELD CAMBIOI
-  FLAGS "RU"
-  GROUP 4
-  PICTURE ".5"
-END
-
-NUMBER F_CORRLIRE 15
-BEGIN
-  PROMPT 1 18 "Corrispettivo Lire "
-  HELP "Corrispettivo in Lit. per operazioni intracomunitarie.  Il tasto F8 lo pone uguale alla somma degli imponibili"
-  FIELD LF_MOV->CORRLIRE
-  FLAGS "R"
-  PICTURE "."
-  GROUP 4
-END
-
-NUMBER F_CORRVALUTA 15 2
-BEGIN
-  PROMPT 37 18 "Corrispettivo valuta "
-  HELP "Corrispettivo in valuta per operazioni intracomunitarie"
-  FIELD LF_MOV->CORRVALUTA
-  FLAGS "R"
-  PICTURE ".2"
-  GROUP 4
-END
-
-ENDPAGE
-
-PAGE "IVA" -1 -1 77 20
-
-GROUPBOX DLG_NULL 78 4
-BEGIN
-  PROMPT 1 0 "@BRighe movimento IVA"
-END
-
-NUMBER H_NUMREG 6
-BEGIN
-  PROMPT 2 1 "Operazione n.  "
-  FLAGS "D"
-END
-
-DATE H_DATAREG
-BEGIN
-  PROMPT 32 1 "Data "
-  FLAGS "D"
-END
-
-NUMBER H_ANNOES 4
-BEGIN
-  PROMPT 61 1 "Esercizio "
-  FLAGS "DZ"
-END
-
-STRING H_CODCAUS 3
-BEGIN
-  PROMPT 2 2 "Causale        "
-  FLAGS "D"
-END
-
-STRING H_DESCRCAUS 50
-BEGIN
-  PROMPT 25 2 ""
-  FLAGS "D"
-END
-
-SPREADSHEET F_SHEETIVA 0 7
-BEGIN
-  PROMPT 0 4 ""
-  ITEM "Imponibile@15"
-  ITEM "Iva@4"
-  ITEM "Det@1"
-  ITEM "Imposta@15"
-  ITEM "C/R@1"
-  ITEM "C/F@1"
-  ITEM "Gr."
-  ITEM "Co."
-  ITEM "Sottoc.@6"
-  ITEM "Descrizione Conto@50"
-END
-
-NUMBER F_IMPONIBILI 15
-BEGIN       
-  PROMPT 1 11 "Totale imponibili "
-  FLAGS "DRV"
-  PICTURE "."
-END
-
-NUMBER F_IMPOSTE 15
-BEGIN
-  PROMPT 41 11 "Totale imposte   "
-  FLAGS "DRV"
-  PICTURE "."
-END
-
-SPREADSHEET F_SHEETCG
-BEGIN
-  PROMPT 0 12 ""
-  ITEM "Dare@15"
-  ITEM "Avere@15"
-  ITEM "C/F@1"
-  ITEM "Gr."
-  ITEM "Co."
-  ITEM "Sottoc.@6"
-  ITEM "Descrizione conto@50"
-  ITEM "Codice"
-  ITEM "Descrizione riga@50"
-  ITEM "C/F@1"
-  ITEM "Gr./c@3"
-  ITEM "Co./c@3"
-  ITEM "Sottoc./c@6"
-  ITEM "Descrizione contropartita@50"
-  ITEM " "
-END
-
-NUMBER F_DARE 15
-BEGIN       
-  PROMPT 1 18 "Sbilancio Dare    "
-  FLAGS "DRV"
-  PICTURE "."
-END
-
-NUMBER F_AVERE 15
-BEGIN
-  PROMPT 41 18 "Sbilancio Avere  "
-  FLAGS "DRV"
-  PICTURE "."
-END
-
-ENDPAGE
-
-ENDMASK
-
-#include "cg21iva.uml"
-#include "cg21cg.uml"
+#include "cg2100.h"
+
+TOOLBAR "" 0 20 0 2
+#include <toolbar.h>
+ENDPAGE
+
+PAGE "OPERAZIONE DI PRIMA NOTA" -1 -1 77 20
+
+NUMBER F_GRUPPOCLIFO 3
+BEGIN
+  FLAGS "H"
+END
+
+NUMBER F_CONTOCLIFO 3
+BEGIN
+  FLAGS "H"
+END
+
+NUMBER F_GRUPPORIC 3
+BEGIN
+  FLAGS "H"
+END
+
+NUMBER F_CONTORIC 3
+BEGIN
+  FLAGS "H"
+END
+
+NUMBER F_SOTTOCONTORIC 6
+BEGIN
+  FLAGS "H"
+END
+
+GROUPBOX DLG_NULL 78 3
+BEGIN
+  PROMPT 1 0 "@BMovimento IVA"
+END
+
+NUMBER F_CODDITTA 5
+BEGIN
+  PROMPT 3 1 "Ditta  "
+  FLAGS "FGRD"
+  USE LF_NDITTE KEY 1
+  INPUT CODDITTA F_CODDITTA
+  DISPLAY "Codice" CODDITTA
+  OUTPUT F_RAGSOC RAGSOC
+  CHECKTYPE REQUIRED
+END
+
+STRING F_RAGSOC 50
+BEGIN
+  PROMPT 17 1 "Ragione "
+  FLAGS "DG"
+END
+
+NUMBER F_NUMREG 6
+BEGIN
+  PROMPT 57 3 "Operazione n. "
+  FIELD NUMREG
+  FLAGS "RDG"
+  KEY 1
+  MESSAGE COPY,H_NUMREG
+END
+
+DATE F_DATAREG
+BEGIN
+  PROMPT 1 3 "Data operazione "
+  HELP "Data in cui viene registrata l'operazione"
+  FIELD LF_MOV->DATAREG
+  MESSAGE COPY,H_DATAREG|COPY,F_DATA74TER|COPY,F_ANNOIVA,7,10
+END
+
+DATE F_DATACOMP
+BEGIN
+  PROMPT 1 4 "Data competenza "
+  HELP "Data di competenza dell'operazione"
+  FIELD LF_MOV->DATACOMP
+END
+
+DATE F_DATADOC
+BEGIN
+  PROMPT 1 5 "Data documento  "
+  FIELD LF_MOV->DATADOC 
+  HELP "Data del documento che ha generato il movimento"
+  WARNING "Inserire una data documento non superiore alla data dell'operazione"
+  VALIDATE DATE_CMP_FUNC <= F_DATAREG
+END
+
+NUMBER F_ANNOIVA 4
+BEGIN
+  PROMPT 32 3 "Anno IVA       "
+  FIELD LF_MOV->ANNOIVA
+  FLAGS "D"
+END
+
+NUMBER F_ANNOES 4
+BEGIN
+  PROMPT 32 4 "Anno esercizio "
+  FIELD LF_MOV->ANNOES
+  FLAGS "DGZ"
+  MESSAGE COPY,H_ANNOES
+END
+
+STRING F_TIPODOC 2
+BEGIN
+  PROMPT 32 5 "Tipo documento "
+  FIELD LF_MOV->TIPODOC
+  FLAGS "D"
+END
+
+STRING F_NUMDOC 7
+BEGIN
+  PROMPT 57 5 "Documento n. "
+  HELP "Numero del documento che ha generato il movimento"
+  FIELD LF_MOV->NUMDOC
+  WARNING "La causale impone di specificare il numero documento"
+END
+
+STRING F_DESCAGG 5
+BEGIN
+  PROMPT 1 6 "Descrizione     "
+  HELP "Codice della descrizione del movimento"
+  FLAGS "UZ"
+  USE %DPN
+  INPUT CODTAB F_DESCAGG
+  DISPLAY "Codice" CODTAB
+  DISPLAY "Descrizione@50" S0
+  OUTPUT F_DESCAGG CODTAB
+  OUTPUT F_DESCR S0
+  CHECKTYPE NORMAL
+  WARNING "Descrizione assente"
+END
+
+STRING F_DESCR 50
+BEGIN
+  PROMPT 25 6 ""
+  HELP "Descrizione del movimento"
+  FIELD LF_MOV->DESCR
+  USE %DPN KEY 2
+  INPUT S0 F_DESCR
+  DISPLAY "Descrizione@50" S0
+  DISPLAY "Codice" CODTAB
+  COPY OUTPUT F_DESCAGG
+END
+
+BOOLEAN F_SOLAIVA
+BEGIN
+  PROMPT 1 7 "Movimento di sola IVA"
+  HELP "Indicare se non vi sono righe di contabilita'"
+END
+
+LIST F_PROVVISORIO 1 25
+BEGIN
+  PROMPT 31 7 "Movimento provvisorio "
+  HELP "Indicare se si tratta di movimento provvisorio"
+  FIELD PROVVIS
+  ITEM " |No (movimento normale)"
+  ITEM "P|Si (cancellabile)"     
+  ITEM "N|Si (non cancellabile)"
+END
+
+STRING F_CODCAUS 3
+BEGIN
+  PROMPT 1 8 "Causale      "
+  HELP "Codice della causale generante l'operazione"
+  FLAGS "U"
+  FIELD LF_MOV->CODCAUS
+  USE LF_CAUSALI SELECT REG!=""
+  INPUT CODCAUS F_CODCAUS
+  DISPLAY "Codice" CODCAUS
+  DISPLAY "Descrizione@50" DESCR
+  DISPLAY "Tipo" TIPODOC
+  DISPLAY "Registro" REG
+  OUTPUT F_CODCAUS CODCAUS
+  OUTPUT F_DESCRCAUS DESCR
+  OUTPUT F_CODREG REG
+  OUTPUT F_TIPODOC TIPODOC
+  MESSAGE COPY,H_CODCAUS
+  CHECKTYPE REQUIRED
+  ADD RUN cg0 -4
+END
+
+STRING F_DESCRCAUS 50
+BEGIN
+  PROMPT 25 8 ""
+  HELP "Descrizione della causale generante l'operazione"
+  USE LF_CAUSALI KEY 2 SELECT REG!=""
+  INPUT DESCR F_DESCRCAUS
+  DISPLAY "Descrizione@50" DESCR
+  DISPLAY "Codice" CODCAUS
+  DISPLAY "Tipo" TIPODOC
+  DISPLAY "Registro" REG
+  COPY OUTPUT F_CODCAUS
+  MESSAGE COPY,H_DESCRCAUS
+  CHECKTYPE REQUIRED
+  ADD RUN cg0 -4
+END
+
+STRING F_CODREG 3
+BEGIN
+  PROMPT 1 9 "Registro IVA "
+  FLAGS "DG"
+  FIELD LF_MOV->REG
+END
+
+NUMBER F_PROTIVA 5
+BEGIN
+  PROMPT 27 9 "Protocollo IVA "
+  HELP "Numero progressivo di protocollo IVA"
+  FIELD LF_MOV->PROTIVA
+END
+
+NUMBER F_RIEPILOGO 5
+BEGIN
+  PROMPT 51 9 "Riepilogo fino al n. "
+  HELP "Numero finale del documento ripilogativo di protocollo IVA"
+  FIELD LF_MOV->UPROTIVA
+  NUM_EXPR {(#F_RIEPILOGO==0)||(#F_RIEPILOGO>=#F_PROTIVA)}
+  WARNING "Inserire un riepilogo non inferiore al protocollo IVA   (Obbigatorio se il cliete/fornitore ha codice inserimento in  allegati uguale a 3)"
+END
+
+STRING F_CLIFO 1
+BEGIN
+  PROMPT 0 10 ""
+  FIELD TIPO
+  FLAGS "H"
+END
+
+NUMBER F_CLIENTE 6
+BEGIN
+  PROMPT 1 10 "Cliente      "
+  HELP "Codice del cliente del documento"
+  FIELD LF_MOV->CODCF
+  GROUP 1
+  USE LF_CLIFO KEY 1
+  INPUT TIPOCF "C"
+  INPUT CODCF F_CLIENTE
+  DISPLAY "Codice" CODCF
+  DISPLAY "Ragione Sociale@50" RAGSOC
+  DISPLAY "Partita IVA@12" PAIV
+  OUTPUT F_CLIFO TIPOCF
+  OUTPUT F_CLIENTE CODCF
+  OUTPUT F_RAGSOCCLIENTE RAGSOC
+  OUTPUT F_GRUPPOCLIFO GRUPPO
+  OUTPUT F_CONTOCLIFO CONTO
+  OUTPUT F_GRUPPORIC GRUPPORIC
+  OUTPUT F_CONTORIC CONTORIC
+  OUTPUT F_SOTTOCONTORIC SOTTOCRIC
+  OUTPUT F_CODPAG CODPAG
+  OUTPUT F_STATOPAIV STATOPAIV
+  OUTPUT F_PIVACLIENTE PAIV
+  OUTPUT F_OCCASIONALE OCCAS
+  MESSAGE COPY,F_FORNITORE
+  CHECKTYPE REQUIRED
+  WARNING "Cliente assente"
+  ADD RUN cg0 -1 C
+END
+
+NUMBER F_FORNITORE 6
+BEGIN
+  PROMPT 1 10 "Fornitore    "
+  HELP "Codice del fornitore del documento"
+  FIELD LF_MOV->CODCF
+  GROUP 2
+  USE LF_CLIFO KEY 1
+  INPUT TIPOCF "F"
+  INPUT CODCF F_FORNITORE
+  DISPLAY "Codice" CODCF
+  DISPLAY "Ragione Sociale@50" RAGSOC
+  DISPLAY "Partita IVA@12" PAIV
+  OUTPUT F_CLIFO TIPOCF
+  OUTPUT F_FORNITORE CODCF
+  OUTPUT F_RAGSOCFORNITORE RAGSOC
+  OUTPUT F_GRUPPOCLIFO GRUPPO
+  OUTPUT F_CONTOCLIFO CONTO
+  OUTPUT F_GRUPPORIC GRUPPORIC
+  OUTPUT F_CONTORIC CONTORIC
+  OUTPUT F_SOTTOCONTORIC SOTTOCRIC
+  OUTPUT F_OCCASIONALE OCCAS
+  OUTPUT F_CODPAG CODPAG
+  OUTPUT F_STATOPAIV STATOPAIV
+  OUTPUT F_PIVAFORNITORE PAIV
+  MESSAGE COPY,F_CLIENTE
+  CHECKTYPE REQUIRED
+  WARNING "Fornitore assente"
+  ADD RUN cg0 -1 F
+END
+
+STRING F_RAGSOCFORNITORE 50
+BEGIN
+  PROMPT 25 10 ""
+  HELP "Ragione sociale del fornitore del documento"
+  GROUP 2
+  USE LF_CLIFO KEY 2
+  INPUT TIPOCF "F"
+  INPUT RAGSOC F_RAGSOCFORNITORE
+  DISPLAY "Ragione Sociale@50" RAGSOC
+  DISPLAY "Partita IVA@12" PAIV
+  DISPLAY "Codice" CODCF
+  COPY OUTPUT F_FORNITORE
+  CHECKTYPE REQUIRED
+  ADD RUN cg0 -1 F
+END
+
+STRING F_RAGSOCCLIENTE 50
+BEGIN
+  PROMPT 25 10 ""
+  HELP "Ragione sociale del cliente del documento"
+  GROUP 1
+  USE LF_CLIFO KEY 2
+  INPUT TIPOCF "C"
+  INPUT RAGSOC F_RAGSOCCLIENTE
+  DISPLAY "Ragione Sociale@50" RAGSOC
+  DISPLAY "Partita IVA@12" PAIV
+  DISPLAY "Codice" CODCF
+  COPY OUTPUT F_CLIENTE
+  CHECKTYPE REQUIRED
+  ADD RUN cg0 -1 C
+END
+
+STRING F_PIVACLIENTE 14
+BEGIN
+  PROMPT 1 11 "Partita IVA  "
+  HELP "Partita IVA del cliente del documento"
+  GROUP 1
+  USE LF_CLIFO KEY 5
+  INPUT TIPOCF "C"
+  INPUT STATOPAIV F_STATOPAIV
+  INPUT PAIV F_PIVACLIENTE
+  DISPLAY "Partita IVA@12" PAIV
+  DISPLAY "Ragione Sociale@50" RAGSOC
+  DISPLAY "Codice" CODCF
+  COPY OUTPUT F_CLIENTE
+  CHECKTYPE NORMAL
+  ADD RUN cg0 -1 C
+END
+
+STRING F_PIVAFORNITORE 14
+BEGIN
+  PROMPT 1 11 "Partita IVA  "
+  HELP "Partita IVA del fornitore del documento"
+  GROUP 2
+  USE LF_CLIFO KEY 5
+  INPUT TIPOCF "F"
+  INPUT STATOPAIV F_STATOPAIV
+  INPUT PAIV F_PIVAFORNITORE
+  COPY DISPLAY F_PIVACLIENTE
+  COPY OUTPUT F_FORNITORE
+  CHECKTYPE NORMAL
+  ADD RUN cg0 -1 F
+END
+
+LIST F_STATOPAIV 18
+BEGIN
+  PROMPT 32 11 "Stato "
+  HELP "Codice ISO dello stato per la partita IVA"
+  ITEM "  |Italia o extra CEE"
+  ITEM "BE|Belgio"
+  ITEM "DE|Germania"
+  ITEM "DK|Danimarca"
+  ITEM "EL|Grecia"
+  ITEM "ES|Spagna"
+  ITEM "FR|Francia"
+  ITEM "GB|Gran Bretagna"
+  ITEM "IE|Irlanda"
+  ITEM "IT|Italia"
+  ITEM "LU|Lussemburgo"
+  ITEM "NL|Olanda"
+  ITEM "PT|Portogallo"
+  GROUP 1
+END
+
+BUTTON F_OCCASEDIT 18
+BEGIN
+  PROMPT 32 11 "Dati anagrafici"
+  FLAGS "H"
+END
+
+BOOLEAN F_OCCASIONALE
+BEGIN
+  MESSAGE FALSE HIDE,F_OCCASEDIT|ENABLE,F_PIVACLIENTE|ENABLE,F_PIVAFORNITORE|SHOW,F_STATOPAIV
+  MESSAGE TRUE  SHOW,F_OCCASEDIT|DISABLE,F_PIVACLIENTE|DISABLE,F_PIVAFORNITORE|HIDE,F_STATOPAIV
+  FLAGS "GH"                    
+END
+
+STRING F_CODPAG 4
+BEGIN
+  PROMPT 60 11 "Pagamento  "
+  HELP "Codice del pagamento concordato per il movimento"
+  FIELD CODPAG
+  FLAGS "U"
+  USE %CPG
+  INPUT CODTAB F_CODPAG 
+  DISPLAY "Codice" CODTAB
+  DISPLAY "Descrizione@50" S0
+  OUTPUT F_CODPAG CODTAB
+  CHECKTYPE NORMAL
+  ADD RUN ba3 -6
+  WARNING "Codice pagamento assente"
+END
+
+STRING F_VALUTA 3
+BEGIN
+  PROMPT 1 12 "Valuta "
+  HELP "Codice della valuta per operazione con l'estero"
+  FIELD LF_MOV->CODVAL
+  FLAGS "U"
+  GROUP 3
+  USE %VAL
+  INPUT CODTAB F_VALUTA
+  DISPLAY "Codice" CODTAB
+  DISPLAY "Nome@50" S0
+  DISPLAY "Cambio@15" R10
+  DISPLAY "Ultimo aggiornamento" D0
+  OUTPUT F_VALUTA CODTAB
+  OUTPUT F_CAMBIO R10
+  CHECKTYPE NORMAL
+  WARNING "Codice valuta assente"
+END
+
+NUMBER F_CAMBIO 12 5
+BEGIN
+  PROMPT 20 12 "Cambio "
+  HELP "Cambio della valuta per operazione con l'estero"
+  FIELD LF_MOV->CAMBIO
+  FLAGS "RU"
+  GROUP 3
+  PICTURE ".5"
+END
+
+BOOLEAN F_VISVAL
+BEGIN
+  PROMPT 47 12 "Visualizza importi in valuta"
+  HELP "Indicare se visualizzare gli importi in valuta (non in Lit.)"
+  GROUP 3
+END
+
+NUMBER F_TOTALE 15
+BEGIN
+  PROMPT 1 13 "Totale documento   "
+  HELP "Totale del documento generante il movimento"
+  FIELD TOTDOC
+  FLAGS "RV"
+  PICTURE "."
+END
+
+NUMBER F_RITFIS 15
+BEGIN
+  PROMPT 1 14 "Ritenute fiscali   "
+  HELP "Ritenute fiscali del documento generante il movimento"
+  FIELD RITFIS
+  FLAGS "RV"
+  PICTURE "."
+END
+
+NUMBER F_RITSOC 15
+BEGIN
+  PROMPT 1 15 "Ritenute sociali   "
+  HELP "Ritenute fiscali del documento generante il movimento"
+  FIELD LF_MOV->RITSOC
+  FLAGS "RV"
+  PICTURE "."
+END
+
+STRING F_CODIVA 4
+BEGIN
+  PROMPT 60 13 "Codice IVA "
+  HELP "Codice IVA del documento generante il movimento"
+  FLAGS "U"
+  USE %IVA
+  INPUT CODTAB F_CODIVA
+  DISPLAY "Codice" CODTAB
+  DISPLAY "Descrizione@50" S0
+  DISPLAY "%@6" R0
+  DISPLAY "Tipo" S1
+  OUTPUT F_CODIVA CODTAB
+  CHECKTYPE NORMAL
+  WARNING "Codice IVA assente"
+END
+
+DATE F_DATA74TER
+BEGIN
+  PROMPT 54 14 "Data 74/ter  "
+  HELP "Data per aliquota IVA ex art.74 ter"
+  WARNING "E' richiesta la data del 74/ter"
+  CHECKTYPE REQUIRED
+  FIELD DATA74TER
+END
+
+NUMBER F_ANNORIF 4
+BEGIN
+  PROMPT 45 15 "Rif.partita      "
+  FIELD LF_PARTITE->ANNO
+  FLAGS "D"
+  HELP "Anno di riferimento partita"
+  WARNING "E' richiesto l'anno di riferimento"
+  CHECKTYPE REQUIRED
+END
+
+STRING F_NUMRIF 7
+BEGIN
+  PROMPT 68 15 "/ "
+  FIELD LF_PARTITE->NUMPART
+  FLAGS "D"
+  HELP "Numero documento (o protocollo IVA) di riferimento"
+  WARNING "E' richiesto il numero di riferimento partita"
+  CHECKTYPE REQUIRED
+END
+
+STRING F_VALUTAINTRA 3
+BEGIN
+  PROMPT 1 17 "Valuta intracom.   "
+  HELP "Codice della valuta per operazione intracomunitaria"
+  FIELD CODVALI
+  FLAGS "U"
+  GROUP 4
+  USE %VAL
+  INPUT CODTAB F_VALUTAINTRA
+  DISPLAY "Codice" CODTAB
+  DISPLAY "Nome@50" S0
+  DISPLAY "Cambio@15" R10
+  DISPLAY "Ultimo aggiornamento" D0
+  OUTPUT F_VALUTAINTRA CODTAB
+//  OUTPUT F_CAMBIOINTRA R10
+  CHECKTYPE NORMAL
+  WARNING "Codice valuta assente"
+END
+
+NUMBER F_CAMBIOINTRA 12 5
+BEGIN
+  PROMPT 37 17 "Cambio intracom.     "
+  HELP "Cambio della valuta per operazione intracomunitaria"
+  FIELD CAMBIOI
+  FLAGS "RU"
+  GROUP 4
+  PICTURE ".5"
+END
+
+NUMBER F_CORRLIRE 15
+BEGIN
+  PROMPT 1 18 "Corrispettivo Lire "
+  HELP "Corrispettivo in Lit. per operazioni intracomunitarie.  Il tasto F8 lo pone uguale alla somma degli imponibili"
+  FIELD LF_MOV->CORRLIRE
+  FLAGS "R"
+  PICTURE "."
+  GROUP 4
+END
+
+NUMBER F_CORRVALUTA 15 2
+BEGIN
+  PROMPT 37 18 "Corrispettivo valuta "
+  HELP "Corrispettivo in valuta per operazioni intracomunitarie"
+  FIELD LF_MOV->CORRVALUTA
+  FLAGS "R"
+  PICTURE ".2"
+  GROUP 4
+END
+
+ENDPAGE
+
+PAGE "IVA" -1 -1 77 20
+
+GROUPBOX DLG_NULL 78 4
+BEGIN
+  PROMPT 1 0 "@BRighe movimento IVA"
+END
+
+NUMBER H_NUMREG 6
+BEGIN
+  PROMPT 2 1 "Operazione n.  "
+  FLAGS "D"
+END
+
+DATE H_DATAREG
+BEGIN
+  PROMPT 32 1 "Data "
+  FLAGS "D"
+END
+
+NUMBER H_ANNOES 4
+BEGIN
+  PROMPT 61 1 "Esercizio "
+  FLAGS "DZ"
+END
+
+STRING H_CODCAUS 3
+BEGIN
+  PROMPT 2 2 "Causale        "
+  FLAGS "D"
+END
+
+STRING H_DESCRCAUS 50
+BEGIN
+  PROMPT 25 2 ""
+  FLAGS "D"
+END
+
+SPREADSHEET F_SHEETIVA 0 7
+BEGIN
+  PROMPT 0 4 ""
+  ITEM "Imponibile@15"
+  ITEM "Iva@4"
+  ITEM "Det@1"
+  ITEM "Imposta@15"
+  ITEM "C/R@1"
+  ITEM "C/F@1"
+  ITEM "Gr."
+  ITEM "Co."
+  ITEM "Sottoc.@6"
+  ITEM "Descrizione Conto@50"
+END
+
+NUMBER F_IMPONIBILI 15
+BEGIN       
+  PROMPT 1 11 "Totale imponibili "
+  FLAGS "DRV"
+  PICTURE "."
+END
+
+NUMBER F_IMPOSTE 15
+BEGIN
+  PROMPT 41 11 "Totale imposte   "
+  FLAGS "DRV"
+  PICTURE "."
+END
+
+SPREADSHEET F_SHEETCG
+BEGIN
+  PROMPT 0 12 ""
+  ITEM "Dare@15"
+  ITEM "Avere@15"
+  ITEM "C/F@1"
+  ITEM "Gr."
+  ITEM "Co."
+  ITEM "Sottoc.@6"
+  ITEM "Descrizione conto@50"
+  ITEM "Codice"
+  ITEM "Descrizione riga@50"
+  ITEM "C/F@1"
+  ITEM "Gr./c@3"
+  ITEM "Co./c@3"
+  ITEM "Sottoc./c@6"
+  ITEM "Descrizione contropartita@50"
+  ITEM " "
+END
+
+NUMBER F_DARE 15
+BEGIN       
+  PROMPT 1 18 "Sbilancio Dare    "
+  FLAGS "DRV"
+  PICTURE "."
+END
+
+NUMBER F_AVERE 15
+BEGIN
+  PROMPT 41 18 "Sbilancio Avere  "
+  FLAGS "DRV"
+  PICTURE "."
+END
+
+ENDPAGE
+
+ENDMASK
+
+#include "cg21iva.uml"
+#include "cg21cg.uml"
diff --git a/cg/cg21cg.uml b/cg/cg21cg.uml
index 7420f2706..399c0d4b9 100755
--- a/cg/cg21cg.uml
+++ b/cg/cg21cg.uml
@@ -1,371 +1,371 @@
-PAGE "RIGA PRIMA NOTA" -1 -1 67 16
-
-GROUPBOX DLG_NULL 66 3
-BEGIN
-  PROMPT 1 1 "Descrizione"
-END
-
-STRING 108 5
-BEGIN
-	PROMPT 2 2 ""
-	HELP "Codice della descrizione aggiuntiva della riga"
-	FLAGS "U"
-	USE %DPN
-	DISPLAY "Codice" CODTAB
-	DISPLAY "Descrizione@50" S0
-	OUTPUT 108 CODTAB
-	OUTPUT 109 S0
-	CHECKTYPE NORMAL
-END
-
-STRING 109 50
-BEGIN
-	PROMPT 14 2 ""
-	USE %DPN KEY 2
-	INPUT S0 109
-	DISPLAY "Descrizione@50" S0
-	DISPLAY "Codice" CODTAB
-	COPY OUTPUT 108
-	HELP "Descrizione aggiuntiva della riga"
-	FIELD DESCR
-END
-
-GROUPBOX DLG_NULL 66 5
-BEGIN
-	PROMPT 1 4 "Conto principale"
-END
-
-NUMBER 101 15
-BEGIN
-	PROMPT 2 5 "Dare "
-	HELP "Importo 'dare' del conto della riga"
-	FLAGS "RV"
-	PICTURE "."
-END
-
-NUMBER 102 15
-BEGIN
-	PROMPT 42 5 "Avere "
-	HELP "Importo 'avere' del conto della riga"
-	FLAGS "RV"
-	PICTURE "."
-END
-
-LIST 103 1 12
-BEGIN
-	PROMPT 2 6 "Tipo "
-	HELP "Tipo del conto principale della riga"
-	FLAGS "U"
-	ITEM " |Conto"     MESSAGE SHOW,106|HIDE,206|HIDE,306|SHOW,107|HIDE,207|HIDE,307
-	ITEM "C|Cliente"   MESSAGE SHOW,206|HIDE,106|HIDE,306|SHOW,207|HIDE,107|HIDE,307
-	ITEM "F|Fornitore" MESSAGE SHOW,306|HIDE,106|HIDE,206|SHOW,307|HIDE,107|HIDE,207
-END
-
-NUMBER 104 3
-BEGIN
-	PROMPT 20 6 "Gruppo "
-	HELP "Codice del conto delle riga"
-END
-
-NUMBER 105 3
-BEGIN
-	PROMPT 32 6 "Conto "
-	HELP "Codice del conto delle riga"
-	FIELD LF_PCON->CONTO
-	USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="")
-	INPUT GRUPPO 104
-	INPUT CONTO 105
-	DISPLAY "Gruppo" GRUPPO
-	DISPLAY "Conto" CONTO
-	DISPLAY "Descrizione@50" DESCR
-  DISPLAY "Tipo" TMCF 
-	OUTPUT 103 TMCF
-	OUTPUT 104 GRUPPO
-	OUTPUT 105 CONTO
-	OUTPUT 107 DESCR
-	CHECKTYPE NORMAL
-	MESSAGE DIRTY,106|DIRTY,206|DIRTY,306
-	WARNING "Conto inesistente o mancante sulla riga contabile"
-END
-
-NUMBER 106 6
-BEGIN
-	PROMPT 45 6 "Sottoconto "
-	HELP "Codice del conto delle riga"
-	FIELD LF_PCON->SOTTOCONTO
-	USE LF_PCON SELECT SOTTOCONTO!=""
-	INPUT GRUPPO 104
-	INPUT CONTO 105
-	INPUT SOTTOCONTO 106
-	DISPLAY "Gruppo" GRUPPO
-	DISPLAY "Conto" CONTO
-	DISPLAY "Sottoconto" SOTTOCONTO
-	DISPLAY "Descrizione@50" DESCR
-	OUTPUT 106 SOTTOCONTO
-	OUTPUT 104 GRUPPO
-	OUTPUT 105 CONTO
-	OUTPUT 107 DESCR
-	ADD RUN cg0 -0
-	CHECKTYPE NORMAL
-	WARNING "Sottoconto inesistente sulla riga contabile"
-END
-
-NUMBER 206 6
-BEGIN
-	PROMPT 45 6 "Cliente    "
-	HELP "Codice del cliente delle riga"
-	FIELD LF_PCON->SOTTOCONTO
-	USE LF_CLIFO
-	INPUT TIPOCF "C"
-	INPUT CODCF 206
-	DISPLAY "Codice" CODCF
-	DISPLAY "Ragione Sociale Cliente@50" RAGSOC
-	DISPLAY "Gruppo" GRUPPO
-	DISPLAY "Conto" CONTO
-	OUTPUT 206 CODCF
-	OUTPUT 207 RAGSOC
-	MESSAGE COPY,106
-	ADD RUN cg0 -1
-	CHECKTYPE NORMAL
-	WARNING "Cliente inesistente sulla riga contabile"
-END
-
-NUMBER 306 6
-BEGIN
-	PROMPT 45 6 "Fornitore  "
-	HELP "Codice del fornitore delle riga"
-	FIELD LF_PCON->SOTTOCONTO
-	USE LF_CLIFO
-	INPUT TIPOCF "F"
-	INPUT CODCF 306
-	DISPLAY "Codice" CODCF
-	DISPLAY "Ragione Sociale Fornitore@50" RAGSOC
-	DISPLAY "Gruppo" GRUPPO
-	DISPLAY "Conto" CONTO
-	OUTPUT 306 CODCF
-	OUTPUT 307 RAGSOC
-	MESSAGE COPY,106
-	ADD RUN cg0 -1
-	MESSAGE COPY,106
-	CHECKTYPE NORMAL
-	WARNING "Fornitore inesistente sulla riga contabile"
-END
-
-STRING 107 50
-BEGIN
-	PROMPT 2 7 "Descriz.  "
-	HELP "Descrizione del conto delle riga"
-	FIELD LF_PCON->DESCR
-	USE LF_PCON KEY 2
-	INPUT DESCR 107
-	DISPLAY "Descrizione@50" DESCR
-	DISPLAY "Gruppo" GRUPPO
-	DISPLAY "Conto" CONTO
-	DISPLAY "Sottoconto" SOTTOCONTO
-	COPY OUTPUT 106
-	CHECKTYPE NORMAL
-	WARNING "Sottoconto inesistente o mancante sulla riga contabile"
-	ADD RUN cg0 -0
-END
-
-STRING 207 50
-BEGIN
-	PROMPT 2 7 "Cliente   "
-	HELP "Ragione sociale del cliente delle riga"
-	FIELD LF_CLIFO->RAGSOC
-	USE LF_CLIFO KEY 2
-	INPUT TIPOCF "C"
-	INPUT RAGSOC 207
-	DISPLAY "Ragione Sociale Cliente@50" RAGSOC
-	DISPLAY "Gruppo" GRUPPO
-	DISPLAY "Conto" CONTO
-	DISPLAY "Codice" CODCF
-	COPY OUTPUT 206
-	MESSAGE COPY,107
-	ADD RUN cg0 -1
-	CHECKTYPE NORMAL
-	WARNING "Cliente inesistente sulla riga contabile"
-END
-
-STRING 307 50
-BEGIN
-	PROMPT 2 7 "Fornitore "
-	HELP "Ragione sociale del fonitore delle riga"
-	FIELD LF_PCON->SOTTOCONTO
-	USE LF_CLIFO KEY 2
-	INPUT TIPOCF "F"
-	INPUT RAGSOC 307
-	DISPLAY "Ragione Sociale Fornitore@50" RAGSOC
-	DISPLAY "Gruppo" GRUPPO
-	DISPLAY "Conto" CONTO
-	DISPLAY "Codice" CODCF
-	COPY OUTPUT 306
-	MESSAGE COPY,107
-	ADD RUN cg0 -1
-	CHECKTYPE NORMAL
-	WARNING "Fornitore inesistente sulla riga contabile"
-END
-
-GROUPBOX DLG_NULL 66 4
-BEGIN
-	PROMPT 1 9 "Contropartita"
-END
-
-LIST 110 1 12
-BEGIN
-	PROMPT 2 10 "Tipo "
-	HELP "Tipo del conto di contropartita della riga"
-	FLAGS "U"
-	ITEM " |Conto"     MESSAGE SHOW,113|HIDE,213|HIDE,313|SHOW,114|HIDE,214|HIDE,314
-	ITEM "C|Cliente"   MESSAGE SHOW,213|HIDE,113|HIDE,313|SHOW,214|HIDE,114|HIDE,314
-	ITEM "F|Fornitore" MESSAGE SHOW,313|HIDE,113|HIDE,213|SHOW,314|HIDE,114|HIDE,214
-END
-
-NUMBER 111 3
-BEGIN
-	PROMPT 20 10 "Gruppo "
-	HELP "Codice del conto di contropartita delle riga"
-END
-
-NUMBER 112 3
-BEGIN
-	PROMPT 32 10 "Conto "
-	HELP "Codice del conto di contropartita delle riga"
-	FIELD LF_PCON->CONTO
-	COPY USE 105
-	INPUT GRUPPO 111
-	INPUT CONTO 112
-	COPY DISPLAY 105
-	OUTPUT 110 TMCF
-	OUTPUT 111 GRUPPO
-	OUTPUT 112 CONTO
-	OUTPUT 114 DESCR
-	ADD RUN CG0 -0
-  MESSAGE DIRTY,113|DIRTY,213|DIRTY,313
-	CHECKTYPE NORMAL
-	VALIDATE REQIF_FUNC 3 113 213 313
-END
-
-NUMBER 113 6
-BEGIN
-	PROMPT 45 10 "Sottoconto "
-	HELP "Codice del conto di contropartita delle riga"
-	FIELD LF_PCON->SOTTOCONTO
-	COPY USE 106
-	COPY INPUT 112
-	INPUT SOTTOCONTO 113
-	COPY DISPLAY 106
-	OUTPUT 113 SOTTOCONTO
-	OUTPUT 111 GRUPPO
-	OUTPUT 112 CONTO
-	OUTPUT 114 DESCR
-	CHECKTYPE NORMAL
-END
-
-NUMBER 213 6
-BEGIN
-	PROMPT 45 10 "Cliente    "
-	HELP "Codice del cliente di contropartita delle riga"
-	FIELD LF_CLIFO->CODCF
-	COPY USE 206
-	INPUT TIPOCF "C"
-	INPUT CODCF 213
-	COPY DISPLAY 206
-	OUTPUT 213 CODCF
-	OUTPUT 214 RAGSOC
-	MESSAGE COPY,113
-	CHECKTYPE NORMAL
-END
-
-NUMBER 313 6
-BEGIN
-	PROMPT 45 10 "Fornitore  "
-	HELP "Codice del fornitore di contropartita delle riga"
-	FIELD LF_CLIFO->CODCF
-	COPY USE 306
-	INPUT TIPOCF "F"
-	INPUT CODCF 313
-	COPY DISPLAY 306
-	OUTPUT 313 CODCF
-	OUTPUT 314 RAGSOC
-	MESSAGE COPY,113
-	CHECKTYPE NORMAL
-END
-
-STRING 114 50
-BEGIN
-	PROMPT 2 11 "Descriz.  "
-	HELP "Descrizione del conto di contropartita delle riga"
-	FIELD LF_PCON->DESCR
-	COPY USE 107
-	INPUT DESCR 114
-	COPY DISPLAY 107
-	COPY OUTPUT 113
-	ADD RUN cg0 -0
-	WARNING "Conto inesistente sulla riga contabile"
-END
-
-STRING 214 50
-BEGIN
-	PROMPT 2 11 "Cliente   "
-	HELP "Ragione sociale del cliente di contropartita delle riga"
-	FIELD LF_CLIFO->RAGSOC
-	COPY USE 207
-	INPUT TIPOCF "C"
-	INPUT RAGSOC 214
-	COPY DISPLAY 207
-	COPY OUTPUT 213
-	ADD RUN cg0 -1
-	CHECKTYPE NORMAL
-	WARNING "Cliente inesistente sulla riga contabile"
-END
-
-STRING 314 50
-BEGIN
-	PROMPT 2 11 "Fornitore "
-	HELP "Ragione sociale del fornitore di contropartita delle riga"
-	FIELD LF_CLIFO->RAGSOC
-	COPY USE 307
-	INPUT TIPOCF "F"
-	INPUT RAGSOC 314
-	COPY DISPLAY 307
-	COPY OUTPUT 313
-	ADD RUN cg0 -1
-	CHECKTYPE NORMAL
-	WARNING "Fornitore inesistente sulla riga contabile"
-END
-
-LIST 115 20
-BEGIN
-	PROMPT 2 13 "Tipo riga "
-	ITEM " |Sola contabilita'"
-	ITEM "C|Gestione saldaconto"
-	ITEM "D|IVA detraibile"
-	ITEM "F|Ritenute fiscali"
-	ITEM "I|Riga di IVA"
-	ITEM "N|IVA non detraibile"
-	ITEM "S|Ritenute sociali"
-	ITEM "T|Totale documento"
-	FLAGS "D"
-END
-
-
-BUTTON DLG_OK 9 2
-BEGIN
-	PROMPT -13 -1 ""
-END
-
-BUTTON DLG_CANCEL 9 2
-BEGIN
-	PROMPT -23 -1 ""
-END
-
-BUTTON DLG_DELREC 9 2
-BEGIN
-	PROMPT -33 -1 "Elimina"
-	MESSAGE EXIT,K_DEL
-END
-
-ENDPAGE
-
-ENDMASK
+PAGE "RIGA PRIMA NOTA" -1 -1 67 16
+
+GROUPBOX DLG_NULL 66 3
+BEGIN
+  PROMPT 1 1 "Descrizione"
+END
+
+STRING 108 5
+BEGIN
+	PROMPT 2 2 ""
+	HELP "Codice della descrizione aggiuntiva della riga"
+	FLAGS "UZ"
+	USE %DPN
+	DISPLAY "Codice" CODTAB
+	DISPLAY "Descrizione@50" S0
+	OUTPUT 108 CODTAB
+	OUTPUT 109 S0
+	CHECKTYPE NORMAL
+END
+
+STRING 109 50
+BEGIN
+	PROMPT 14 2 ""
+	USE %DPN KEY 2
+	INPUT S0 109
+	DISPLAY "Descrizione@50" S0
+	DISPLAY "Codice" CODTAB
+	COPY OUTPUT 108
+	HELP "Descrizione aggiuntiva della riga"
+	FIELD DESCR
+END
+
+GROUPBOX DLG_NULL 66 5
+BEGIN
+	PROMPT 1 4 "Conto principale"
+END
+
+NUMBER 101 15
+BEGIN
+	PROMPT 2 5 "Dare "
+	HELP "Importo 'dare' del conto della riga"
+	FLAGS "RV"
+	PICTURE "."
+END
+
+NUMBER 102 15
+BEGIN
+	PROMPT 42 5 "Avere "
+	HELP "Importo 'avere' del conto della riga"
+	FLAGS "RV"
+	PICTURE "."
+END
+
+LIST 103 1 12
+BEGIN
+	PROMPT 2 6 "Tipo "
+	HELP "Tipo del conto principale della riga"
+	FLAGS "U"
+	ITEM " |Conto"     MESSAGE SHOW,106|HIDE,206|HIDE,306|SHOW,107|HIDE,207|HIDE,307
+	ITEM "C|Cliente"   MESSAGE SHOW,206|HIDE,106|HIDE,306|SHOW,207|HIDE,107|HIDE,307
+	ITEM "F|Fornitore" MESSAGE SHOW,306|HIDE,106|HIDE,206|SHOW,307|HIDE,107|HIDE,207
+END
+
+NUMBER 104 3
+BEGIN
+	PROMPT 20 6 "Gruppo "
+	HELP "Codice del conto delle riga"
+END
+
+NUMBER 105 3
+BEGIN
+	PROMPT 32 6 "Conto "
+	HELP "Codice del conto delle riga"
+	FIELD LF_PCON->CONTO
+	USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="")
+	INPUT GRUPPO 104
+	INPUT CONTO 105
+	DISPLAY "Gruppo" GRUPPO
+	DISPLAY "Conto" CONTO
+	DISPLAY "Descrizione@50" DESCR
+  DISPLAY "Tipo" TMCF 
+	OUTPUT 103 TMCF
+	OUTPUT 104 GRUPPO
+	OUTPUT 105 CONTO
+	OUTPUT 107 DESCR
+	CHECKTYPE NORMAL
+	MESSAGE DIRTY,106|DIRTY,206|DIRTY,306
+	WARNING "Conto inesistente o mancante sulla riga contabile"
+END
+
+NUMBER 106 6
+BEGIN
+	PROMPT 45 6 "Sottoconto "
+	HELP "Codice del conto delle riga"
+	FIELD LF_PCON->SOTTOCONTO
+	USE LF_PCON SELECT SOTTOCONTO!=""
+	INPUT GRUPPO 104
+	INPUT CONTO 105
+	INPUT SOTTOCONTO 106
+	DISPLAY "Gruppo" GRUPPO
+	DISPLAY "Conto" CONTO
+	DISPLAY "Sottoconto" SOTTOCONTO
+	DISPLAY "Descrizione@50" DESCR
+	OUTPUT 106 SOTTOCONTO
+	OUTPUT 104 GRUPPO
+	OUTPUT 105 CONTO
+	OUTPUT 107 DESCR
+	ADD RUN cg0 -0
+	CHECKTYPE NORMAL
+	WARNING "Sottoconto inesistente sulla riga contabile"
+END
+
+NUMBER 206 6
+BEGIN
+	PROMPT 45 6 "Cliente    "
+	HELP "Codice del cliente delle riga"
+	FIELD LF_PCON->SOTTOCONTO
+	USE LF_CLIFO
+	INPUT TIPOCF "C"
+	INPUT CODCF 206
+	DISPLAY "Codice" CODCF
+	DISPLAY "Ragione Sociale Cliente@50" RAGSOC
+	DISPLAY "Gruppo" GRUPPO
+	DISPLAY "Conto" CONTO
+	OUTPUT 206 CODCF
+	OUTPUT 207 RAGSOC
+	MESSAGE COPY,106
+	ADD RUN cg0 -1
+	CHECKTYPE NORMAL
+	WARNING "Cliente inesistente sulla riga contabile"
+END
+
+NUMBER 306 6
+BEGIN
+	PROMPT 45 6 "Fornitore  "
+	HELP "Codice del fornitore delle riga"
+	FIELD LF_PCON->SOTTOCONTO
+	USE LF_CLIFO
+	INPUT TIPOCF "F"
+	INPUT CODCF 306
+	DISPLAY "Codice" CODCF
+	DISPLAY "Ragione Sociale Fornitore@50" RAGSOC
+	DISPLAY "Gruppo" GRUPPO
+	DISPLAY "Conto" CONTO
+	OUTPUT 306 CODCF
+	OUTPUT 307 RAGSOC
+	MESSAGE COPY,106
+	ADD RUN cg0 -1
+	MESSAGE COPY,106
+	CHECKTYPE NORMAL
+	WARNING "Fornitore inesistente sulla riga contabile"
+END
+
+STRING 107 50
+BEGIN
+	PROMPT 2 7 "Descriz.  "
+	HELP "Descrizione del conto delle riga"
+	FIELD LF_PCON->DESCR
+	USE LF_PCON KEY 2
+	INPUT DESCR 107
+	DISPLAY "Descrizione@50" DESCR
+	DISPLAY "Gruppo" GRUPPO
+	DISPLAY "Conto" CONTO
+	DISPLAY "Sottoconto" SOTTOCONTO
+	COPY OUTPUT 106
+	CHECKTYPE NORMAL
+	WARNING "Sottoconto inesistente o mancante sulla riga contabile"
+	ADD RUN cg0 -0
+END
+
+STRING 207 50
+BEGIN
+	PROMPT 2 7 "Cliente   "
+	HELP "Ragione sociale del cliente delle riga"
+	FIELD LF_CLIFO->RAGSOC
+	USE LF_CLIFO KEY 2
+	INPUT TIPOCF "C"
+	INPUT RAGSOC 207
+	DISPLAY "Ragione Sociale Cliente@50" RAGSOC
+	DISPLAY "Gruppo" GRUPPO
+	DISPLAY "Conto" CONTO
+	DISPLAY "Codice" CODCF
+	COPY OUTPUT 206
+	MESSAGE COPY,107
+	ADD RUN cg0 -1
+	CHECKTYPE NORMAL
+	WARNING "Cliente inesistente sulla riga contabile"
+END
+
+STRING 307 50
+BEGIN
+	PROMPT 2 7 "Fornitore "
+	HELP "Ragione sociale del fonitore delle riga"
+	FIELD LF_PCON->SOTTOCONTO
+	USE LF_CLIFO KEY 2
+	INPUT TIPOCF "F"
+	INPUT RAGSOC 307
+	DISPLAY "Ragione Sociale Fornitore@50" RAGSOC
+	DISPLAY "Gruppo" GRUPPO
+	DISPLAY "Conto" CONTO
+	DISPLAY "Codice" CODCF
+	COPY OUTPUT 306
+	MESSAGE COPY,107
+	ADD RUN cg0 -1
+	CHECKTYPE NORMAL
+	WARNING "Fornitore inesistente sulla riga contabile"
+END
+
+GROUPBOX DLG_NULL 66 4
+BEGIN
+	PROMPT 1 9 "Contropartita"
+END
+
+LIST 110 1 12
+BEGIN
+	PROMPT 2 10 "Tipo "
+	HELP "Tipo del conto di contropartita della riga"
+	FLAGS "U"
+	ITEM " |Conto"     MESSAGE SHOW,113|HIDE,213|HIDE,313|SHOW,114|HIDE,214|HIDE,314
+	ITEM "C|Cliente"   MESSAGE SHOW,213|HIDE,113|HIDE,313|SHOW,214|HIDE,114|HIDE,314
+	ITEM "F|Fornitore" MESSAGE SHOW,313|HIDE,113|HIDE,213|SHOW,314|HIDE,114|HIDE,214
+END
+
+NUMBER 111 3
+BEGIN
+	PROMPT 20 10 "Gruppo "
+	HELP "Codice del conto di contropartita delle riga"
+END
+
+NUMBER 112 3
+BEGIN
+	PROMPT 32 10 "Conto "
+	HELP "Codice del conto di contropartita delle riga"
+	FIELD LF_PCON->CONTO
+	COPY USE 105
+	INPUT GRUPPO 111
+	INPUT CONTO 112
+	COPY DISPLAY 105
+	OUTPUT 110 TMCF
+	OUTPUT 111 GRUPPO
+	OUTPUT 112 CONTO
+	OUTPUT 114 DESCR
+	ADD RUN CG0 -0
+  MESSAGE DIRTY,113|DIRTY,213|DIRTY,313
+	CHECKTYPE NORMAL
+	VALIDATE REQIF_FUNC 3 113 213 313
+END
+
+NUMBER 113 6
+BEGIN
+	PROMPT 45 10 "Sottoconto "
+	HELP "Codice del conto di contropartita delle riga"
+	FIELD LF_PCON->SOTTOCONTO
+	COPY USE 106
+	COPY INPUT 112
+	INPUT SOTTOCONTO 113
+	COPY DISPLAY 106
+	OUTPUT 113 SOTTOCONTO
+	OUTPUT 111 GRUPPO
+	OUTPUT 112 CONTO
+	OUTPUT 114 DESCR
+	CHECKTYPE NORMAL
+END
+
+NUMBER 213 6
+BEGIN
+	PROMPT 45 10 "Cliente    "
+	HELP "Codice del cliente di contropartita delle riga"
+	FIELD LF_CLIFO->CODCF
+	COPY USE 206
+	INPUT TIPOCF "C"
+	INPUT CODCF 213
+	COPY DISPLAY 206
+	OUTPUT 213 CODCF
+	OUTPUT 214 RAGSOC
+	MESSAGE COPY,113
+	CHECKTYPE NORMAL
+END
+
+NUMBER 313 6
+BEGIN
+	PROMPT 45 10 "Fornitore  "
+	HELP "Codice del fornitore di contropartita delle riga"
+	FIELD LF_CLIFO->CODCF
+	COPY USE 306
+	INPUT TIPOCF "F"
+	INPUT CODCF 313
+	COPY DISPLAY 306
+	OUTPUT 313 CODCF
+	OUTPUT 314 RAGSOC
+	MESSAGE COPY,113
+	CHECKTYPE NORMAL
+END
+
+STRING 114 50
+BEGIN
+	PROMPT 2 11 "Descriz.  "
+	HELP "Descrizione del conto di contropartita delle riga"
+	FIELD LF_PCON->DESCR
+	COPY USE 107
+	INPUT DESCR 114
+	COPY DISPLAY 107
+	COPY OUTPUT 113
+	ADD RUN cg0 -0
+	WARNING "Conto inesistente sulla riga contabile"
+END
+
+STRING 214 50
+BEGIN
+	PROMPT 2 11 "Cliente   "
+	HELP "Ragione sociale del cliente di contropartita delle riga"
+	FIELD LF_CLIFO->RAGSOC
+	COPY USE 207
+	INPUT TIPOCF "C"
+	INPUT RAGSOC 214
+	COPY DISPLAY 207
+	COPY OUTPUT 213
+	ADD RUN cg0 -1
+	CHECKTYPE NORMAL
+	WARNING "Cliente inesistente sulla riga contabile"
+END
+
+STRING 314 50
+BEGIN
+	PROMPT 2 11 "Fornitore "
+	HELP "Ragione sociale del fornitore di contropartita delle riga"
+	FIELD LF_CLIFO->RAGSOC
+	COPY USE 307
+	INPUT TIPOCF "F"
+	INPUT RAGSOC 314
+	COPY DISPLAY 307
+	COPY OUTPUT 313
+	ADD RUN cg0 -1
+	CHECKTYPE NORMAL
+	WARNING "Fornitore inesistente sulla riga contabile"
+END
+
+LIST 115 20
+BEGIN
+	PROMPT 2 13 "Tipo riga "
+	ITEM " |Sola contabilita'"
+	ITEM "C|Gestione saldaconto"
+	ITEM "D|IVA detraibile"
+	ITEM "F|Ritenute fiscali"
+	ITEM "I|Riga di IVA"
+	ITEM "N|IVA non detraibile"
+	ITEM "S|Ritenute sociali"
+	ITEM "T|Totale documento"
+	FLAGS "D"
+END
+
+
+BUTTON DLG_OK 9 2
+BEGIN
+	PROMPT -13 -1 ""
+END
+
+BUTTON DLG_CANCEL 9 2
+BEGIN
+	PROMPT -23 -1 ""
+END
+
+BUTTON DLG_DELREC 9 2
+BEGIN
+	PROMPT -33 -1 "Elimina"
+	MESSAGE EXIT,K_DEL
+END
+
+ENDPAGE
+
+ENDMASK
diff --git a/cg/cg2200.cpp b/cg/cg2200.cpp
index f6962f7e4..c7469a7a1 100755
--- a/cg/cg2200.cpp
+++ b/cg/cg2200.cpp
@@ -141,4 +141,4 @@ int cg2200(int argc, char** argv)
   TDeleteprovv_app a;
   a.run(argc, argv, "Eliminazione movimenti provvisori");
   return 0;
-}
\ No newline at end of file
+}