diff --git a/SDL/Fakturierung/cFakturierung.vb b/SDL/Fakturierung/cFakturierung.vb
index 9ec8e9a9..2387aae4 100644
--- a/SDL/Fakturierung/cFakturierung.vb
+++ b/SDL/Fakturierung/cFakturierung.vb
@@ -1795,7 +1795,7 @@ Public Class cFakturierung
         End If
 
 
-        Dim sumNetto = 0
+        Dim sumNetto As Double = 0
         For Each p In RECHNUNG.POSITIONEN
 
             Dim tradeLineItemNew As TradeLineItem = desc.AddTradeLineItem(