From cb41821614902595bb5e7430ee573bef19c18781 Mon Sep 17 00:00:00 2001
From: alex <alex@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Tue, 22 Jun 2010 13:54:08 +0000
Subject: [PATCH] Patch level         : 10.0 patch 767 Files correlati     :
 Ricompilazione Demo : [ ] Commento            :

Dalla versione 3.2


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

diff --git a/ve/ve1100a.uml b/ve/ve1100a.uml
index 64e09826a..e3b8849f6 100755
--- a/ve/ve1100a.uml
+++ b/ve/ve1100a.uml
@@ -107,8 +107,8 @@ END
 RADIOBUTTON F_DATA_O_NUM 68
 BEGIN
  PROMPT 1 4 "Selezione per "
- ITEM "N|Numero documento" MESSAGE SHOW,1@|HIDE,2@
- ITEM "D|Data documento"   MESSAGE SHOW,2@|HIDE,1@
+ ITEM "N|Numero documento" MESSAGE SHOW,1@|HIDE,2@|HIDE,3@
+ ITEM "D|Data documento"   MESSAGE SHOW,2@|HIDE,1@|HIDE,3@
  ITEM "C|Cliente/Forntore"   MESSAGE SHOW,3@|HIDE,1@|HIDE,2@
  FLAG "P"
 END
@@ -133,7 +133,7 @@ END
 
 NUMBER F_DA_NDOC 7 0
 BEGIN
-  PROMPT 2 9  "Dal numero "
+  PROMPT 2 10  "Dal numero "
   USE 33
   JOIN 20 INTO CODCF=CODCF TIPOCF=TIPOCF
   JOIN 13 TO 20 INTO COM=COMCF
@@ -153,7 +153,7 @@ END
 
 NUMBER F_A_NDOC 7 0
 BEGIN
-  PROMPT 2 11 "Al numero  "
+  PROMPT 2 12 "Al numero  "
   USE 33
   JOIN 20 INTO CODCF=CODCF TIPOCF=TIPOCF
   JOIN 13 TO 20 INTO COM=COMCF
@@ -174,7 +174,7 @@ END
 
 DATE F_DA_DATADOC
 BEGIN
-  PROMPT 2 9 "Dalla data "
+  PROMPT 2 10 "Dalla data "
   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
@@ -247,6 +247,42 @@ BEGIN
 	GROUP 3
 END
 
+LIST F_TIPOCFD 1 12
+BEGIN
+  PROMPT 2 10 "Tipo " 
+  ITEM "C|Cliente"
+  ITEM "F|Fornitore"
+	GROUP 3
+END
+
+NUMBER F_DA_CLIFO 7 0
+BEGIN
+  PROMPT 2 12  "Dal Cli/For"
+  USE 20
+  JOIN 13 TO 20 INTO COM==COMCF
+  INPUT TIPOCF F_TIPOCFD SELECT
+  INPUT CODCF F_DA_CLIFO
+  DISPLAY "Codice@7" CODCF
+  DISPLAY "Ragione Sociale@50" RAGSOC
+  DISPLAY "Comune@20" 13->DENCOM
+  OUTPUT F_DA_CLIFO CODCF
+  GROUP 3
+END
+
+NUMBER F_A_CLIFO 7 0
+BEGIN
+  PROMPT 2 14 "Al Cli/For "
+  USE 20
+  JOIN 13 TO 20 INTO COM==COMCF
+  INPUT TIPOCF F_TIPOCFD SELECT
+  INPUT CODCF F_A_CLIFO
+  DISPLAY "Codice@7" CODCF
+  DISPLAY "Ragione Sociale@50" RAGSOC
+  DISPLAY "Comune@20" 13->DENCOM
+  OUTPUT F_A_CLIFO CODCF
+	GROUP 3
+END
+
 RADIOBUTTON F_TIPOST 68
 BEGIN
   PROMPT 1 13 "Stampa"