From 831d6e7c554f3cb12c7abdefa08037c05a960514 Mon Sep 17 00:00:00 2001
From: rajitgill <rajitgill@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Tue, 12 Aug 2008 14:33:21 +0000
Subject: [PATCH] Patch level         : Files correlati     : Ricompilazione
 Demo : [ ] Commento            :

git-svn-id: svn://10.65.10.50/trunk@17049 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 lv/lv0400.h    |  4 ++++
 lv/lv0400a.uml | 56 ++++++++++++++++++++++++++++++++++++++++++++++++++
 lv/lv0500a.uml |  2 +-
 3 files changed, 61 insertions(+), 1 deletion(-)
 create mode 100755 lv/lv0400.h
 create mode 100755 lv/lv0400a.uml

diff --git a/lv/lv0400.h b/lv/lv0400.h
new file mode 100755
index 000000000..789544998
--- /dev/null
+++ b/lv/lv0400.h
@@ -0,0 +1,4 @@
+#define F_CODCF       101
+#define F_RAGSOC_CLI  102
+#define F_CODCONT     103  
+#define F_DES_CODCONT 104
\ No newline at end of file
diff --git a/lv/lv0400a.uml b/lv/lv0400a.uml
new file mode 100755
index 000000000..5b31bc066
--- /dev/null
+++ b/lv/lv0400a.uml
@@ -0,0 +1,56 @@
+#include "lv0400.h"
+
+TOOLBAR "" 0 0 0 2
+#include "Relapbar.h"
+ENDPAGE
+
+PAGE "Contratti" 0 2 0 0
+
+GROUPBOX DLG_NULL 78 6
+BEGIN
+	PROMPT 0 4 "@bContratti"
+END
+
+NUMBER F_CODCF 6
+BEGIN
+  PROMPT 2 5 "Cliente   " 
+  FIELD CODCF
+  FLAGS "U"
+  KEY 1
+  USE LF_CLIFO 
+  INPUT TIPOCF "C"
+  INPUT CODCF F_CODCF
+  DISPLAY "Codice" CODCF
+  DISPLAY "Ragione Sociale@50" RAGSOC
+  OUTPUT F_CODCF CODCF
+  OUTPUT F_RAGSOC_CLI RAGSOC
+  CHECKTYPE REQUIRED  
+END
+
+STRING F_RAGSOC_CLI 50
+BEGIN
+  PROMPT 20 5 ""
+  USE LF_CLIFO KEY 2
+  INPUT TIPOCF "C"
+  INPUT RAGSOC F_RAGSOC
+  DISPLAY "Ragione Sociale@50" RAGSOC
+  DISPLAY "Codice" CODCF
+  COPY OUTPUT F_CODCF
+  CHECKTYPE REQUIRED  
+END
+
+NUMBER F_CODCONT 6
+BEGIN
+  PROMPT 2 6 "Contratto N."
+  USE LF_LVCONDV
+  FLAGS "U"
+  FIELD CODCONT
+  KEY 1
+  
+  CHECKTYPE REQUIRED
+END
+
+STRING F_DES_CODCONT 50
+BEGIN
+  PROMPT 20 6 ""
+END
diff --git a/lv/lv0500a.uml b/lv/lv0500a.uml
index 478242c94..484895608 100755
--- a/lv/lv0500a.uml
+++ b/lv/lv0500a.uml
@@ -54,7 +54,7 @@ BEGIN
   FLAGS "D"
 END
 
-STRING F_CODCONT 3
+NUMBER F_CODCONT 6
 BEGIN
   PROMPT 2 6 "Contratto N."
   FLAGS "BU"