Spostatit files

git-svn-id: svn://10.65.10.50/trunk@3372 c028cbd2-c16b-5b4b-a496-9718f37d4682

ve/ve0100o.h

@@ -0,0 +1,19 @@
+#ifndef __VE0100O_H
+#define __VE0100O_H
+
+// Maschera clienti/fornitori occasionali
+#define O_CODICE    100
+#define O_RAGSOC    101
+#define O_STATO     102
+#define O_COMUNE    103
+#define O_DENCOM    104
+#define O_CAP       105
+#define O_INDIRIZZO 106
+#define O_NUMERO    107
+#define O_SESSO     110
+#define O_DATANAS   111
+#define O_STATONAS  112
+#define O_COMUNENAS 113
+#define O_DENCOMNAS 114
+
+#endif

ve/ve0100o.uml

@@ -0,0 +1,175 @@
+#include "ve0100O.h"
+
+PAGE "Dati cliente/fornitore occasionale" -1 -1 72 14
+
+STRING O_CODICE 16
+BEGIN
+  PROMPT 2 1 "Codice fiscale / Partita IVA / Codice progressivo "
+  USE LF_OCCAS
+  INPUT CFPI O_CODICE
+  DISPLAY "Codice@16" CFPI
+  DISPLAY "Ragione Sociale@50" RAGSOC
+  OUTPUT O_CODICE CFPI
+  OUTPUT O_RAGSOC RAGSOC
+  WARNING "Codice obbligatorio"
+  HELP "Codice fiscale o Partita IVA o altro codice che identifichi univocamente la persona"
+  FIELD CFPI
+  VALIDATE NOT_EMPTY_FUNC
+END
+
+STRING O_RAGSOC 50
+BEGIN
+  PROMPT 2 2 "Ragione sociale "
+  FIELD RAGSOC
+  USE LF_OCCAS KEY 2
+  INPUT RAGSOC O_RAGSOC
+  DISPLAY "Ragione Sociale@50" RAGSOC
+  DISPLAY "Codice@16" CFPI
+  OUTPUT O_CODICE CFPI
+  OUTPUT O_RAGSOC RAGSOC
+  HELP "Ragione sociale o Nome della persona"
+  WARNING "Ragione sociale obbligatoria"
+  VALIDATE NOT_EMPTY_FUNC
+END
+
+GROUPBOX DLG_NULL 70 5
+BEGIN
+  PROMPT 1 3 "Dati residenza"
+END
+
+STRING O_INDIRIZZO 40
+BEGIN
+  PROMPT 2 4 "Indirizzo "
+  HELP "Indirizzo di residenza della persona"
+  FIELD INDIR
+END
+
+STRING O_NUMERO 6
+BEGIN
+  PROMPT 55 4 "Numero "
+  HELP "Numero civico della residenza della persona"
+  FIELD CIV
+END
+
+STRING O_STATO 3
+BEGIN
+  PROMPT 2 5 "Stato "
+  HELP "Stato di residenza della persona"
+  FIELD STATO
+  FLAGS "U"
+  USE %STA
+  INPUT CODTAB O_STATO
+  DISPLAY "Codice" CODTAB
+  DISPLAY "Denominazione" S0
+  OUTPUT O_STATO CODTAB
+  CHECKTYPE NORMAL
+END
+
+STRING O_COMUNE 4
+BEGIN
+  PROMPT 27 5 "Comune "
+  HELP "Codice del comune di residenza della persona"
+  FIELD COM
+  FLAGS "U"
+  USE LF_COMUNI
+  INPUT STATO O_STATO
+  INPUT COM O_COMUNE
+  DISPLAY "Codice" COM
+  DISPLAY "Denominazione@50" DENCOM
+  OUTPUT O_COMUNE COM
+  OUTPUT O_DENCOM DENCOM
+  OUTPUT O_CAP CAPCOM
+  CHECKTYPE NORMAL
+END
+
+NUMBER O_CAP 5
+BEGIN
+  PROMPT 56 5 "C.A.P. "
+  HELP "CAP della residenza della persona"
+  FIELD CAP
+END
+
+STRING O_DENCOM 50
+BEGIN
+  PROMPT 2 6 "Denominazione "
+  HELP "Nome del comune di residenza della persona"
+  USE LF_COMUNI KEY 2
+  INPUT DENCOM O_DENCOM
+  DISPLAY "Denominazione@50" DENCOM
+  DISPLAY "Codice" COM
+  COPY OUTPUT O_COMUNE
+  CHECKTYPE NORMAL
+END
+
+GROUPBOX DLG_NULL 70 4
+BEGIN
+  PROMPT 1 8 "Dati nascita"
+END
+
+LIST O_SESSO 1 12
+BEGIN
+  PROMPT 2 9 "Sesso "
+  ITEM "M|Maschio"
+  ITEM "F|Femmina"
+  FLAGS "H"
+END
+
+DATE O_DATANAS
+BEGIN
+  PROMPT 23 9 "Data "
+  HELP "Data di nascita della persona"
+  FIELD DNASC
+END
+
+STRING O_STATONAS 3
+BEGIN
+  PROMPT 41 9 "Stato "
+  HELP "Codice dello stato di nascita della persona"
+  FIELD STATONASC
+  FLAGS "U"
+  COPY USE O_STATO
+  INPUT CODTAB O_STATONAS
+  COPY DISPLAY O_STATO
+  OUTPUT O_STATONAS CODTAB
+  CHECKTYPE NORMAL
+END
+
+STRING O_COMUNENAS 4
+BEGIN
+  PROMPT 55 9 "Comune "
+  HELP "Codice del comune di nascita della persona"
+  FIELD COMNASC
+  FLAGS "U"
+  COPY USE O_COMUNE
+  INPUT STATO O_STATONAS
+  INPUT COM O_COMUNENAS
+  COPY DISPLAY O_COMUNE
+  OUTPUT O_COMUNENAS COM
+  OUTPUT O_DENCOMNAS DENCOM
+  CHECKTYPE NORMAL
+END
+
+STRING O_DENCOMNAS 50
+BEGIN
+  PROMPT 2 10 "Denominazione "
+  HELP "Nome del comune di nascita della persona"
+  COPY USE O_DENCOM
+  INPUT DENCOM O_DENCOMNAS
+  COPY DISPLAY O_DENCOM
+  COPY OUTPUT O_COMUNENAS
+  CHECKTYPE NORMAL
+END
+
+BUTTON DLG_OK 9 2
+BEGIN
+  PROMPT -12 -1 "Conferma"
+END
+
+BUTTON DLG_CANCEL 9 2
+BEGIN
+  PROMPT -22 -1 "Annulla"
+END
+
+ENDPAGE
+
+ENDMASK