From 54146fcc44fd013d0cf9cde8cffb9f89d4c4b5dc Mon Sep 17 00:00:00 2001
From: angelo <angelo@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Thu, 8 Aug 1996 17:19:02 +0000
Subject: [PATCH] Aggiunto il codice IVA di riferimento alle tabelle
 gruppo/sottogruppo merceologico e raggruppamento fiscale.

git-svn-id: svn://10.65.10.50/trunk@3348 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 ve/batbgmc.h   |  1 +
 ve/batbgmc.uml | 19 ++++++++++++++++---
 ve/batbrfa.h   |  1 +
 ve/batbrfa.uml | 13 +++++++++++++
 4 files changed, 31 insertions(+), 3 deletions(-)

diff --git a/ve/batbgmc.h b/ve/batbgmc.h
index 5b5006315..1dd455bf4 100755
--- a/ve/batbgmc.h
+++ b/ve/batbgmc.h
@@ -7,4 +7,5 @@
 #define F_CODAGGSCO    107
 #define H_CODGRU       108
 #define H_DESGRU       109
+#define F_CODIVARIF    110
 
diff --git a/ve/batbgmc.uml b/ve/batbgmc.uml
index ca8363800..c0d8b32e1 100755
--- a/ve/batbgmc.uml
+++ b/ve/batbgmc.uml
@@ -103,19 +103,32 @@ END
 STRING F_CODAGGDOC 2
 BEGIN
   PROMPT 2 8  "Codice aggiornamento documenti  "
-  FIELD LIC->S4
+  FIELD S4
 END
 
 STRING F_CODAGGOMA 2
 BEGIN
   PROMPT 2 9  "Codice aggiornamento omaggi     "
-  FIELD LIC->S5
+  FIELD S5
 END
 
 STRING F_CODAGGSCO 2
 BEGIN
   PROMPT 2 10  "Codice aggiornamento sconti     "
-  FIELD LIC->S6
+  FIELD S6
+END
+
+STRING F_CODIVARIF 4
+BEGIN
+  PROMPT 2 11  "Codice iva di riferimento       "
+  FIELD S7
+  USE %IVA
+  INPUT CODTAB F_CODIVARIF
+  DISPLAY "Codice IVA" CODTAB
+  DISPLAY "Descrizione" S0
+  DISPLAY "Aliquota" R0
+  OUTPUT F_CODIVARIF CODTAB
+  CHECKTYPE NORMAL
 END
 
 ENDPAGE
diff --git a/ve/batbrfa.h b/ve/batbrfa.h
index c3c9af8a0..3034d81c2 100755
--- a/ve/batbrfa.h
+++ b/ve/batbrfa.h
@@ -7,3 +7,4 @@
 #define FLD_TABRFA_R1 106
 #define FLD_TABRFA_R2 107
 #define FLD_DESCFA    108
+#define FLD_TABRFA_S9 109
diff --git a/ve/batbrfa.uml b/ve/batbrfa.uml
index 137200443..b497722ee 100755
--- a/ve/batbrfa.uml
+++ b/ve/batbrfa.uml
@@ -98,6 +98,19 @@ BEGIN
         ITEM "7|Costo minimo d'acquisto"
 END
 
+STRING FLD_TABRFA_S8 4
+BEGIN
+        PROMPT 2 10 "Codice IVA riferimento"
+        FIELD S9
+        USE %IVA
+        INPUT CODTAB FLD_TABRFA_S9
+        DISPLAY "Codice IVA" CODTAB
+        DISPLAY "Descrizione" S0
+        DISPLAY "Aliquota" R0
+        OUTPUT F_CODIVARIF CODTAB
+        CHECKTYPE NORMAL
+END
+
 ENDPAGE
 
 ENDMASK