diff --git a/cg/cg0200a.uml b/cg/cg0200a.uml
new file mode 100755
index 000000000..eae3c3ce8
--- /dev/null
+++ b/cg/cg0200a.uml
@@ -0,0 +1,1698 @@
+#include "cg0200.h"
+
+TOOLBAR "" 0 20 0 2
+
+#include <toolbar.h>
+
+ENDPAGE
+
+PAGE "" -1 -1 78 19
+
+GROUPBOX DLG_NULL 76 4
+BEGIN
+  PROMPT 1 0 "Dati identificativi"
+END
+
+LIST F_TIPOCF 1 12
+BEGIN
+  PROMPT 2 1 "Tipo   "
+  FIELD LF_CLIFO->TIPOCF
+  FLAGS "PG"
+  KEY 1 2 4 5 6          
+  HELP "Indicare se cliente oppure fornitore"
+  ITEM "C|Clienti"
+  MESSAGE CLEAR,4@|COPY,1@|HIDE,DLG_CST|SHOW,DLG_RIC|ENABLE,7@
+  ITEM "F|Fornitori"
+  MESSAGE ENABLE,4@|COPY,1@|SHOW,DLG_CST|HIDE,DLG_RIC|DISABLE,7@
+END
+
+NUMBER F_CODCF 6
+BEGIN
+  PROMPT 2 2 "Codice "
+  FIELD LF_CLIFO->CODCF
+  FLAGS "GR"
+  KEY 1
+  USE LF_CLIFO KEY 1
+  INPUT TIPOCF F_TIPOCF SELECT
+  INPUT CODCF F_CODCF
+  DISPLAY "Codice" CODCF
+  DISPLAY "Sospeso" SOSPESO
+  DISPLAY "Ragione sociale@50" RAGSOC
+  DISPLAY "Codice fiscale@16" COFI
+  DISPLAY "Partita IVA@11" PAIV
+  OUTPUT F_TIPOCF TIPOCF
+  OUTPUT F_CODCF CODCF
+  OUTPUT F_RAGSOC RAGSOC[1,30]
+  OUTPUT F_RAGSOCA RAGSOC[31,]
+  OUTPUT F_COFI COFI
+  OUTPUT F_STATOPAIV STATOPAIV
+  OUTPUT F_PAIV PAIV  
+  OUTPUT F_RICALT RICALT
+  HELP "Codice relativo al cliente o fornitore"
+  MESSAGE COPY,2@
+  CHECKTYPE REQUIRED
+END
+
+STRING F_RAGSOC 30
+BEGIN
+  PROMPT 23 1 "Ragione sociale    "
+  FIELD LF_CLIFO->RAGSOC[1,30]
+  KEY 2
+  USE LF_CLIFO KEY 2
+  INPUT TIPOCF F_TIPOCF SELECT
+  INPUT RAGSOC[1,30] F_RAGSOC
+  DISPLAY "Ragione sociale@50" RAGSOC
+  DISPLAY "Sospeso" SOSPESO
+  DISPLAY "Codice" CODCF
+  DISPLAY "Codice fiscale@16" COFI
+  DISPLAY "Partita IVA@11" PAIV
+  COPY OUTPUT F_CODCF
+  HELP "Prima parte della ragione sociale o cognome"
+  MESSAGE COPY,3@
+  WARNING "Manca la ragione sociale"
+  VALIDATE NOT_EMPTY_FUNC
+END
+
+STRING F_RAGSOCA 20
+BEGIN
+  PROMPT 23 2 "Nome o seconda parte rag. soc. "
+  FIELD LF_CLIFO->RAGSOC[31,]
+  KEY 2
+  HELP "Seconda parte della ragione sociale o nome"
+  MESSAGE COPY,6@
+END
+
+STRING F_RICALT 30 20
+BEGIN
+  PROMPT 2 4 "Ricerca Alt.   "
+  FIELD LF_CLIFO->RICALT
+  KEY 6
+  USE LF_CLIFO KEY 6
+  INPUT TIPOCF F_TIPOCF SELECT
+  INPUT RICALT F_RICALT 
+  DISPLAY "Ricerca alternativa@30" RICALT
+  DISPLAY "Sospeso" SOSPESO
+  DISPLAY "Ragione sociale@50" RAGSOC
+  COPY OUTPUT F_CODCF
+  HELP "Chiave di ricerca alternativa"
+END
+
+LIST F_STATOPAIV 2 21
+BEGIN
+  PROMPT 42 4 "Stato CEE    "
+  FIELD LF_CLIFO->STATOPAIV
+  KEY 5
+  HELP "Codice ISO dello stato"
+  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"
+END
+
+STRING F_COFI 16
+BEGIN
+  PROMPT 2 5 "Codice fiscale "
+  FIELD LF_CLIFO->COFI
+  FLAGS "U"
+  KEY 4
+  USE LF_CLIFO KEY 4
+  INPUT TIPOCF F_TIPOCF SELECT
+  INPUT COFI F_COFI
+  DISPLAY "Codice fiscale@16" COFI
+  DISPLAY "Sospeso" SOSPESO
+  DISPLAY "Codice" CODCF
+  DISPLAY "Ragione sociale@50" RAGSOC
+  DISPLAY "Partita IVA@11" PAIV
+  COPY OUTPUT F_CODCF
+  HELP "Codice fiscale del cliente/fornitore"
+  VALIDATE CF_FUNC  F_STATOPAIV
+END
+
+STRING F_PAIV 12
+BEGIN
+  PROMPT 42 5 "Partita IVA        "
+  FIELD LF_CLIFO->PAIV
+  KEY 5
+  USE LF_CLIFO KEY 5
+  INPUT TIPOCF F_TIPOCF SELECT
+  INPUT STATOPAIV F_STATOPAIV SELECT
+  INPUT PAIV F_PAIV
+  DISPLAY "Partita IVA@11" PAIV
+  DISPLAY "Sospeso" SOSPESO
+  DISPLAY "Codice" CODCF
+  DISPLAY "Ragione sociale@50" RAGSOC
+  DISPLAY "Codice fiscale@16" COFI
+  COPY OUTPUT F_CODCF
+  HELP "Partita IVA del cliente/fornitore"
+  VALIDATE PI_FUNC  F_STATOPAIV
+END
+
+GROUPBOX DLG_NULL 76 6
+BEGIN
+  PROMPT 1 6 "Recapito"
+END
+
+STRING F_INDCF 35
+BEGIN
+  PROMPT 2 7 "Indirizzo "
+  FIELD LF_CLIFO->INDCF
+  HELP "Indirizzo del recapito"
+END
+
+STRING F_CIVCF 10
+BEGIN
+  PROMPT 60 7 "N. "
+  FIELD LF_CLIFO->CIVCF
+  HELP "Numero civico del recapito"
+END
+
+STRING F_LOCALITACF 35
+BEGIN
+  PROMPT 2 8 "Localita' "
+  FIELD LF_CLIFO->LOCALITACF
+  HELP "Localita' del recapito"
+END
+
+NUMBER F_STATOCF 3
+BEGIN
+  PROMPT 2 9 "Comune:Stato  "
+  FIELD LF_CLIFO->STATOCF
+  FLAGS "Z"
+  USE %STA
+  INPUT CODTAB F_STATOCF
+  DISPLAY "Codice" CODTAB
+  DISPLAY "Stato@50" S0
+  OUTPUT F_STATOCF CODTAB
+  OUTPUT F_DESTACF S0
+  HELP "Codice dello stato del recapito"
+  CHECKTYPE NORMAL
+  WARNING "Stato assente"
+END
+
+STRING F_DESTACF 50
+BEGIN
+  PROMPT 23 9 ""
+  USE %STA KEY 2
+  INPUT S0 F_DESTACF
+  DISPLAY "Stato@50" S0
+  DISPLAY "Codice" CODTAB
+  COPY OUTPUT F_STATOCF
+END
+
+STRING F_PROVCF 5
+BEGIN
+  PROMPT 63 8 "Prov."
+  FLAGS "D"
+END
+
+STRING F_CAPCF 5
+BEGIN
+  PROMPT 50 8 "CAP "
+  FIELD LF_CLIFO->CAPCF
+  HELP "Codice di avviamento postale del recapito"
+END
+
+STRING F_COMCF 4
+BEGIN
+  PROMPT 8 10 ":Codice "
+  FIELD LF_CLIFO->COMCF
+  FLAGS "U"
+  USE LF_COMUNI
+  INPUT STATO F_STATOCF SELECT
+  INPUT COM F_COMCF
+  DISPLAY "Stato" STATO
+  DISPLAY "Codice" COM
+  DISPLAY "Comune@50" DENCOM
+  OUTPUT F_STATOCF STATO
+  OUTPUT F_COMCF COM
+  OUTPUT F_CAPCF CAPCOM
+  OUTPUT F_DENCOMCF DENCOM
+  OUTPUT F_PROVCF PROVCOM
+  HELP "Codice del comune del recapito"
+  CHECKTYPE NORMAL
+  WARNING "Comune assente"
+  ADD MASK ba4100a
+END
+
+STRING F_DENCOMCF 50
+BEGIN
+  PROMPT 23 10 ""
+  USE LF_COMUNI KEY 2
+  INPUT DENCOM F_DENCOMCF
+  DISPLAY "Comune@50" DENCOM
+  DISPLAY "Stato" STATO
+  DISPLAY "Codice" COM
+  COPY OUTPUT F_COMCF
+  HELP "Nome del comune del recapito"
+  ADD MASK ba4100a
+END
+
+LIST F_TIPOPERS 1 11
+BEGIN
+  PROMPT 2 12 "Tipo persona   "
+  FIELD LF_CLIFO->TIPOPERS
+  HELP "Tipo anagrafico del clinete/fornitore"
+  ITEM "F|Fisica"
+  MESSAGE COPY,F_TIPOAPER
+  ITEM "G|Giuridica"
+  MESSAGE COPY,F_TIPOAPER
+END
+
+STRING F_CODSTAT 7
+BEGIN
+  PROMPT 46 12 "Codice statistico   "
+  FIELD LF_CLIFO->CODSTAT
+  USE %STT
+  INPUT CODTAB F_CODSTAT
+  DISPLAY "Codice statistico" CODTAB
+  DISPLAY "Descrizione della statistica         " S0
+  OUTPUT F_CODSTAT CODTAB
+  HELP "Codice statistico assegnato al cliente/fornitore"
+  CHECKTYPE NORMAL
+END
+
+BOOLEAN F_OCCASIONALE
+BEGIN
+  PROMPT 2 16 "Occasionale "
+  FIELD LF_CLIFO->OCCAS
+  HELP "Indicare se si tratta di un C/F occasionale"
+  MESSAGE TRUE "2",F_ALLEG
+END
+
+BOOLEAN F_SOSPESO
+BEGIN
+  PROMPT 32 16 "Sospeso "
+  FIELD LF_CLIFO->SOSPESO
+  HELP "Indicare se il C/F e' movimentato ma non piu' utilizzabile"
+END
+
+NUMBER F_ALLEG 1
+BEGIN
+  PROMPT 2 13 "Inserimento in allegato "
+  FIELD LF_CLIFO->ALLEG
+  SHEET "Codice|Descrizione@120"
+  HELP "Codice per l'inserimento negli allegati IVA"
+  INPUT F_ALLEG
+  ITEM " |Persona fisica/giuridica valida ai fini allegato IVA"
+  ITEM "1|Persona che non deve essere indicata su allegato IVA"
+  ITEM "2|Persona non indicata su all. IVA e per la quale non interessa avere dei dati anagrafici e il dettaglio dei saldi"
+  ITEM "3|Per inserire documenti riepil. dei quali occorre indicare in immissione il protocollo iniziale e finale"
+  ITEM "4|Cliente con partita IVA gia presente in archivio, ma che si intende stampare separatamente sull'allegato IVA"
+  ITEM "5|Cliente che risiede all'estero"
+  OUTPUT F_ALLEG
+END
+
+NUMBER F_CODALLEG 6
+BEGIN
+  PROMPT 32 13 "Codice allegato "
+  FIELD LF_CLIFO->CODALLEG 
+  FLAGS "R"
+  COPY USE F_CODCF
+  INPUT TIPOCF F_TIPOCF SELECT
+  INPUT CODCF F_CODALLEG
+  COPY DISPLAY F_CODCF               
+  OUTPUT F_CODALLEG CODCF
+  OUTPUT F_RAGSOCALLEG RAGSOC
+  HELP "Codice dell'allegato IVA in cui inserire i progressivi"
+  CHECKTYPE NORMAL        
+  WARNING "Cliente/Fornitore assente"
+END
+
+STRING F_RAGSOCALLEG 50
+BEGIN
+  PROMPT 2 14 "Rag. soc. allegato   "
+  FLAGS "D"
+END
+
+ENDPAGE
+
+PAGE "Pag. 2" -1 -1 78 19
+
+GROUPBOX DLG_NULL 76 4
+BEGIN
+  PROMPT 1 0 "Dati identificativi"
+END
+
+LIST DLG_NULL 1 12
+BEGIN
+  PROMPT 2 1 "Tipo   "
+  FLAGS "D"
+  GROUP 1
+  ITEM "C|Clienti"
+  ITEM "F|Fornitori"
+END
+
+NUMBER DLG_NULL 6
+BEGIN
+  PROMPT 2 2 "Codice "
+  FLAGS "RD"
+  GROUP 2
+END
+
+STRING DLG_NULL 30
+BEGIN
+  PROMPT 23 1 "Ragione sociale      "
+  FLAGS "D"
+  GROUP 3
+END
+
+STRING DLG_NULL 20
+BEGIN
+  PROMPT 23 2 "Nome o seconda parte rag. soc. "
+  FLAGS "D"
+  GROUP 6
+END
+
+GROUPBOX DLG_NULL 76 7
+BEGIN
+  PROMPT 1 4 "Numeri telefonici"
+END
+
+STRING F_PTEL 10
+BEGIN
+  PROMPT 2 5 "Telefono      "
+  FIELD LF_CLIFO->PTEL
+  HELP "Prefisso telefonico primo recapito"
+END
+
+STRING F_TEL 30
+BEGIN
+  PROMPT 43 5 ""
+  FIELD LF_CLIFO->TEL
+  HELP "Numero telefonico primo recapito"
+END
+
+STRING F_PTEL2 10
+BEGIN
+  PROMPT 16 6 ""
+  FIELD LF_CLIFO->PTEL2
+  HELP "Prefisso telefonico secondo recapito"
+END
+
+STRING F_TEL2 30
+BEGIN
+  PROMPT 43 6 ""
+  FIELD LF_CLIFO->TEL2
+  HELP "Numero telefonico secondo recapito"
+END
+
+STRING F_PTEL3 10
+BEGIN
+  PROMPT 16 7 ""
+  FIELD LF_CLIFO->PTEL3
+  HELP "Prefisso telefonico terzo recapito"
+END
+
+STRING F_TEL3 30
+BEGIN
+  PROMPT 43 7 ""
+  FIELD LF_CLIFO->TEL3
+  HELP "Numero telefonico terzo recapito"
+END
+
+STRING F_PFAX 10
+BEGIN
+  PROMPT 2 8 "Fax           "
+  FIELD LF_CLIFO->PFAX
+  HELP "Prefisso del numero di fax"
+END
+
+STRING F_FAX 30
+BEGIN
+  PROMPT 43 8 ""
+  FIELD LF_CLIFO->FAX
+  HELP "Numero telefonico del fax"
+END
+
+STRING F_PTELEX 10
+BEGIN
+  PROMPT 2 9 "Telex         "
+  FIELD LF_CLIFO->PTELEX
+  HELP "Prefisso del numero di telex"
+END
+
+STRING F_TELEX 30
+BEGIN
+  PROMPT 43 9 ""
+  FIELD LF_CLIFO->TELEX
+  HELP "Numero telefonico del telex"
+END
+
+GROUPBOX DLG_NULL 76 4
+BEGIN
+  PROMPT 1 11 "Percipiente"
+END
+
+LIST F_TIPOAPER 1 9
+BEGIN
+  PROMPT 2 12 "Tipo                 "
+  FIELD LF_CLIFO->TIPOAPER
+  FLAGS "D"
+  ITEM "F|Fisica"
+  ITEM "G|Giuridica"
+END
+
+NUMBER F_CODANAGPER 5
+BEGIN
+  PROMPT 61 12 "Codice "
+  FIELD LF_CLIFO->CODANAGPER
+  FLAGS "R"
+  GROUP 4
+  USE LF_ANAG
+  INPUT TIPOA F_TIPOAPER SELECT
+  INPUT CODANAGR F_CODANAGPER
+  DISPLAY "Codice" CODANAGR
+  DISPLAY "Nome@50" RAGSOC
+  OUTPUT F_TIPOAPER TIPOA
+  OUTPUT F_CODANAGPER CODANAGR
+  OUTPUT F_RAGSOC1 RAGSOC
+  HELP "Codice anagrafico percepiente per la compilazione Mod. 770"
+  CHECKTYPE NORMAL
+  WARNING "Percipiente assente"
+  ADD RUN  ba4 -1
+END
+
+STRING F_RAGSOC1 50
+BEGIN
+  PROMPT 2 13 "Ragione sociale      "
+  GROUP 4
+  USE LF_ANAG KEY 2
+  INPUT TIPOA F_TIPOAPER SELECT
+  INPUT RAGSOC F_RAGSOC1
+  DISPLAY "Ragione sociale@50" RAGSOC
+  DISPLAY "Codice" CODANAGR
+  COPY OUTPUT F_CODANAGPER
+  HELP "Ragione sociale del percepiente per la compilazione Mod. 770"
+  ADD RUN ba4 -1
+END
+
+GROUPBOX DLG_NULL 76 4
+BEGIN
+  PROMPT 1 15 "Dati di nascita"
+  GROUP 5
+END
+
+DATE F_DATANASC
+BEGIN
+  PROMPT 2 16 "Data               "
+  FIELD LF_CLIFO->DATANASC
+  GROUP 5
+  HELP "Data di nascita del clinete/fornitore"
+END
+
+NUMBER F_STATONASC 3
+BEGIN
+  PROMPT 38 16 "Stato "
+  FIELD LF_CLIFO->STATONASC
+  FLAGS "Z"
+  GROUP 5
+  COPY USE F_STATOCF
+  INPUT CODTAB F_STATONASC
+  COPY DISPLAY F_STATOCF
+  OUTPUT F_STATONASC CODTAB
+  HELP "Stato di nascita del cliente/fornitore"
+  CHECKTYPE NORMAL
+  WARNING "Nazione assente"
+  ADD MASK ba4100a
+END
+
+STRING F_COMNASC 4
+BEGIN
+  PROMPT 60 16 "Comune "
+  FIELD LF_CLIFO->COMNASC
+  FLAGS "U"
+  GROUP 5
+  COPY USE F_COMCF
+  INPUT STATO F_STATONASC
+  INPUT COM F_COMNASC
+  COPY DISPLAY F_COMCF
+  OUTPUT F_STATONASC STATO
+  OUTPUT F_COMNASC COM
+  OUTPUT F_DENCOMNASC DENCOM
+  HELP "Codice del comune di nascita del cliente/fornitore"
+  CHECKTYPE NORMAL
+  WARNING "Comune assente"
+  ADD MASK ba4100a
+END
+
+STRING F_DENCOMNASC 50
+BEGIN
+  PROMPT 2 17 "Denominazione      "
+  GROUP 5
+  USE LF_COMUNI KEY 2
+  INPUT DENCOM F_DENCOMNASC
+  COPY DISPLAY F_DENCOMCF
+  COPY OUTPUT F_COMNASC
+  HELP "Nome del comune di nascita"
+  ADD MASK ba4100a
+END
+
+ENDPAGE
+
+PAGE "Pag. 3" -1 -1 78 19
+
+GROUPBOX DLG_NULL 76 4
+BEGIN
+  PROMPT 1 0 "Dati identificativi"
+END
+
+LIST DLG_NULL 1 12
+BEGIN
+  PROMPT 2 1 "Tipo   "
+  FLAGS "D"
+  GROUP 1
+  ITEM "C|Clienti"
+  ITEM "F|Fornitori"
+END
+
+NUMBER DLG_NULL 6
+BEGIN
+  PROMPT 2 2 "Codice "
+  FLAGS "RD"
+  GROUP 2
+END
+
+STRING DLG_NULL 30
+BEGIN
+  PROMPT 23 1 "Ragione sociale      "
+  FLAGS "D"
+  GROUP 3
+END
+
+STRING DLG_NULL 20
+BEGIN
+  PROMPT 23 2 "Nome o seconda parte rag. soc. "
+  FLAGS "D"
+  GROUP 6
+END
+
+GROUPBOX DLG_NULL 76 4
+BEGIN
+  PROMPT 1 4 "Banca"
+END
+
+NUMBER F_CODABI 5
+BEGIN
+  PROMPT 2 5 "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]
+  DISPLAY "Codice CAB" CODTAB[6,10]
+  DISPLAY "Denominazione@50" S0
+  OUTPUT F_CODABI CODTAB[1,5]
+  OUTPUT F_CODBAN CODTAB[6,10]
+  OUTPUT F_DESBAN S0
+  HELP "Codice ABI banca del C/F"
+  CHECKTYPE NORMAL
+END
+
+NUMBER F_CODBAN 5
+BEGIN
+  PROMPT 55 5 "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
+  COPY DISPLAY F_CODABI
+  COPY OUTPUT F_CODABI
+  HELP "Codice CAB banca del C/F"
+  CHECKTYPE NORMAL
+END
+
+STRING F_DESBAN 50
+BEGIN
+  PROMPT 2 6 "Denominazione      "
+  USE %BAN KEY 2
+  INPUT S0 F_DESBAN
+  DISPLAY "Denominazione@50" S0
+  DISPLAY "Codice ABI" CODTAB[1,5]
+  DISPLAY "Codice CAB" CODTAB[6,10]
+  COPY OUTPUT F_CODABI
+END
+
+STRING F_CODVAL 3
+BEGIN
+  PROMPT 2 8 "Codice 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"
+  CHECKTYPE NORMAL
+END
+
+STRING F_CODLIN 1
+BEGIN
+  PROMPT 45 8 "Codice lingua           "
+  FIELD LF_CLIFO->CODLIN
+  USE %LNG
+  INPUT CODTAB F_CODLIN
+  DISPLAY "Codice lingua " CODTAB
+  DISPLAY "Descrizione@50" S0
+  OUTPUT F_CODLIN CODTAB
+  HELP "Codice lingua per C/F esteri"
+  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
+
+STRING F_CODPAG 4
+BEGIN
+  PROMPT 45 9 "Codice di pagamento     "
+  FIELD LF_CLIFO->CODPAG
+  FLAGS "UZ"
+  USE %CPG
+  INPUT CODTAB F_CODPAG
+  DISPLAY "Codice" CODTAB
+  DISPLAY "Descrizione@50" S0
+  OUTPUT F_CODPAG CODTAB
+  HELP "Codice condizione di pagamento concordata"
+  CHECKTYPE NORMAL
+END
+
+GROUPBOX DLG_NULL 76 4
+BEGIN
+  PROMPT 1 10 "Conto cliente/fornitore"
+END
+
+NUMBER F_GRUPPO 3
+BEGIN
+  PROMPT 2 11 "Gruppo      "
+  FIELD LF_CLIFO->GRUPPO
+  FLAGS "R"
+  HELP "Codice del gruppo"
+END
+
+NUMBER F_CONTO 3
+BEGIN
+  PROMPT 27 11 "Conto "
+  FIELD LF_CLIFO->CONTO
+  FLAGS "R"
+  USE LF_PCON SELECT (CONTO!="")&&(SOTTOCONTO="")&&(TMCF=#F_TIPOCF)
+  INPUT GRUPPO F_GRUPPO
+  INPUT CONTO F_CONTO
+  DISPLAY "Gruppo" GRUPPO
+  DISPLAY "Conto" CONTO
+  DISPLAY "Descrizione@50" DESCR
+  OUTPUT F_GRUPPO GRUPPO
+  OUTPUT F_CONTO CONTO
+  OUTPUT F_DESCONTO DESCR
+  HELP "Inserire il gruppo"
+  CHECKTYPE NORMAL
+  WARNING "Il conto deve essere di tipo clienti o fornitori"
+  ADD RUN cg0 -0
+END
+
+STRING F_DESCONTO 50
+BEGIN
+  PROMPT 2 12 "Descrizione "
+  USE LF_PCON KEY 2 SELECT (CONTO!="")&&(SOTTOCONTO="")&&(TMCF=#F_TIPOCF)
+  INPUT DESCR F_DESCONTO
+  DISPLAY "Descrizione@50" DESCR
+  DISPLAY "Gruppo" GRUPPO
+  DISPLAY "Conto" CONTO
+  COPY OUTPUT F_CONTO
+  CHECKTYPE NORMAL
+  ADD RUN cg0 -0
+END
+
+GROUPBOX DLG_RIC 76 4
+BEGIN
+  PROMPT 1 14 "Conto di ricavo"
+END
+
+GROUPBOX DLG_CST 76 4
+BEGIN
+  PROMPT 1 14 "Conto di costo"
+  FLAGS "H"
+END
+
+NUMBER F_GRUPPORIC 3
+BEGIN
+  PROMPT 2 15 "Gruppo      "
+  FIELD LF_CLIFO->GRUPPORIC
+  FLAGS "R"
+  HELP "Gruppo di contropartita"
+END
+
+NUMBER F_CONTORIC 3
+BEGIN
+  PROMPT 27 15 "Conto "
+  FIELD LF_CLIFO->CONTORIC
+  FLAGS "R"
+  HELP "Conto di contropartita"
+END
+
+NUMBER F_SOTTOCRIC 6
+BEGIN
+  PROMPT 47 15 "Sottoconto "
+  FIELD LF_CLIFO->SOTTOCRIC
+  FLAGS "R"
+  USE LF_PCON SELECT SOTTOCONTO!=""
+  INPUT GRUPPO F_GRUPPORIC
+  INPUT CONTO F_CONTORIC
+  INPUT SOTTOCONTO F_SOTTOCRIC
+  DISPLAY "Gruppo" GRUPPO
+  DISPLAY "Conto" CONTO
+  DISPLAY "Sottoconto" SOTTOCONTO
+  DISPLAY "Descrizione@50" DESCR
+  OUTPUT F_GRUPPORIC GRUPPO
+  OUTPUT F_CONTORIC CONTO
+  OUTPUT F_SOTTOCRIC SOTTOCONTO
+  OUTPUT F_DESCRIC DESCR
+  HELP "Sottoconto di contropartita"
+  CHECKTYPE NORMAL
+  ADD RUN cg0 -0
+END
+
+STRING F_DESCRIC 50
+BEGIN
+  PROMPT 2 16 "Descrizione "
+  USE LF_PCON KEY 2 SELECT SOTTOCONTO!=""
+  INPUT DESCR F_DESCRIC
+  DISPLAY "Descrizione@50" DESCR
+  DISPLAY "Gruppo" GRUPPO
+  DISPLAY "Conto" CONTO
+  DISPLAY "Sottoconto" SOTTOCONTO
+  COPY OUTPUT F_SOTTOCRIC
+  CHECKTYPE NORMAL
+  ADD RUN cg0 -0
+END
+
+ENDPAGE
+
+PAGE "Pag. 4" -1 -1 78 19
+
+GROUPBOX DLG_NULL 76 4
+BEGIN
+  PROMPT 1 0 "Dati identificativi"
+END
+
+LIST DLG_NULL 1 12
+BEGIN
+  PROMPT 2 1 "Tipo  "
+  FIELD LF_INDSP->TIPOCF
+  FLAGS "D"
+  GROUP 1
+  ITEM "C|Clienti"
+  ITEM "F|Fornitori"
+END
+
+NUMBER DLG_NULL 6
+BEGIN
+  PROMPT 2 2 "Codice "
+  FIELD LF_INDSP->CODCF
+  FLAGS "RD"
+  GROUP 2
+END
+
+STRING DLG_NULL 30
+BEGIN
+  PROMPT 23 1 "Ragione sociale      "
+  FLAGS "D"
+  GROUP 3
+END
+
+STRING DLG_NULL 20
+BEGIN
+  PROMPT 23 2 "Nome o seconda parte rag. soc. "
+  FLAGS "D"
+  GROUP 6
+END
+
+SPREADSHEET F_SHEET_G_VEN
+BEGIN
+  PROMPT 0 5 ""
+  ITEM "Ragione Sociale@50"
+  ITEM "Indirizzo@35"
+  ITEM "N. civico@10"
+  ITEM "Localita@35"
+  ITEM "CAP  "
+  ITEM "Stato"
+  ITEM "Comune "
+  ITEM "Prefisso tel."
+  ITEM "Numero tel.@30"
+  ITEM "Prefisso fax"
+  ITEM "Numero fax@30"
+  ITEM "Iva Rid."
+  ITEM "Codice"
+END
+
+ENDPAGE
+
+PAGE "Pag. 5" -1 -1 78 19
+
+GROUPBOX DLG_NULL 76 4
+BEGIN
+  PROMPT 1 0 "Dati identificativi"
+END
+
+LIST F_TIPOCFVEN 1 12
+BEGIN
+  PROMPT 2 1 "Tipo   "
+  FIELD LF_CFVEN->TIPOCF
+  FLAGS "D"
+  GROUP 1
+  ITEM "C|Clienti"
+  ITEM "F|Fornitori"
+END
+
+NUMBER F_CODCFVEN 6
+BEGIN
+  PROMPT 2 2 "Codice "
+  FIELD LF_CFVEN->CODCF
+  FLAGS "RD"
+  GROUP 2
+END
+
+STRING DLG_NULL 30
+BEGIN
+  PROMPT 23 1 "Ragione sociale      "
+  FLAGS "D"
+  GROUP 3
+END
+
+STRING DLG_NULL 20
+BEGIN
+  PROMPT 23 2 "Nome o seconda parte rag. soc. "
+  FLAGS "D"
+  GROUP 6
+END
+
+NUMBER F_CODINDDOC 3
+BEGIN
+  PROMPT 2 5 "Codice indirizzo documento "
+  FIELD LF_CFVEN->CODINDDOC
+  GROUP 7
+  SHEET "Codice|Ragione sociale@50|Indirizzo@35|Nr.@10|Localita@35"
+  INPUT F_CODINDDOC
+  OUTPUT F_CODINDDOC
+  HELP "Codice indirizzi di pag.4"
+  CHECKTYPE NORMAL
+END
+
+STRING F_CODNOTE 2
+BEGIN
+  PROMPT 43 5 "Codice Note Cli/Fo           "
+  FIELD LF_CFVEN->CODNOTE
+  USE %NOT
+  INPUT CODTAB F_CODNOTE
+  DISPLAY "Codice nota" CODTAB
+  DISPLAY "Destinazione@30" S0
+  DISPLAY "Blocca Immissione" B0
+  DISPLAY "Documento" B1
+  OUTPUT F_CODNOTE CODTAB
+  HELP "Codice note cliente/fornitore"
+  CHECKTYPE NORMAL
+END
+
+STRING F_CODLEG 2
+BEGIN
+  PROMPT 2 8 "Codice Legale              "
+  FIELD LF_CFVEN->CODLEG
+  GROUP 7
+  USE %LEG
+  INPUT CODTAB F_CODLEG
+  DISPLAY "Codice legale" CODTAB
+  DISPLAY "Descrizione@30" S0
+  OUTPUT F_CODLEG CODTAB
+  HELP "Codice legale per contenzioso"
+  CHECKTYPE NORMAL
+END
+
+STRING F_CODCATC 2
+BEGIN
+  PROMPT 43 8 "Codice Categoria contabile   "
+  FIELD LF_CFVEN->CODCATC
+  USE %CCO
+  INPUT CODTAB F_CODCATC
+  DISPLAY "Codice contabile" CODTAB
+  DISPLAY "Descrizione@30" S0
+  OUTPUT F_CODCATC CODTAB
+  HELP "Codice categoria contabile del C/F"
+  CHECKTYPE NORMAL
+END
+
+STRING F_CODPRCF 10
+BEGIN
+  PROMPT 2 11 "Codice presso cliente      "
+  FIELD LF_CFVEN->CODPRCF
+  GROUP 7
+  HELP "Codice meccanografico assegnato dal cliente"
+END
+
+NUMBER F_CODINDSP 3
+BEGIN
+  PROMPT 43 11 "Codice indirizzo spedizione  "
+  FIELD LF_CFVEN->CODINDSP 
+  GROUP 7
+  SHEET "Codice|Ragione sociale@50|Indirizzo@35|Nr.@10|Localita@35"
+  INPUT F_CODINDSP
+  OUTPUT F_CODINDSP
+  HELP "Codice dell'indirizzo di spedizione da proporre"
+  CHECKTYPE NORMAL
+END
+
+GROUPBOX DLG_NULL 76 4
+BEGIN
+  PROMPT 1 14 "Dati Agente"
+END
+
+STRING F_CODZONA 2
+BEGIN
+  PROMPT 2 15 "Codice Zona                "
+  FIELD LF_CFVEN->CODZONA
+  GROUP 7
+  USE %ZON
+  INPUT CODTAB F_CODZONA
+  DISPLAY "Codice Zona " CODTAB
+  DISPLAY "Descrizione@30" S0
+  OUTPUT F_CODZONA CODTAB
+  HELP "Codice della zona dell'agente"
+  CHECKTYPE NORMAL
+END
+
+STRING F_CODAG 3
+BEGIN
+  PROMPT 46 15 "Codice agente          "
+  FIELD LF_CFVEN->CODAG
+  GROUP 7
+  HELP "Codice dell'agente di cui si serve il cliente"
+END
+
+NUMBER F_PROVV 5 2
+BEGIN
+  PROMPT 2 16 "Provvigione                "
+  FIELD LF_CFVEN->PROVV
+  GROUP 7
+  HELP "Provvigione percepita dall'agente"
+END
+
+BOOLEAN F_LIQPAG
+BEGIN
+  PROMPT 46 16 "Liquidazione provvigioni"
+  FIELD LF_CFVEN->LIQPAG
+  GROUP 7
+  HELP "Indicare se si usa la liquidazione provvigioni"
+END
+
+ENDPAGE
+
+PAGE "Pag. 6" -1 -1 78 19
+
+GROUPBOX DLG_NULL 76 4
+BEGIN
+  PROMPT 1 0 "Dati identificativi"
+END
+
+LIST DLG_NULL 1 12
+BEGIN
+  PROMPT 2 1 "Tipo   "
+  FLAGS "DG"
+  GROUP 1
+  ITEM "C|Clienti"
+  MESSAGE HIDE,F_CODCASS|SHOW,F_CODFASS|"F",F_TEMP
+  ITEM "F|Fornitori"
+  MESSAGE HIDE,F_CODFASS|SHOW,F_CODCASS|"C",F_TEMP
+END
+
+NUMBER DLG_NULL 6
+BEGIN
+  PROMPT 2 2 "Codice "
+  FLAGS "RD"
+  GROUP 2
+END
+
+STRING DLG_NULL 30
+BEGIN
+  PROMPT 23 1 "Ragione sociale      "
+  FLAGS "D"
+  GROUP 3
+END
+
+STRING DLG_NULL 20
+BEGIN
+  PROMPT 23 2 "Nome o seconda parte rag. soc. "
+  FLAGS "D"
+  GROUP 6
+END
+
+STRING F_CODNOTESP1 2
+BEGIN
+  PROMPT 2 4 "Codici note documento    "
+  FIELD LF_CFVEN->CODNOTESP1
+  GROUP 7
+  USE %NDO
+  INPUT CODTAB F_CODNOTESP1
+  DISPLAY "Codice" CODTAB
+  DISPLAY "Descrizione@30" S0
+  OUTPUT F_CODNOTESP1 CODTAB
+  HELP "Primo codice delle note del documento"
+  CHECKTYPE NORMAL
+END
+
+STRING F_CODNOTESP2 2
+BEGIN
+  PROMPT 33 4 ""
+  FIELD LF_CFVEN->CODNOTESP2
+  GROUP 7
+  COPY USE F_CODNOTESP1
+  INPUT CODTAB F_CODNOTESP2
+  COPY DISPLAY F_CODNOTESP1
+  OUTPUT F_CODNOTESP2 CODTAB
+  HELP "Secondo codice delle note del documento"
+  CHECKTYPE NORMAL
+END
+
+STRING F_CODSPMEZZO 2
+BEGIN
+  PROMPT 46 4 "Codice modalita spedizione "
+  FIELD LF_CFVEN->CODSPMEZZO
+  USE %MSP
+  INPUT CODTAB F_CODSPMEZZO
+  DISPLAY "Codice modalita'" CODTAB
+  DISPLAY "Descrizione@30" S0
+  OUTPUT F_CODSPMEZZO CODTAB
+  HELP "Codice modalita' di spedizione/a mezzo"
+  CHECKTYPE NORMAL
+END
+
+GROUPBOX DLG_NULL 20 5
+BEGIN
+  PROMPT 1 6 "Vettori"
+END
+
+NUMBER F_CODVETT1 3
+BEGIN
+  PROMPT 2 7 "Vettore 1 "
+  FIELD LF_CFVEN->CODVETT1
+  FLAGS "Z"
+  GROUP 7
+  USE %VET
+  INPUT CODTAB F_CODVETT1
+  DISPLAY "Codice vettore" CODTAB
+  DISPLAY "Ragione sociale@50" S0
+  OUTPUT F_CODVETT1 CODTAB
+END
+
+NUMBER F_CODVETT2 3
+BEGIN
+  PROMPT 2 8 "Vettore 2 "
+  FIELD LF_CFVEN->CODVETT2
+  FLAGS "Z"
+  GROUP 7
+  COPY USE F_CODVETT1
+  INPUT CODTAB F_CODVETT2
+  COPY DISPLAY F_CODVETT1
+  OUTPUT F_CODVETT2 CODTAB
+END
+
+NUMBER F_CODVETT3 3
+BEGIN
+  PROMPT 2 9 "Vettore 3 "
+  FIELD LF_CFVEN->CODVETT3
+  FLAGS "Z"
+  GROUP 7
+  COPY USE F_CODVETT1
+  INPUT CODTAB F_CODVETT3
+  COPY DISPLAY F_CODVETT1
+  OUTPUT F_CODVETT3 CODTAB
+END
+
+STRING F_CODPORTO 2
+BEGIN
+  PROMPT 23 6 "Porto     "
+  FIELD LF_CFVEN->CODPORTO
+  USE %POR
+  INPUT CODTAB F_CODPORTO
+  DISPLAY "Codice" CODTAB
+  DISPLAY "Descrizione@30" S0
+  OUTPUT F_CODPORTO CODTAB
+  HELP "Codice della modalita' di consegna/porto"
+  CHECKTYPE NORMAL
+END
+
+BOOLEAN F_RAGGDOC
+BEGIN
+  PROMPT 23 8 "Raggruppamento documenti"
+  FIELD LF_CFVEN->RAGGDOC
+  GROUP 7
+  HELP "Indicare se vanno raggruppati i documenti (bolle/fatture)"
+END
+
+NUMBER F_NCOPIE 2
+BEGIN
+  PROMPT 58 8 "Numero copie  "
+  FIELD LF_CFVEN->NCOPIE
+  GROUP 7
+  HELP "Numero di copie dei documenti"
+END
+
+TEXT F_CODFASS
+BEGIN
+  PROMPT 23 9 "Codice fornitore associato    "
+END
+
+TEXT F_CODCASS
+BEGIN
+  PROMPT 23 9 "Codice cliente associato      "
+END
+
+STRING F_TEMP 1
+BEGIN
+  PROMPT 56 8 ""
+  FLAGS "HD"
+END
+
+NUMBER F_CODCFASS 6
+BEGIN
+  PROMPT 58 9 ""
+  FIELD LF_CFVEN->CODCFASS
+  USE LF_CLIFO KEY 1
+  INPUT TIPOCF F_TEMP SELECT
+  INPUT CODCF F_CODCFASS
+  DISPLAY "Codice" CODCF
+  DISPLAY "Ragione Sociale@50" RAGSOC
+  OUTPUT F_CODCFASS CODCF
+  HELP "Codice del fornitore/cliente associato"
+  CHECKTYPE NORMAL
+END
+
+NUMBER F_ASSFIS 2
+BEGIN
+  PROMPT 2 11 "Codice Assoggettamento fiscale  "
+  FIELD LF_CFVEN->ASSFIS
+  FLAGS "Z"
+  USE %ASF
+  INPUT CODTAB F_ASSFIS
+  DISPLAY "Codice assogg." CODTAB
+  DISPLAY "Descrizione@50" S0
+  OUTPUT F_ASSFIS CODTAB
+  HELP "Codice d'assoggettamento fiscale"
+END
+
+BOOLEAN F_FATTSOSP
+BEGIN
+  PROMPT 51 11 "Fatture in sospensione"
+  FIELD LF_CFVEN->FATTSOSP
+  HELP "Indicase se si tartta di fatture in sospensione d'imposta"
+END
+
+GROUPBOX DLG_NULL 76 4
+BEGIN
+  PROMPT 1 13 "Dati lettera esenzione"
+END
+
+STRING F_VSNRPROT 7
+BEGIN
+  PROMPT 2 14 "Vs nr. protocollo  "
+  FIELD LF_CFVEN->VSNRPROT
+  GROUP 7
+  HELP "Vostro nr. di protocollo della lettera"
+END
+
+DATE F_VSDATAREG
+BEGIN
+  PROMPT 40 14 "Vs data registrazione  "
+  FIELD LF_CFVEN->VSDATAREG
+  GROUP 7
+  HELP "Data di registrazione della lettera"
+END
+
+STRING F_NSNRPROT 7
+BEGIN
+  PROMPT 2 15 "Ns nr. protocollo  "
+  FIELD LF_CFVEN->NSNPROT 
+  GROUP 7
+  HELP "Nostro nr. di protocollo della lettera"
+END
+
+DATE F_NSDATAREG
+BEGIN
+  PROMPT 40 15 "Ns data registrazione  "
+  FIELD LF_CFVEN->NSDATAREG
+  GROUP 7
+  HELP "Data di registrazione della lettera"
+END
+
+BOOLEAN F_ADDBNS1500
+BEGIN
+  PROMPT 2 17 "Addebito bollo Lit. 50.000  "
+  FIELD LF_CFVEN->ADDBNS1500
+  GROUP 7
+  HELP "Indicare se addebitare bolli per imponibibili non soggetti superiori a Lit. 50.000"
+END
+
+STRING F_CATFIN 2
+BEGIN
+  PROMPT 46 17 "Categoria finanziaria      "
+  FIELD LF_CFVEN->CATFIN
+  USE %CFI
+  INPUT CODTAB F_CATFIN
+  DISPLAY "Codice categoria" CODTAB
+  DISPLAY "Descrizione@30" S0
+  OUTPUT F_CATFIN CODTAB
+  HELP "Codice della categoria finanziaria"
+END
+
+ENDPAGE
+
+PAGE "Pag. 7" -1 -1 78 19
+
+GROUPBOX DLG_NULL 76 4
+BEGIN
+  PROMPT 1 0 "Dati identificativi"
+END
+
+LIST DLG_NULL 1 12
+BEGIN
+  PROMPT 2 1 "Tipo   "
+  FLAGS "D"
+  GROUP 1
+  ITEM "C|Clienti"
+  ITEM "F|Fornitori"
+END
+
+NUMBER DLG_NULL 6
+BEGIN
+  PROMPT 2 2 "Codice "
+  FLAGS "RD"
+  GROUP 2
+END
+
+STRING DLG_NULL 30
+BEGIN
+  PROMPT 23 1 "Ragione sociale      "
+  FLAGS "D"
+  GROUP 3
+END
+
+STRING DLG_NULL 20
+BEGIN
+  PROMPT 23 2 "Nome o seconda parte rag. soc. "
+  FLAGS "D"
+  GROUP 6
+END
+
+NUMBER F_CODABIPR 5
+BEGIN
+  PROMPT 2 4 "Codice ABI effetti       "
+  FIELD LF_CFVEN->CODABIPR
+  FLAGS "Z"
+  COPY USE F_CODABI
+  INPUT CODTAB F_CODABIPR
+  COPY DISPLAY F_CODABI
+  OUTPUT F_CODABIPR CODTAB[1,5]
+  OUTPUT F_CODBANPR CODTAB[6,10]
+  HELP "Codice ABI della banca presentazione effetti"
+  CHECKTYPE NORMAL
+END
+
+NUMBER F_CODBANPR 5
+BEGIN
+  PROMPT 45 4 "Codice CAB effetti     "
+  FIELD LF_CFVEN->CODCABPR
+  FLAGS "Z"
+  USE %BAN
+  INPUT CODTAB[1,5] F_CODABIPR
+  INPUT CODTAB[6,10] F_CODBANPR
+  COPY DISPLAY F_CODABI
+  OUTPUT F_CODABIPR CODTAB[1,5]
+  OUTPUT F_CODBANPR CODTAB[6,10]
+  HELP "Codice CAB della banca presentazione effetti"
+  CHECKTYPE NORMAL
+END
+
+NUMBER F_CODINDEFF 3
+BEGIN
+  PROMPT 2 6 "Codice indirizzo effetti "
+  FIELD LF_CFVEN->CODINDEFF
+  GROUP 7
+  SHEET "Codice|Ragione sociale@50|Indirizzo@35|Nr.@10|Localita@35"
+  INPUT F_CODINDEFF
+  OUTPUT F_CODINDEFF
+  HELP "Codice indirizzo effetti"
+  CHECKTYPE NORMAL
+END
+
+BOOLEAN F_EMEFFRICH
+BEGIN
+  PROMPT 45 6 "Emissione effetti"
+  FIELD LF_CFVEN->EMEFFRICH
+  GROUP 7
+  HELP "Indicare se emettere effetti a richiesta"
+END
+
+NUMBER F_IMPMINEFF 6
+BEGIN
+  PROMPT 2 7 "Importo minimo effetti   "
+  FIELD LF_CFVEN->IMPMINEFF
+  GROUP 7
+  HELP "Importo minimo effetti"
+END
+
+GROUPBOX DLG_NULL 76 4
+BEGIN
+  PROMPT 1 9 "Periodo Effetti"
+END
+
+STRING F_NONACCEFF 20
+BEGIN
+  PROMPT 2 10 "Periodo di non accettazione degli effetti         "
+  FIELD LF_CFVEN->NONACCEFF
+  GROUP 7
+  HELP "IIl periodo di non accettazione effetti"
+END
+
+STRING F_NONSCADEFF 20
+BEGIN
+  PROMPT 2 11 "Scadenza effetti periodi non accettati            "
+  FIELD LF_CFVEN->NONSCADEFF
+  GROUP 7
+  HELP "Scadenza effetti dei periodi non accettati"
+END
+
+GROUPBOX DLG_NULL 76 3
+BEGIN
+  PROMPT 1 13 "Addebiti"
+END
+
+BOOLEAN F_ADDBOLLIRB
+BEGIN
+  PROMPT 2 14 "Bolli Ricevute bancarie "
+  FIELD LF_CFVEN->ADDBOLLIRB
+  GROUP 7
+  HELP "Indicare se addebitare bolli ricevute bancarie"
+END
+
+BOOLEAN F_ADDBOLLITR
+BEGIN
+  PROMPT 34 14 "Bolli Tratte "
+  FIELD LF_CFVEN->ADDBOLLITR
+  GROUP 7
+  HELP "Indicare se addebitare bolli tratte"
+END
+
+BOOLEAN F_ADDSPINC
+BEGIN
+  PROMPT 58 14 "Spese incasso "
+  FIELD LF_CFVEN->ADDSPINC
+  GROUP 7
+  HELP "Indicare se addebitare spese d'incasso"
+END
+
+BOOLEAN F_IVARID
+BEGIN
+  PROMPT 2 16 "Aliquota ridotta "
+  FIELD LF_CFVEN->IVARID
+  GROUP 7
+  HELP "Indicare se applicare l'aliquota ridotta"
+END
+
+BOOLEAN F_GESTCONTR
+BEGIN
+  PROMPT 26 16 "Gestione contratto"
+  FIELD LF_CFVEN->GESTCONTR
+  HELP "Indicare se si gestisce un contratto"
+END
+
+STRING F_CATVEN 2
+BEGIN
+  PROMPT 54 16 "Categoria vendita  "
+  FIELD LF_CFVEN->CATVEN
+  GROUP 7
+  USE %CVE
+  INPUT CODTAB F_CATVEN
+  DISPLAY "Codice vendita" CODTAB
+  DISPLAY "Descrizione@30" S0
+  OUTPUT F_CATVEN CODTAB
+  HELP "Codice della categoria di vendita"
+  CHECKTYPE NORMAL
+END
+
+ENDPAGE
+
+PAGE "Pag. 8" -1 -1 78 19
+
+GROUPBOX DLG_NULL 76 4
+BEGIN
+  PROMPT 1 0 "Dati identificativi"
+END
+
+LIST DLG_NULL 1 12
+BEGIN
+  PROMPT 2 1 "Tipo   "
+  FLAGS "D"
+  GROUP 1
+  ITEM "C|Clienti"
+  ITEM "F|Fornitori"
+END
+
+NUMBER DLG_NULL 6
+BEGIN
+  PROMPT 2 2 "Codice "
+  FLAGS "RD"
+  GROUP 2
+END
+
+STRING DLG_NULL 30
+BEGIN
+  PROMPT 23 1 "Ragione sociale      "
+  FLAGS "D"
+  GROUP 3
+END
+
+STRING DLG_NULL 20
+BEGIN
+  PROMPT 23 2 "Nome o seconda parte rag. soc. "
+  FLAGS "D"
+  GROUP 6
+END
+
+GROUPBOX DLG_NULL 45 4
+BEGIN
+  PROMPT 1 4 "Spese da addebitare"
+END
+
+STRING F_CODSP1 3
+BEGIN
+  PROMPT 2 5 "Spesa 1       "
+  FIELD LF_CFVEN->CODSP1  
+  GROUP 7
+  USE %SAD
+  INPUT CODTAB F_CODSP1
+  DISPLAY "Codice Spesa " CODTAB
+  DISPLAY "Descrizione@20" S0
+  OUTPUT F_CODSP1 CODTAB
+  HELP "Codici delle spese da addebitare"
+  CHECKTYPE NORMAL
+END
+
+STRING F_CODSP2 3
+BEGIN
+  PROMPT 24 5 "Spesa 2      "
+  FIELD LF_CFVEN->CODSP2  
+  GROUP 7
+  COPY USE F_CODSP1
+  INPUT CODTAB F_CODSP2
+  COPY DISPLAY F_CODSP1
+  OUTPUT F_CODSP2 CODTAB
+  HELP "Codici delle spese da addebitare"
+  CHECKTYPE NORMAL
+END
+
+STRING F_CODSP3 3
+BEGIN
+  PROMPT 2 6 "Spesa 3       "
+  FIELD LF_CFVEN->CODSP3  
+  GROUP 7
+  COPY USE F_CODSP1
+  INPUT CODTAB F_CODSP3
+  COPY DISPLAY F_CODSP1
+  OUTPUT F_CODSP3 CODTAB
+  HELP "Codici delle spese da addebitare"
+  CHECKTYPE NORMAL
+END
+
+STRING F_CODSP4 3
+BEGIN
+  PROMPT 24 6 "Spesa 4      "
+  FIELD LF_CFVEN->CODSP4  
+  GROUP 7
+  COPY USE F_CODSP1
+  INPUT CODTAB F_CODSP4
+  COPY DISPLAY F_CODSP1
+  OUTPUT F_CODSP4 CODTAB
+  HELP "Codici delle spese da addebitare"
+  CHECKTYPE NORMAL
+END
+
+STRING F_CODMAG 3
+BEGIN
+  PROMPT 48 5 "Codice magazzino        "
+  FIELD LF_CFVEN->CODMAG  
+  HELP "Codice del magazzino movimentato"
+END
+
+STRING F_CODLIST 5
+BEGIN
+  PROMPT 48 6 "Codice listino        "
+  FIELD LF_CFVEN->CODLIST
+  USE %LIS
+  INPUT CODTAB F_CODLIST
+  DISPLAY "Codice listino " CODTAB
+  DISPLAY "Descrizione@50" S0
+  OUTPUT F_CODLIST CODTAB
+  HELP "Codice listino utilizzato"
+  CHECKTYPE NORMAL
+END
+
+STRING F_CODSCINC 2
+BEGIN
+  PROMPT 2 8 "Sconto incondizionato   "
+  FIELD LF_CFVEN->CODSCINC
+  USE %SCO
+  INPUT CODTAB F_CODSCINC
+  DISPLAY "Codice sconto" CODTAB
+  DISPLAY "Descrizione@50" S0
+  DISPLAY "Percentuale" R0
+  OUTPUT F_CODSCINC CODTAB
+  HELP "Codice dello sconto incondizionato"
+  CHECKTYPE NORMAL
+END
+
+NUMBER F_SCONTOCL 5 2
+BEGIN
+  PROMPT 48 8 "Sconto cliente        "
+  FIELD LF_CFVEN->SCONTOCL
+  FLAGS "R"
+  PICTURE ".2"
+  HELP "Percentuale sconto applicato"
+END
+
+STRING F_SCONTOR 15
+BEGIN
+  PROMPT 2 9 "Sconto di riga          "
+  FIELD LF_CFVEN->SCONTOR
+  GROUP 7
+  HELP "Percentuale sconto di riga applicato nelle forme: semplice, es. 10 (per 10%) composto, es. 10+5 (per 10%+5%) oppure  10+5+2 (per 10%+5%+2%)"
+END
+
+STRING F_PROFSOLL 5
+BEGIN
+  PROMPT 2 11 "Profilo sollecito       "
+  FIELD LF_CFVEN->PROFSOLL
+  GROUP 7
+  HELP "Codice del profilo sollecito"
+END
+
+NUMBER F_MAXSOLL 2
+BEGIN
+  PROMPT 47 11 "Numero solleciti          "
+  FIELD LF_CFVEN->MAXSOLL
+  GROUP 7
+  HELP "Massimo numero di solleciti"
+END
+
+DATE F_DATAESC
+BEGIN
+  PROMPT 2 12 "Ultimo estratto conto   "
+  FIELD LF_CFVEN->DATAESC
+  GROUP 7
+  HELP "Data dell'ultimo estratto conto"
+END
+
+DATE F_DATASOLL
+BEGIN
+  PROMPT 47 12 "Ultimo sollecito  "
+  FIELD LF_CFVEN->DATASOLL
+  GROUP 7
+  HELP "Data dell'ultimo sollecito"
+END
+
+STRING F_TITOLO 2
+BEGIN
+  PROMPT 2 13 "Titolo onorifico        "
+  FIELD LF_CFVEN->TITOLO 
+  GROUP 7
+  USE %TIT
+  INPUT CODTAB F_TITOLO
+  DISPLAY "Codice titolo " CODTAB
+  DISPLAY "Descrizione@30" S0
+  OUTPUT F_TITOLO CODTAB
+  HELP "Codice del titolo onorifico"
+END
+
+LIST F_RAGGOR 1 14
+BEGIN
+  PROMPT 2 15 "Raggruppamento ordine   "
+  FIELD LF_CFVEN->RAGGOR 
+  GROUP 7
+  HELP "Indicare il tipo di raggruppamento dell'ordine"
+  ITEM "O|Intero ordine"
+  ITEM "R|Intera riga"
+  ITEM "P|Anche parziale"
+END
+
+NUMBER F_PREVORD 2
+BEGIN
+  PROMPT 2 16 "Priorita' ordine        "
+  FIELD LF_CFVEN->PREVORD
+  GROUP 7
+  HELP "Priorita' di evasione dell'ordine"
+END
+
+STRING F_TIPOEVORD 2
+BEGIN
+  PROMPT 2 17 "Tipo evasione ordine    "
+  FIELD LF_CFVEN->TIPOEVORD
+  GROUP 7
+  HELP "Tipo di evasione dell'ordine"
+END
+
+NUMBER F_MINORD 15
+BEGIN
+  PROMPT 40 16 "Importo minimo      "
+  FIELD LF_CFVEN->MINORD   
+  GROUP 7
+  PICTURE "."
+  HELP "Importo minimo dell'ordine"
+END
+
+NUMBER F_MAXORD 15
+BEGIN
+  PROMPT 40 17 "Importo massimo     "
+  FIELD LF_CFVEN->MAXORD   
+  GROUP 7
+  PICTURE "."
+  HELP "Importo massimo dell'ordine"
+END
+
+ENDPAGE
+
+ENDMASK
+
+#include "cg0200b.uml"