Cambiata tabella num

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

ve/ve0100a.uml

@@ -0,0 +1,132 @@
+#include "veuml.h"
+
+TOOLBAR "" 0 20 60 2
+#include "toolbar.h"
+ENDPAGE
+
+PAGE "Gestione documenti" 1 1 60 14
+
+   GROUPBOX DLG_NULL 78 5
+   BEGIN
+      PROMPT 1 0 ""
+   END
+
+   STRING F_CODNUM 4
+   BEGIN
+      PROMPT 2 1 "Cod. num.    "
+      FIELD CODNUM
+      HELP "Codice numerazione"
+      USE %NUM
+      INPUT CODTAB F_CODNUM
+      DISPLAY "Codice" CODTAB
+      DISPLAY "Descrizione@50" S0
+      OUTPUT F_CODNUM CODTAB
+      OUTPUT F_DESNUM S0
+      OUTPUT F_TIPIDOCS S2
+      CHECKTYPE FORCED
+      FLAG "UPA"
+      WARNING "Numerazione assente"
+      KEY 1
+   END
+
+   STRING F_DESNUM 50
+   BEGIN
+      PROMPT 25 1 ""
+      HELP "Descrizione numerazione"
+      USE %NUM KEY 2
+      INPUT S0 F_DESNUM
+      DISPLAY "Descrizione@50" S0
+      DISPLAY "Codice" CODTAB
+      COPY OUTPUT F_CODNUM
+      KEY 2
+   END
+
+   STRING F_TIPODOC 4
+   BEGIN
+      PROMPT 2 2 "Tipo doc.    "
+      FIELD TIPODOC
+      HELP "Codice tipo documento"
+      USE %TIP
+      INPUT CODTAB F_TIPODOC
+      DISPLAY "Codice" CODTAB
+      DISPLAY "Descrizione@50" S0
+      OUTPUT F_TIPODOC CODTAB
+      OUTPUT F_DESTIPODOC S0
+      CHECKTYPE FORCED
+      FLAG "UP"
+   END
+
+   STRING F_DESTIPODOC 50
+   BEGIN
+      PROMPT 25 2 ""
+      HELP "Descrizione tipo documento"
+      USE %TIP KEY 2
+      INPUT S0 F_DESTIPODOC
+      DISPLAY "Descrizione@50" S0
+      DISPLAY "Codice" CODTAB
+      COPY OUTPUT F_TIPODOC
+   END
+
+   NUMBER F_NDOC 6
+   BEGIN
+      PROMPT 2 3 "Numero doc.  "
+      FIELD NDOC
+      USE LF_DOC
+      INPUT ANNO F_ANNO SELECT
+      INPUT PROVV F_PROVV SELECT
+      INPUT CODNUM F_CODNUM SELECT
+      INPUT NDOC F_NDOC
+      DISPLAY "Num." CODNUM
+      DISPLAY "Anno" ANNO
+      DISPLAY "Provv" PROVV
+      DISPLAY "Tipo" TIPODOC
+      DISPLAY "N.Doc. " NDOC
+      OUTPUT F_NDOC NDOC
+      OUTPUT F_STATO STATO
+      CHECKTYPE REQUIRED
+      KEY 1
+      FLAG "R"
+   END
+
+   LISTBOX F_PROVV 14
+   BEGIN
+      FIELD PROVV
+      PROMPT 25 3 "Numerazione "
+      ITEM "D|Definitiva "
+      ITEM "P|Provvisoria"
+      KEY 1
+      FLAGS "P"
+   END
+
+   STRING F_STATO 1
+   BEGIN
+      PROMPT 57 3 "Stato  "
+      FIELD STATO
+      FLAG "D"
+   END
+
+   NUMBER F_ANNO 4
+   BEGIN
+      PROMPT 68 3 "Es. "
+      FIELD ANNO
+      CHECKTYPE REQUIRED
+      FLAG "A"
+      KEY 1
+   END
+
+   BOOLEAN F_ATTIVAANNO
+   BEGIN
+      PROMPT 2 6 "Attiva esercizio"
+      MESSAGE TRUE ENABLE,F_ANNO
+      MESSAGE FALSE DISABLE,F_ANNO
+   END
+
+   STRING F_TIPIDOCS 40
+   BEGIN
+      PROMPT 2 10 ""
+      FLAG "H"
+   END
+
+ENDPAGE
+
+ENDMASK