MOdificati campi per le vendite

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

cg/cg0200.h

@@ -96,9 +96,8 @@
 #define F_IMPMINEFF                   188
 #define F_NONACCEFF                   189
 #define F_NONSCADEFF                  190
-#define F_ADDBOLLIRB                  191
+#define F_ADDBOLLI                    191
-#define F_ADDBOLLITR                  192
+#define F_PERCSPINC                   193
-#define F_ADDSPINC                    193
 #define F_IVARID                      194
 #define F_GESTCONTR                   195
 #define F_CATVEN                      196
@@ -131,6 +130,7 @@
 #define F_CODFASS                     222
 #define F_TEMP                        223
 #define F_DESTACF                     224
+#define F_CODDEP                      230
 
 #define DLG_RIC                       300
 #define DLG_CST                       301

cg/cg0200a.uml

@@ -1180,30 +1180,6 @@ BEGIN
   OUTPUT F_CODVETT3 CODTAB
 END
 
-NUMBER F_CODSPED1 5
-BEGIN
-  PROMPT 23 6 "Spedizioniere 1 "
-  FIELD LF_CFVEN->CODSPED1
-  FLAGS "Z"
-  GROUP 7
-  COPY USE F_CODVETT1
-  INPUT CODTAB F_CODSPED1
-  COPY DISPLAY F_CODVETT1
-  OUTPUT F_CODSPED1 CODTAB
-END
-
-NUMBER F_CODSPED2 5
-BEGIN
-  PROMPT 51 6 "Spedizioniere 2 "
-  FIELD LF_CFVEN->CODSPED2
-  FLAGS "Z"
-  GROUP 7
-  COPY USE F_CODVETT1
-  INPUT CODTAB F_CODSPED2
-  COPY DISPLAY F_CODVETT1
-  OUTPUT F_CODSPED2 CODTAB
-END
-
 STRING F_CODPORTO 3
 BEGIN
   PROMPT 23 7 "Porto     "
@@ -1225,20 +1201,12 @@ BEGIN
   HELP "Indicare se vanno raggruppati i documenti (bolle/fatture)"
 END
 
-NUMBER F_NCOPIE 2
+TEXT F_CODFASS
-BEGIN
-  PROMPT 58 8 "Numero copie  "
-  FIELD LF_CFVEN->NCOPIE
-  GROUP 7
-  HELP "Numero di copie dei documenti"
-END
-
-  TEXT F_CODFASS
 BEGIN
   PROMPT 23 9 "Codice fornitore associato    "
 END
 
-  TEXT F_CODCASS
+TEXT F_CODCASS
 BEGIN
   PROMPT 23 9 "Codice cliente associato      "
 END
@@ -1312,7 +1280,7 @@ BEGIN
   HELP "Nostro nr. di protocollo della lettera"
 END
 
-  DATE F_NSDATAREG
+DATE F_NSDATAREG
 BEGIN
   PROMPT 40 15 "Ns data registrazione  "
   FIELD LF_CFVEN->NSDATAREG
@@ -1320,14 +1288,6 @@ BEGIN
   HELP "Data di registrazione della lettera"
 END
 
-  BOOLEAN F_ADDBNS1500
-BEGIN
-  PROMPT 2 17 "Addebito bollo Lit. 50.000  "
-  FIELD LF_CFVEN->ADDBNS1500
-  GROUP 7
-  HELP "Indicare se addebitare bolli per imponibibili non soggetti superiori a Lit. 50.000"
-END
-
 STRING F_CATFIN 2
 BEGIN
   PROMPT 46 17 "Categoria finanziaria      "
@@ -1342,14 +1302,14 @@ END
 
 ENDPAGE
 
-  PAGE "Pag.7" -1 -1 78 19
+PAGE "Pag.7" -1 -1 78 19
 
-  GROUPBOX DLG_NULL 76 4
+GROUPBOX DLG_NULL 76 4
 BEGIN
   PROMPT 1 0 "Dati identificativi"
 END
 
-  LIST DLG_NULL 1 11
+LIST DLG_NULL 1 11
 BEGIN
   PROMPT 2 1 "Tipo   "
   FLAGS "D"
@@ -1419,7 +1379,7 @@ BEGIN
   HELP "Codice indirizzo effetti"
 END
 
-  BOOLEAN F_EMEFFRICH
+BOOLEAN F_EMEFFRICH
 BEGIN
   PROMPT 45 6 "Emissione effetti"
   FIELD LF_CFVEN->EMEFFRICH
@@ -1435,7 +1395,7 @@ BEGIN
   HELP "Importo minimo effetti"
 END
 
