Patch level : 2.2 200

Files correlati     : ci1200.msk
Ricompilazione Demo : [ ]
Commento            :

Bug   	 0000512

Aggiugere ricerca per ragione sociale cliente / fornitore


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

ci/ci1200.h

@@ -10,6 +10,9 @@
 #define F_DA_CODART 108
 #define F_A_CODART  109
 
+#define F_DA_RAGSOC 110
+#define F_A_RAGSOC  111
+
 #define F_TIPI      201
 #define F_COMMESSE  202
 

ci/ci1200.uml

@@ -65,6 +65,7 @@ BEGIN
   DISPLAY "Codice" CODCF
   DISPLAY "Ragione Sociale@50" RAGSOC
   OUTPUT F_DA_CLIFO CODCF
+  OUTPUT F_DA_RAGSOC RAGSOC
   CHECKTYPE NORMAL
 END
 
@@ -76,6 +77,7 @@ BEGIN
   INPUT CODCF F_DA_CLIFO
   COPY DISPLAY F_DA_CLIFO
   OUTPUT F_A_CLIFO CODCF
+  OUTPUT F_A_RAGSOC RAGSOC
   CHECKTYPE NORMAL
 END
 
@@ -105,14 +107,42 @@ BEGIN
   CHECKTYPE SEARCH
 END
 
+GROUPBOX DLG_NULL 60 4
+BEGIN
+  PROMPT 1 4 "Ragione Sociale" 
+END
+
+STRING F_DA_RAGSOC 50
+BEGIN
+  PROMPT 2 5 "Da "
+  USE LF_CLIFO KEY 2
+  INPUT TIPOCF F_TIPOCF SELECT
+  INPUT RAGSOC F_DA_RAGSOC
+  DISPLAY "Ragione Sociale@50" RAGSOC
+  DISPLAY "Codice" CODCF
+  COPY OUTPUT F_DA_CLIFO
+  CHECKTYPE NORMAL
+END
+
+STRING F_A_RAGSOC 50 
+BEGIN
+  PROMPT 2 6 "A  "
+  USE LF_CLIFO KEY 2
+  INPUT TIPOCF F_TIPOCF SELECT
+  INPUT RAGSOC F_A_RAGSOC
+  COPY DISPLAY F_DA_RAGSOC
+  COPY OUTPUT F_A_CLIFO
+  CHECKTYPE NORMAL
+END
+
 TEXT DLG_NULL
 BEGIN
-  PROMPT 1 5 "@bTipi documento"
+  PROMPT 1 7 "@bTipi documento"
 END
 
 SPREADSHEET F_TIPI 0 5
 BEGIN
-  PROMPT 0 6 ""
+  PROMPT 0 8 ""
   ITEM "Numerazione"
   ITEM "Descrizione@50"
   ITEM "Tipo"
@@ -123,12 +153,12 @@ END
 
 TEXT DLG_NULL
 BEGIN
-  PROMPT 1 11 "@bCommesse"
+  PROMPT 1 13 "@bCommesse"
 END
 
 SPREADSHEET F_COMMESSE
 BEGIN
-  PROMPT 0 12 ""
+  PROMPT 0 14 ""
   ITEM "Cdc1@20"
   ITEM "Cdc2@20"
   ITEM "Cdc3@20"