diff --git a/src/include/doc.h b/src/include/doc.h
index 02425ad7b..4a354d5f7 100755
--- a/src/include/doc.h
+++ b/src/include/doc.h
@@ -102,6 +102,7 @@
#define DOC_FASEPREL "FASEPREL"
#define DOC_TIPODOCSDI "TIPODOCSDI"
#define DOC_NOINVIOSDI "NOINVIOSDI"
+#define DOC_SCONTOFATT "SCONTOFATT"
// Virtuali
#define DOC_PLAFOND "PLAFOND"
diff --git a/src/ve/f33.dir b/src/ve/f33.dir
index 06ca3bb97..0160db49c 100755
--- a/src/ve/f33.dir
+++ b/src/ve/f33.dir
@@ -1,3 +1,3 @@
33
0
-$doc|41368|42328|727|0|Testate documenti|NDOC||
+$doc|0|0|745|0|Testate documenti|||
diff --git a/src/ve/f33.trr b/src/ve/f33.trr
index 324c58aaf..feb22c887 100755
--- a/src/ve/f33.trr
+++ b/src/ve/f33.trr
@@ -1,5 +1,5 @@
33
-98
+99
CODNUM|1|4|0|Codice della numerazione
ANNO|2|4|0|Anno
PROVV|1|1|0|Tipo numerazione
rovvisorio efinitivo
@@ -97,7 +97,8 @@ CONTSEP|1|6|0|Contabilit
NOLEGGIO|1|1|0|Tipo noleggio (pe)
COMMPREL|1|20|0|Commessa di prelievo (ci)
FASEPREL|1|10|0|Fase di prelievo (ci)
-TIPODOCSDI|1|4|0|Tido documento secondo Agenzia delle Entrate
+TIPODOCSDI|1|4|0|Tipo documento secondo Agenzia delle Entrate
+SCONTOFATT|4|18|2|Sconto in Fattura
5
PROVV+ANNO+CODNUM+NDOC|
TIPOCF+CODCF+PROVV+ANNO+DATADOC+CODNUM+NDOC|X
diff --git a/src/ve/fatacq.src b/src/ve/fatacq.src
index 634c61dc4..02aaf252a 100755
--- a/src/ve/fatacq.src
+++ b/src/ve/fatacq.src
@@ -122,6 +122,7 @@ NOMEVETT3 = S_NASCOSTO
NCOPIE = S_NASCOSTO
IMPPAGATO = S_NORMALE
ACCSALDO = S_NORMALE
+SCONTOFATT = S_NORMALE
DOC1 = S_NASCOSTO
DOC2 = S_NASCOSTO
DOC3 = S_NASCOSTO
diff --git a/src/ve/fatturaa.src b/src/ve/fatturaa.src
index 938f37f45..699d1746c 100755
--- a/src/ve/fatturaa.src
+++ b/src/ve/fatturaa.src
@@ -145,6 +145,7 @@ DATAPART = S_NORMALE
ORAPART = S_NORMALE
IMPPAGATO = S_NORMALE
ACCSALDO = S_NORMALE
+SCONTOFATT = S_NORMALE
DOC1 = S_NASCOSTO
DOC2 = S_NASCOSTO
DOC3 = S_NASCOSTO
diff --git a/src/ve/fatturac.src b/src/ve/fatturac.src
index f737d578a..8c3bdb83e 100755
--- a/src/ve/fatturac.src
+++ b/src/ve/fatturac.src
@@ -139,6 +139,7 @@ NOMEVETT3 = S_NORMALE
NCOPIE = S_NASCOSTO
IMPPAGATO = S_NORMALE
ACCSALDO = S_NORMALE
+SCONTOFATT = S_NORMALE
DOC1 = S_NASCOSTO
DOC2 = S_NASCOSTO
DOC3 = S_NASCOSTO
diff --git a/src/ve/ordinec.src b/src/ve/ordinec.src
index 40650b056..095decf43 100755
--- a/src/ve/ordinec.src
+++ b/src/ve/ordinec.src
@@ -146,6 +146,7 @@ NOMEVETT3 = S_NORMALE
NCOPIE = S_NASCOSTO
IMPPAGATO = S_NORMALE
ACCSALDO = S_NASCOSTO
+SCONTOFATT = S_NORMALE
DOC1 = S_NASCOSTO
DOC2 = S_NASCOSTO
DOC3 = S_NASCOSTO
diff --git a/src/ve/ordinef.src b/src/ve/ordinef.src
index f1d568076..ebb0d0ef9 100755
--- a/src/ve/ordinef.src
+++ b/src/ve/ordinef.src
@@ -147,6 +147,7 @@ DATAPART = S_NORMALE
ORAPART = S_NORMALE
IMPPAGATO = S_NORMALE
ACCSALDO = S_NORMALE
+SCONTOFATT = S_NORMALE
DOC1 = S_NASCOSTO
DOC2 = S_NASCOSTO
DOC3 = S_NASCOSTO
diff --git a/src/ve/ve0300a.src b/src/ve/ve0300a.src
index f7b418ef0..65fc5892f 100755
--- a/src/ve/ve0300a.src
+++ b/src/ve/ve0300a.src
@@ -1603,7 +1603,7 @@ Y=0
FIELDNAME=IMPPAGATO
MSKID=F_IMPPAGATO
TYPE=T_CURRENCY
-PROMPT="Importo pagato "
+PROMPT="Importo pagato "
SIZE=18
SPECIAL=DRIVENBY F_CODVAL
@@ -1616,6 +1616,17 @@ MSKID=F_ACCSALDO
TYPE=T_CHECKBOX
PROMPT="Acconto/saldo "
+[SCONTOFATT]
+GROUP=1800
+X=2
+Y=1
+FIELDNAME=SCONTOFATT
+MSKID=F_SCONTOFATT
+TYPE=T_CURRENCY
+PROMPT="Sconto in fattura "
+SIZE=18
+SPECIAL=DRIVENBY F_CODVAL
+
[DOC1]
GROUP=1900
X=2
diff --git a/src/ve/veacc.rep b/src/ve/veacc.rep
index af1c901ac..0542d2882 100755
--- a/src/ve/veacc.rep
+++ b/src/ve/veacc.rep
@@ -389,6 +389,9 @@ THEN
+
+
+
@@ -661,6 +664,11 @@ MESSAGE APPEND,107
MESSAGE _SCADENZE,IMPORTO,1
+
+
+ 31
+ NETTOPAG
+
33.NOTE
diff --git a/src/ve/vefat.rep b/src/ve/vefat.rep
index 96fbb44bf..9fc8ede55 100755
--- a/src/ve/vefat.rep
+++ b/src/ve/vefat.rep
@@ -196,6 +196,7 @@ THEN
+
33.IVAXCASSA
@@ -289,6 +290,9 @@ THEN
+
+
+
@@ -562,6 +566,11 @@ THEN
31
MESSAGE _SCADENZE,IMPORTO,1
+
+
+ 31
+ NETTOPAG
+
USE 33
JOIN 34 INTO CODNUM==CODNUM ANNO==ANNO PROVV==PROVV NDOC==NDOC
diff --git a/src/ve/velib.h b/src/ve/velib.h
index 926af1d35..ecbae3cff 100755
--- a/src/ve/velib.h
+++ b/src/ve/velib.h
@@ -251,6 +251,7 @@ class TTipo_documento : public TRectype // velib03
TString16 _valore;
TString16 _totvalres;
TString16 _totvalore;
+ TString16 _nettopag;
TString16 _totale_cont;
TString16 _field_prezzo;
TString16 _field_qta, _field_qtaevasa; // Veri campi Quantità e Quantità Evasa
@@ -325,6 +326,7 @@ public:
const TString & valore() const { return _valore;}
const TString & totvalres() const { return _totvalres;}
const TString & totvalore() const { return _totvalore;}
+ const TString & netto_pag() const { return _nettopag; }
bool mov_mag() const { return get_bool("B1"); }
bool statistiche() const { return get_bool("B2"); }
bool provvigioni() const { return get_bool("B3"); }
@@ -985,6 +987,7 @@ public:
real imponibile(bool spese = false, int ndec = AUTO_DECIMALS) const;
real imposta(bool spese = false, int ndec = AUTO_DECIMALS) const;
real totale_doc() const;
+ real netto_a_pagare() const;
real totale_netto() const;
real basesconto() const;
real spese() const;
diff --git a/src/ve/velib03.cpp b/src/ve/velib03.cpp
index 7ba16bf7b..f27c6d791 100755
--- a/src/ve/velib03.cpp
+++ b/src/ve/velib03.cpp
@@ -2589,7 +2589,18 @@ real TDocumento::totale_doc() const
}
else
r = get_real(field);
+ return r;
+}
+real TDocumento::netto_a_pagare() const
+{
+ real r;
+ const TString& field = tipo().netto_pag();
+
+ if (field.blank())
+ r = totale_doc() - get_real(DOC_IMPPAGATO) - get_real(DOC_SCONTOFATT);
+ else
+ r = get_real(field);
return r;
}
diff --git a/src/ve/velib03a.cpp b/src/ve/velib03a.cpp
index fa04c8ba6..818322871 100755
--- a/src/ve/velib03a.cpp
+++ b/src/ve/velib03a.cpp
@@ -400,6 +400,7 @@ void TTipo_documento::read_formule()
add_formula_if_needed(prof, _spese, "SPESE", "SOMMA(\"IMPONIBILE()\", \"TIPO() == 'S'\")");
add_formula_if_needed(prof, _totvalres, "TOTVALRES", "VALDOC(0)");
add_formula_if_needed(prof, _totvalore, "TOTVALORE", "VALDOC(1)");
+ add_formula_if_needed(prof, _nettopag, "NETTOPAG", "TOTDOC-" DOC_IMPPAGATO "-" DOC_SCONTOFATT);
if (provvigioni())
{
diff --git a/src/ve/vetabcom.txt b/src/ve/vetabcom.txt
index bda91f92d..7c4cbdd23 100755
--- a/src/ve/vetabcom.txt
+++ b/src/ve/vetabcom.txt
@@ -74,14 +74,14 @@ STD|3|Fatturato|||||||||||||||||||||||||||||||||||||||||||||||||||| | | | | | |
STD|4|Generati effetti|||||||||||||||||||||||||||||||||||||||||||||||||||| | | | | | | | | | |
STD|5|Contabilizzato|||||||||||||||||||||||||||||||||||||||||||||||||||| | | | | | | | | | |
STD|9|Eliminabile|||||||||||||||||||||||||||||||||||||||||||||||||||| | | | | | | | | | |
-TIP|A01|Fatture di acquisto||12 1 159 1||fatacq|vefatbmp|A01||||||1|2||||||||||||||||||||||||||||||||||||||| | | | | | | | | | |
+TIP|A01|Fatture di acquisto||12 1 159 1||fatacq|vefat|A01||||||1|2||||||||||||||||||||||||||||||||||||||| | | | | | | | | | |
TIP|B01|Bolla di vendita||12 1 159 1||BOLLAC|vebolbmp||2||VENL||||1||||||||||||||0.00|0.00|0.00|0.00|0.00|0.00|0.00|0.00|0.00|0.00|0.00000|0.00000|0.00000|0.00000|0.00000||||||||||| |X| | | | | | | | |
TIP|BACQ|Bolla di acquisto||12 1 159 1||bolacq|vebolbmp||2||ACQL||||1||||||||||||||||||||||||||||||||||||||| |X| | | | | | | | |
TIP|BOF|bolla fornitore||12 1 159 1||BOLLAF|vebolbmp||2||REAL||||1||||||||||||||||||||||||||||||||||||||| |X| | | | | | | | |
-TIP|F01|Fattura||12 1 159 1||FATTURAC|VEFATbmp|V01|||||||2||||||||||||||||||||||||||||||||||||||| | | | | | | | | | |
+TIP|F01|Fattura||12 1 159 1||FATTURAC|VEFAT|V01|||||||2||||||||||||||||||||||||||||||||||||||| | | | | | | | | | |
TIP|FAA|Fattura Accompagnatoria||12 1 159 1||FATTURAA|veacc|V01|2||VENL||||2||||||||||||||||||||||||||||||||||||||| |X| | | | | | | | |
TIP|NAC|Nota di accredito cliente||12 1 159 1||fatturac|vefatbmp|V02|||||||2||2||||||||||||||||||||||||||||||||||||| | | | | | | |X| | |X
-TIP|NDF|Nota di debito fornitore||12 1 159 1||fatacq|vefatbmp|A03|||||||2||2||||||||||||||||||||||||||||||||||||| | | | | | | | | | |
+TIP|NDF|Nota di debito fornitore||12 1 159 1||fatacq|vefat|A03|||||||2||2||||||||||||||||||||||||||||||||||||| | | | | | | | | | |
TIP|ORC|Ordine Cliente|ordine cliente|12 1 159 1||ORDINEC|vebolbmp||2||ORCL||||3||||||||||||||||||||||||||||||||||||||| |X| | | | | | | | |
TIP|ORF|Ordine Fornitore||12 1 159 1||ORDINEF|vebolbmp||2||ORFO||||3||||||||||||||||||||||||||||||||||||||| |X| | | | | | | | |
TRI|01|Merce|||||||M
diff --git a/src/ve/veuml.h b/src/ve/veuml.h
index 7f22f6d37..ea73b70df 100755
--- a/src/ve/veuml.h
+++ b/src/ve/veuml.h
@@ -128,6 +128,7 @@
#define F_INVIO_FP 231
#define F_REG_FISCF 232
#define F_NON_INVIO_FP 233
+#define F_SCONTOFATT 234
#define F_CDC1 251
#define F_CDC12 262
@@ -135,6 +136,8 @@
#define F_DESCDC12 282
#define F_DATACOMP 291
#define F_DATAFCOMP 292
+
+
//#define F_SELECT 101
#define F_NAR 299