Aggiunto un include per la configurazione con la definizione di

costanti per listini/contratti e campagne. Pubblicato l'elenco
delle variabili di configurazione di VE.


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

ve/sconti.cpp

@@ -105,7 +105,12 @@ else
 
 real TSconto::sconto( )
 { 
-  CHECK(is_valid( ),"tentativo di usare uno sconto non valido!" );
+  CHECK(is_valid( ),"Tentativo di usare uno sconto non valido!" );
   return ( ( _part * cento ) - cento );
 }
 
+void calcola_sconto_riga( TRectype riga )
+{
+
+
+}

ve/ve0200a.uml

@@ -1,6 +1,6 @@
 /* toolbar */
-#include "ve0200b.h"
+#include "VECONF.H"
-
+#define F_GESSCORIGACV
 TOOLBAR "" 0 20 0 2
 
 BUTTON DLG_OK 10 2
@@ -34,7 +34,7 @@ BEGIN
 PROMPT 2 3 "Gestione archivio listini"
 MESSAGE FALSE DISABLE,1@
 MESSAGE TRUE ENABLE,1@
-FIELD GESLIS
+FIELD GES[A_LISTINI]
 END
 
 BOOLEAN DLG_NULL
@@ -47,14 +47,14 @@ END
 BOOLEAN DLG_NULL
 BEGIN
 PROMPT 2 5 "Gestione listini per unita di misura"
-FIELD GESLISUM
+FIELD GESUM[A_LISTINI]
 GROUP 1
 END
 
 BOOLEAN DLG_NULL
 BEGIN
 PROMPT 2 6 "Gestione listino a scaglioni"
-FIELD GESLISSCA
+FIELD GESSCA[A_LISTINI]
 GROUP 1
 END
 
@@ -62,7 +62,7 @@ END
 BOOLEAN DLG_NULL
 BEGIN
 PROMPT 2 7 "Gestione sconti/omaggio articoli"
-FIELD GESLISSO
+FIELD GESSO[A_LISTINI]
 GROUP 1
 END
 
@@ -71,7 +71,7 @@ BEGIN
 PROMPT 2 9 "Gestione archivio contratti"
 MESSAGE FALSE DISABLE,2@
 MESSAGE TRUE ENABLE,2@
-FIELD GESCON
+FIELD GES[A_CONTRATTI]
 END
 
 BOOLEAN DLG_NULL
@@ -84,14 +84,14 @@ END
 BOOLEAN DLG_NULL
 BEGIN
 PROMPT 2 11 "Gestione contratti per unita di misura"
-FIELD GESCONUM
+FIELD GES[A_CONTRATTI]
 GROUP 2
 END
 
 BOOLEAN DLG_NULL
 BEGIN
 PROMPT 2 12 "Gestione contratto a scaglioni"
-FIELD GESCONSCA
+FIELD GESSCA[A_CONTRATTI]
 GROUP 2
 END
 
@@ -99,7 +99,7 @@ END
 BOOLEAN DLG_NULL
 BEGIN
 PROMPT 2 13 "Gestione sconti/omaggio articoli"
-FIELD GESCONSO
+FIELD GESSO[A_CONTRATTI]
 GROUP 2
 END
 
@@ -118,20 +118,20 @@ BEGIN
 PROMPT 2 2 "Gestione archivio campagne"
 MESSAGE TRUE ENABLE,3@
 MESSAGE FALSE DISABLE,3@ 
-FIELD GESCAM
+FIELD GES[A_CAMPAGNE]
 END
 
 BOOLEAN DLG_NULL
 BEGIN
 PROMPT 2 3 "Gestione campagne per unita di misura"
-FIELD GESCAMUM
+FIELD GESUM[A_CAMPAGNE]
 GROUP 3
 END
 
 BOOLEAN DLG_NULL
 BEGIN
 PROMPT 2 4 "Gestione campagne a scaglioni"
-FIELD GESCAMSCA
+FIELD GESSCA[A_CAMPAGNE]
 GROUP 3
 END
 
@@ -139,7 +139,7 @@ END
 BOOLEAN DLG_NULL
 BEGIN
 PROMPT 2 5 "Gestione sconti/omaggio articoli"
-FIELD GESCAMSO
+FIELD GESSO[A_CAMPAGNE]
 GROUP 3
 END
 
@@ -267,16 +267,24 @@ LIST DLG_NULL 36
 BEGIN
 PROMPT 2 8 "Tipo gestione sconti riga      "
 ITEM "N|Non gestire"
+MESSAGE HIDE,F_GESSCORIGACV
 ITEM "L|Perc. su anagrafica/listini/contratti "
+MESSAGE HIDE,F_GESSCORIGACV
 ITEM "A|Gest. arch. sconti "
-ITEM "V|Gest. arch. con cat. vendita cliente "
+MESSAGE SHOW,F_GESSCORIGACV
 ITEM "C|Perc. indicata su anagrafica cliente "
+MESSAGE HIDE,F_GESSCORIGACV
 FIELD GESSCORIGA
-END 
+END
+BOOLEAN F_GESSCORIGACV
+BEGIN
+  PROMPT 2 9 "Gest. arch. sconti con cat. vendita cliente "
+  FIELD GESSCORIGACV
+END
 
 LIST DLG_NULL 36
 BEGIN
-PROMPT 2 9 "Chiave archivio sconti di riga "
+PROMPT 2 10 "Chiave archivio sconti di riga "
 ITEM "A|Codice articolo "
 ITEM "L|Codice linea "
 ITEM "C|Codice linea/categoria "
@@ -287,13 +295,13 @@ END
 
 BOOLEAN DLG_NULL
 BEGIN
-PROMPT 2 10 "Gestione archivio sconti a scaglioni "
+PROMPT 2 11 "Gestione archivio sconti a scaglioni "
 GESSCOSCA
 END
 
 BOOLEAN DLG_NULL
 BEGIN
-PROMPT 2 11 "Gestione archivio sconti unità di misura "
+PROMPT 2 12 "Gestione archivio sconti unità di misura "
 GESSCOUM
 END
 

ve/veconf.h

@@ -0,0 +1,9 @@
+#ifndef __VECONF_H
+#define __VECONF_H
+
+#define A_LISTINI     1
+#define A_CONTRATTI   2
+#define A_CAMPAGNE    3
+
+#endif
+