From 40596d8ff589dd576daf7945ae9f98d7ab8552f5 Mon Sep 17 00:00:00 2001
From: pirro <pirro@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Mon, 21 Oct 1996 17:53:35 +0000
Subject: [PATCH] Corretta maschera di stampa

git-svn-id: svn://10.65.10.50/trunk@3814 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 ve/ve1100a.uml | 34 +++++++++++++++++++---------------
 1 file changed, 19 insertions(+), 15 deletions(-)

diff --git a/ve/ve1100a.uml b/ve/ve1100a.uml
index 41d62a799..4e5f9431a 100755
--- a/ve/ve1100a.uml
+++ b/ve/ve1100a.uml
@@ -54,13 +54,13 @@ END
 NUMBER F_DA_NDOC 7 0
 BEGIN
         PROMPT 2 10  "Dal num. "
-        USE 33 KEY 1 SELECT (CODNUM==#F_CODNUM) && (ANNO==#F_ANNO) && (PROVV==#F_PROVV)
+        USE 33 KEY 1
         JOIN 20 INTO CODCF=CODCF TIPOCF=TIPOCF
         JOIN 13 TO 20 INTO COM=COMCF
-        INPUT CODNUM F_CODNUM
-        INPUT ANNO F_ANNO
+        INPUT PROVV F_PROVV SELECT
+        INPUT ANNO F_ANNO SELECT
+        INPUT CODNUM F_CODNUM SELECT
         INPUT NDOC F_DA_NDOC
-        INPUT PROVV F_PROVV
         DISPLAY "Data@10" DATADOC
         DISPLAY "Numero@7" NDOC
         DISPLAY "Cliente/Fornitore@40" 20->RAGSOC
@@ -73,13 +73,13 @@ END
 NUMBER F_A_NDOC 7 0
 BEGIN
         PROMPT 2 12 "Al num.  "
-        USE 33 KEY 1 SELECT (CODNUM==#F_CODNUM) && (ANNO==#F_ANNO)  && (PROVV==#F_PROVV)
+        USE 33 KEY 1
         JOIN 20 INTO CODCF=CODCF TIPOCF=TIPOCF
         JOIN 13 TO 20 INTO COM=COMCF
-        INPUT CODNUM F_CODNUM
-        INPUT ANNO F_ANNO
+        INPUT PROVV F_PROVV SELECT
+        INPUT ANNO F_ANNO SELECT
+        INPUT CODNUM F_CODNUM SELECT
         INPUT NDOC F_A_NDOC
-        INPUT PROVV F_PROVV
         COPY DISPLAY F_DA_NDOC
         OUTPUT F_A_NDOC NDOC
         WARNING "Il numero documento deve essere superiore al limite inferiore"
@@ -90,14 +90,18 @@ END
 DATE F_DA_DATADOC
 BEGIN
         PROMPT 2 15 "Dalla data "
-        USE 33 KEY 3 SELECT (CODNUM==#F_CODNUM) && (ANNO==#F_ANNO)  && (PROVV==#F_PROVV)
+        USE 33 KEY 3 SELECT (PROVV==#F_PROVV) && (ANNO==#F_ANNO) && (CODNUM==#F_CODNUM)
         JOIN 20 INTO CODCF=CODCF TIPOCF=TIPOCF
         JOIN 13 TO 20 INTO COM=COMCF
-        INPUT CODNUM F_CODNUM
-        INPUT ANNO F_ANNO
         INPUT DATADOC F_DA_DATADOC
         INPUT PROVV F_PROVV
-        COPY DISPLAY F_DA_NDOC
+        INPUT ANNO F_ANNO
+        INPUT CODNUM F_CODNUM
+        DISPLAY "Data@10" DATADOC
+        DISPLAY "Numero@7" NDOC
+        DISPLAY "Cliente/Fornitore@40" 20->RAGSOC
+        DISPLAY "Comune@20" 13->DENCOM
+//      COPY DISPLAY F_DA_NDOC
         OUTPUT F_DA_NDOC NDOC
         OUTPUT F_DA_DATADOC DATADOC
         GROUP 2
@@ -107,11 +111,11 @@ DATE F_A_DATADOC
 BEGIN
         PROMPT 2 17 "Alla data  "
         COPY USE F_DA_DATADOC
-        INPUT CODNUM F_CODNUM
-        INPUT ANNO F_ANNO
         INPUT DATADOC F_A_DATADOC
         INPUT PROVV F_PROVV
-        COPY DISPLAY F_DA_NDOC
+        INPUT ANNO F_ANNO
+        INPUT CODNUM F_CODNUM
+        COPY DISPLAY F_DA_DATADOC
         OUTPUT F_A_NDOC NDOC
         OUTPUT F_A_DATADOC DATADOC
         GROUP 2