Index: vhUnitTest/AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter/Test.cls.xml
===================================================================
diff -u -r48261 -r48263
--- vhUnitTest/AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 48261)
+++ vhUnitTest/AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 48263)
@@ -34,21 +34,39 @@
 
 <Method name="Test Standaard gedrag bij creatie nieuwe klant">
 <Implementation><![CDATA[
-	
 	Do ..VerkoopApiMock.VerwachtMethodCall("BestaatKlant","K||1111").DanReturn($$$False)
 		
 	#dim VerwachteKlantDto as DOM.common.dto.Partij = ..GeefKlantDto()
+
 	Set Matcher1 = ##class(vhUnitTest.AXimpl.Dynamics.CustomerIn.Converter.CustomerInConverter.PartijMatcher).%New(VerwachteKlantDto)
 	Do ..KlantLevenCyclusServiceMock.VerwachtMethodCall("MaakKlant",Matcher1,"ONDERNEMING").DanDoeNiks()
 	
-
 	Do ..GeefConverter().Convert(..GeefCust("01111","Klant1"))
 	
 	Do ..VerkoopApiMock.Verifieer()
 	Do ..KlantLevenCyclusServiceMock.Verifieer()
 ]]></Implementation>
 </Method>
 
+<Method name="Test ongeldige rechtsvorm niet van naam afhalen, en daardoor ook aanspreking blank">
+<Implementation><![CDATA[
+	Do ..VerkoopApiMock.VerwachtMethodCall("BestaatKlant","K||1111").DanReturn($$$False)
+		
+	#dim VerwachteKlantDto as DOM.common.dto.Partij = ..GeefKlantDto()
+	Set VerwachteKlantDto.KlantNaam = "Klant1 GEENBVBA"
+	Set VerwachteKlantDto.Aanspreking = ""
+	Set Matcher1 = ##class(vhUnitTest.AXimpl.Dynamics.CustomerIn.Converter.CustomerInConverter.PartijMatcher).%New(VerwachteKlantDto)
+	Do ..KlantLevenCyclusServiceMock.VerwachtMethodCall("MaakKlant",Matcher1,"ONDERNEMING").DanDoeNiks()
+	
+	#dim Cust as AXif.Dynamics.CustomerIn.MessageParts.AxdEntityCust = ..GeefCust("01111","Klant1")
+	Set Cust.Name = "Klant1 GEENBVBA"
+	Do ..GeefConverter().Convert(Cust)
+	
+	Do ..VerkoopApiMock.Verifieer()
+	Do ..KlantLevenCyclusServiceMock.Verifieer()
+]]></Implementation>
+</Method>
+
 <Method name="GeefKlantDto">
 <Private>1</Private>
 <ReturnType>DOM.common.dto.Partij</ReturnType>
@@ -60,7 +78,7 @@
 	Set KlantDto.Email = "unittest@vanhoecke.be"
     Set KlantDto.Fax = "03-464 12 34"
 	Set KlantDto.FrequentieAanbrengerCommissie = ""
-    Set KlantDto.KlantNaam = "Klant1 "
+    Set KlantDto.KlantNaam = "Klant1"
     Set KlantDto.KlantNummer = 1111
     Set KlantDto.Muntcode = "EUR"
     Set KlantDto.Opmerking1 = ""