-  GROUPBOX DLG_NULL 76 4
+GROUPBOX DLG_NULL 76 4
 BEGIN
   PROMPT 1 9 "Periodo Effetti"
 END
@@ -1461,31 +1421,23 @@ BEGIN
   PROMPT 1 13 "Addebiti"
 END
 
-  BOOLEAN F_ADDBOLLIRB
+BOOLEAN F_ADDBOLLI
 BEGIN
   PROMPT 2 14 "Bolli Ricevute bancarie "
-  FIELD LF_CFVEN->ADDBOLLIRB
+  FIELD LF_CFVEN->ADDBOLLI
   GROUP 7
   HELP "Indicare se addebitare bolli ricevute bancarie"
 END
 
-  BOOLEAN F_ADDBOLLITR
+NUMBER F_PERCSPINC 6 2
 BEGIN
-  PROMPT 34 14 "Bolli Tratte "
+  PROMPT 40 14 "% Spese incasso "
-  FIELD LF_CFVEN->ADDBOLLITR
+  FIELD LF_CFVEN->PERCSPINC
   GROUP 7
-  HELP "Indicare se addebitare bolli tratte"
+  HELP "Indicare la percentuale di addebito delle spese d'incasso"
 END
 
-  BOOLEAN F_ADDSPINC
+BOOLEAN F_IVARID
-BEGIN
-  PROMPT 58 14 "Spese incasso "
-  FIELD LF_CFVEN->ADDSPINC
-  GROUP 7
-  HELP "Indicare se addebitare spese d'incasso"
-END
-
-  BOOLEAN F_IVARID
 BEGIN
   PROMPT 2 16 "Aliquota ridotta "
   FIELD LF_CFVEN->IVARID
@@ -1517,14 +1469,14 @@ END
 
 ENDPAGE
 
-  PAGE "Pag.8" -1 -1 78 19
+PAGE "Pag.8" -1 -1 78 19
 
-  GROUPBOX DLG_NULL 76 4
+GROUPBOX DLG_NULL 76 4
 BEGIN
   PROMPT 1 0 "Dati identificativi"
 END
 
-  LIST DLG_NULL 1 11
+LIST DLG_NULL 1 11
 BEGIN
   PROMPT 2 1 "Tipo   "
   FLAGS "D"
@@ -1618,15 +1570,32 @@ BEGIN
   FIELD LF_CFVEN->CODMAG
   USE MAG SELECT CODTAB ? "???"
   INPUT  CODTAB[1,3] F_CODMAG
-  DISPLAY "Codice" CODTAB[1,3]
+  DISPLAY "Magazzino" CODTAB[1,3]
   DISPLAY "Descrizione@50" S0
   OUTPUT F_CODMAG CODTAB[1,3]
-  HELP "Codice del magazzino movimentato"
+  WARNING "Magazzino errato"  
+  FLAGS "U"
+END
+
+STRING F_CODDEP 2
+BEGIN
+  PROMPT 48 6 "Codice deposito         "
+  FIELD LF_CFVEN->CODDEP
+  USE MAG SELECT CODTAB ? "?????"
+  INPUT  CODTAB[1,3] F_CODMAG SELECT
+  INPUT  CODTAB[4,] F_CODDEP
+  DISPLAY "Magazzino" CODTAB[1,3]
+  DISPLAY "Deposito" CODTAB[4,]
+  DISPLAY "Descrizione@50" S0
+  OUTPUT F_CODMAG CODTAB[1,3]
+  OUTPUT F_CODDEP CODTAB[4,]
+  WARNING "Deposito errato"
+  FLAGS "U"
 END
 
 STRING F_CODLIST 3
 BEGIN
-  PROMPT 48 6 "Codice listino          "
+  PROMPT 48 7 "Codice listino          "
   FIELD LF_CFVEN->CODLIST
   USE LF_CONDV
   JOIN CVE TO LF_CONDV INTO CODTAB=CATVEN
@@ -1738,21 +1707,21 @@ BEGIN
   HELP "Tipo di evasione dell'ordine"
 END
 
-NUMBER F_MINORD 15
+NUMBER F_MINORD 18 3
 BEGIN
   PROMPT 40 16 "Importo minimo      "
   FIELD LF_CFVEN->MINORD
   GROUP 7
-  PICTURE "."
+  PICTURE ".3"
   HELP "Importo minimo dell'ordine"
 END
 
-NUMBER F_MAXORD 15
+NUMBER F_MAXORD 18 3
 BEGIN
   PROMPT 40 17 "Importo massimo     "
   FIELD LF_CFVEN->MAXORD
   GROUP 7
-  PICTURE "."
+  PICTURE ".3"
   HELP "Importo massimo dell'ordine"
 END