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