diff --git a/ve/batbtip.h b/ve/batbtip.h
index 8814d8214..427726212 100755
--- a/ve/batbtip.h
+++ b/ve/batbtip.h
@@ -3,3 +3,4 @@
 #define F_RIFERIMENTO 103
 #define F_PROFILO     104
 #define F_PSTAMPA     105
+#define F_CODCAUS     106
diff --git a/ve/batbtip.uml b/ve/batbtip.uml
index 2c19ca7e6..5025ae3b2 100755
--- a/ve/batbtip.uml
+++ b/ve/batbtip.uml
@@ -63,6 +63,18 @@ BEGIN
   CHECKTYPE REQUIRED
 END
 
+STRING F_CODCAUS 3
+BEGIN
+  PROMPT 2 10 "Codice causale           "
+  FIELD S6
+  USE LF_CAUSALI
+  INPUT CODCAUS F_CODCAUS
+  DISPLAY "Codice" CODCAUS
+  DISPLAY "Descrizione@50" DESCR
+  OUTPUT F_CODCAUS CODCAUS
+  CHECKTYPE REQUIRED
+END
+
 ENDPAGE
 
 ENDMASK