diff --git a/SDL/Fakturierung/cFakturierung.vb b/SDL/Fakturierung/cFakturierung.vb
index b17958dc..8aa66863 100644
--- a/SDL/Fakturierung/cFakturierung.vb
+++ b/SDL/Fakturierung/cFakturierung.vb
@@ -352,7 +352,8 @@ Public Class cFakturierung
                                 Select Case RECHNUNG.RechnungSprache
                                     Case "EN" : strZahlbar = "Terms of Payment: " & ZZTage & " days as of document date"
                                     Case "RO" : strZahlbar = "Termen de plata: " & ZZTage & " zile de la data emiterii facturii"
-                                    Case Else : strZahlbar = "Zahlungsziel: " & ZZTage & " Tage ab Rechnungsdatum"
+                                    Case "TR" : strZahlbar = "Termen de plata: " & ZZTage & " zile de la data emiterii facturii"
+                                    Case Else : strZahlbar = "ödeme tarihi: " & ZZTage & " gün  fatura tarihinden itibaren"
                                         'Case "EN" : strZahlbar = "Payable within " & ZZTage & " days from date of invoice."
                                         'Case Else : strZahlbar = "Zahlbar innerhalb " & ZZTage & " Tagen ab Rechnungsdatum."
                                 End Select
diff --git a/SDL/My Project/AssemblyInfo.vb b/SDL/My Project/AssemblyInfo.vb
index b02baa94..87955333 100644
--- a/SDL/My Project/AssemblyInfo.vb	
+++ b/SDL/My Project/AssemblyInfo.vb	
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("1.4.8.6")>
-<Assembly: AssemblyFileVersion("1.4.8.6")>
+<Assembly: AssemblyVersion("1.4.8.7")>
+<Assembly: AssemblyFileVersion("1.4.8.7")>
diff --git a/SDL/kunden/usrCntlCBAM.vb b/SDL/kunden/usrCntlCBAM.vb
index 808c8a90..3b8dc3df 100644
--- a/SDL/kunden/usrCntlCBAM.vb
+++ b/SDL/kunden/usrCntlCBAM.vb
@@ -680,7 +680,7 @@ Public Class usrCntlCBAM
 					  ,isnull(max(Empfänger_CN_EORI),'') as 'importer identification number'
 					 ,'' as 'exporter identification number' 
 					 , max(Warentarifnummer)  as 'commodity code'
-					 ,max([VersendungsLand])  as 'origin country code'
+					 ,max(Ursprungsland_ISO2)  as 'origin country code'
 					 ,Left(max(Verfahren2),2) as 'requested procedure'
 					 ,'' as 'previous procedure'
 					 ,(max(Eigenmasse) / 1000) as 'net mass'
diff --git a/VERAG_PROG_ALLGEMEIN/Classes/cDY_Zollanmeldungen_Import.vb b/VERAG_PROG_ALLGEMEIN/Classes/cDY_Zollanmeldungen_Import.vb
index 426ea8de..e50e7377 100644
--- a/VERAG_PROG_ALLGEMEIN/Classes/cDY_Zollanmeldungen_Import.vb
+++ b/VERAG_PROG_ALLGEMEIN/Classes/cDY_Zollanmeldungen_Import.vb
@@ -145,6 +145,7 @@ Public Class cDY_Zollanmeldungen_Import
     Property Importstatus As Object = Nothing
     Property Importdate As Object = Nothing
     Property Importfile As Object = Nothing
+    Property Ursprungsland_ISO2 As Object = Nothing
 
     Public hasEntry = False
 
@@ -301,6 +302,7 @@ Public Class cDY_Zollanmeldungen_Import
         list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("Importstatus", Importstatus))
         list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("Importdate", Importdate))
         list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("Importfile", Importfile))
+        list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("Ursprungsland_ISO2", Ursprungsland_ISO2))
 
         Return list
     End Function
diff --git a/VERAG_PROG_ALLGEMEIN/Classes/cUIDPruefung.vb b/VERAG_PROG_ALLGEMEIN/Classes/cUIDPruefung.vb
index e0f321eb..30de0832 100644
--- a/VERAG_PROG_ALLGEMEIN/Classes/cUIDPruefung.vb
+++ b/VERAG_PROG_ALLGEMEIN/Classes/cUIDPruefung.vb
@@ -219,7 +219,7 @@ Public Class cUIDPruefung
 
                 Case "FINANZONLINE"
                     Dim FO As New VERAG_PROG_ALLGEMEIN.cFinanzOnlineWebService
-                    VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "VERAG"
+                    'VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "VERAG" WARUM?
                     FO.initValues()
                     Dim counter = 0
                     Dim errorCounter As Integer = 0
diff --git a/VERAG_PROG_ALLGEMEIN/cProgramFunktions.vb b/VERAG_PROG_ALLGEMEIN/cProgramFunktions.vb
index 534816d6..4c66932b 100644
--- a/VERAG_PROG_ALLGEMEIN/cProgramFunktions.vb
+++ b/VERAG_PROG_ALLGEMEIN/cProgramFunktions.vb
@@ -639,6 +639,13 @@ BindingFlags.Instance Or BindingFlags.NonPublic, Nothing, [Control], New Object(
         Return SQL.getValueTxtBySql(sqlstr, "FMZOLL")
     End Function
 
+    Shared Function getISO2LandFromLandbezeichnung(LandBez As String)
+        If LandBez Is Nothing Then Return Nothing
+        Dim sqlstr = "SELECT TOP 1 isnull([Länderverzeichnis für die Außenhandelsstatistik].LandKz,'') AS LandKzISO2 FROM [Länderverzeichnis für die Außenhandelsstatistik] LEFT JOIN Währungstabelle ON [Länderverzeichnis für die Außenhandelsstatistik].LandNr = Währungstabelle.Währungsschlüssel     WHERE Währungstabelle.Land='" & LandBez & "' "
+        Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
+        Return SQL.getValueTxtBySql(sqlstr, "FMZOLL")
+    End Function
+
 
     Shared Function getISO2LandFromISO1Land(Iso1Land As String)
         Dim sqlstr = "SELECT TOP 1 isnull([Länderverzeichnis für die Außenhandelsstatistik].LandKz,'') AS LandKzISO2 FROM [Länderverzeichnis für die Außenhandelsstatistik] LEFT JOIN Währungstabelle ON [Länderverzeichnis für die Außenhandelsstatistik].LandNr = Währungstabelle.Währungsschlüssel   WHERE Währungstabelle.LandKz='" & Iso1Land & "' "