Index: vhUnitTest/AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter/Test.cls.xml
===================================================================
diff -u -r47140 -r47154
--- vhUnitTest/AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 47140)
+++ vhUnitTest/AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 47154)
@@ -55,6 +55,28 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: LanguageId is de Taal">
+<Implementation><![CDATA[
+	Set VerkoopApiMock = ##class(vhTest.Mock.DOM.VKP.VerkoopAPI).%New()
+	Do VerkoopApiMock.IndienMethodCall("BestaatKlant","K||1111").DanReturn($$$True)
+	
+	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(vhTest.Fake.DOM.VKP.VanHoeckeKlant).%New()
+	Do Klant.ZetTaal("D")
+	
+	Set PartijApiMock = ##class(vhTest.Mock.DOM.PARTIJ.PartijAPI).%New()
+	Do PartijApiMock.IndienMethodCall("GeefPartij","K||1111").DanReturn(Klant)
+	
+	Set ..VerkoopApi = VerkoopApiMock
+	Set ..PartijApi = PartijApiMock
+	
+	Do $$$AssertEquals(Klant.GeefTaal(),"D")
+	
+	Do ..GeefConverter().Convert(..GeefBerichtMetEenKlant())
+	
+	Do $$$AssertEquals(Klant.GeefTaal(),"F")
+]]></Implementation>
+</Method>
+
 <Method name="GeefConverter">
 <Private>1</Private>
 <ReturnType>AXimpl.Dynamics.CustomerIn.Converter.CustomerInConverter</ReturnType>
@@ -69,6 +91,7 @@
 	Set Cust = ##class(AXif.Dynamics.CustomerIn.MessageParts.AxdEntityCust).%New()
 	Set Cust.CustAccount = 01111
 	Set Cust.Name = "Klant1"
+	Set Cust.LanguageId = "fr"
 	
 	Set CustOutQuery = ##class(AXif.Dynamics.CustomerIn.MessageParts.AxdADUMsgCustOutQuery).%New()
 	Do CustOutQuery.Cust.Insert(Cust)