Index: vhUnitTest/AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter/Test.cls.xml
===================================================================
diff -u -r49873 -r49906
--- vhUnitTest/AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 49873)
+++ vhUnitTest/AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 49906)
@@ -63,7 +63,7 @@
 	Do ..LeverAdresUtilsMock.IndienMethodCall("MaakPrimairAdres",$$$ElkeWaarde).DanReturn(..GeefAddress())
 	Do ..LeverAdresUtilsMock.IndienMethodCall("ZetLeverAdressen",KlantMock,$$$ElkeWaarde).DanDoeNiks()
 	
-	Do ..GeefConverter().Convert(..GeefCust("01111","Klant1"))
+	Do ..GeefConverter().Convert(..GeefCust("01111","Klant1 BV BVBA"))
 
 	Do ..PartijApiMock.Verifieer()
 	Do ..VerkoopApiMock.Verifieer()
@@ -90,7 +90,7 @@
 	
 	Do ..LeverAdresUtilsMock.IndienMethodCall("MaakPrimairAdres",KlantMock).DanReturn(..GeefAddress())
 	
-	#dim Cust As AXif.Dynamics.CustomerIn.MessageParts.AxdEntityCust = ..GeefCust("01111","Klant1")
+	#dim Cust As AXif.Dynamics.CustomerIn.MessageParts.AxdEntityCust = ..GeefCust("01111","Klant1 BV BVBA")
 	Set Cust.PostalAddress.GetAt(1).DlvModeId = "UnitTestOngekendeDlvMode"
 	
 	#dim LandMock As vhTest.Mock.DOM.common.Land = ##class(vhTest.Mock.DOM.common.Land).%New()
@@ -121,7 +121,7 @@
 	Do ..LeverAdresUtilsMock.IndienMethodCall("MaakPrimairAdres",$$$ElkeWaarde).DanReturn(..GeefAddress())
 	Do ..LeverAdresUtilsMock.IndienMethodCall("ZetLeverAdressen",KlantMock,$$$ElkeWaarde).DanDoeNiks()
 	
-	Do ..GeefConverter().Convert(..GeefCust("01111","Klant1"))
+	Do ..GeefConverter().Convert(..GeefCust("01111","Klant1 BV BVBA"))
 	
 	Do ..VerkoopApiMock.Verifieer()
 	Do ..KlantLevenCyclusServiceMock.Verifieer()
@@ -151,7 +151,7 @@
 <Implementation><![CDATA[
 	Do PartijMock.VerwachtMethodCall("ZetBTWNr","BE0430459769").DanDoeNiks()
 	Do PartijMock.VerwachtMethodCall("ZetTaal","N").DanDoeNiks()
-	Do PartijMock.VerwachtMethodCall("ZetAanspreking","").DanDoeNiks()
+	Do PartijMock.VerwachtMethodCall("ZetAanspreking","BV BVBA").DanDoeNiks()
 	Do PartijMock.VerwachtMethodCall("ZetNaam","Klant1").DanDoeNiks()
 	Do PartijMock.VerwachtMethodCall("ZetToenaam","").DanDoeNiks()
 	Do PartijMock.VerwachtMethodCall("ZetTelefoon1","03-464 00 91").DanDoeNiks()
@@ -192,7 +192,7 @@
 <Implementation><![CDATA[
 	Set KlantDto = ##class(DOM.common.dto.Partij).%New()
 	Set KlantDto.KlantNummer = 1111
-	Set KlantDto.Aanspreking = ""
+	Set KlantDto.Aanspreking = "BV BVBA"
 	Set KlantDto.BTWNummer = "BE0430459769"
 	Set KlantDto.Email = "unittest@vanhoecke.be"
     Set KlantDto.Fax = "03-464 12 34"
Index: AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter.cls.xml
===================================================================
diff -u -r49786 -r49906
--- AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter.cls.xml	(.../CustomerInConverter.cls.xml)	(revision 49786)
+++ AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter.cls.xml	(.../CustomerInConverter.cls.xml)	(revision 49906)
@@ -81,9 +81,9 @@
 	Do KlantPartij.ZetTaal(..AxToAdminUtils.ConvertLanguageId(Cust.LanguageId))
 	Do KlantPartij.ZetBTWNr(..GeefBTWNummer(Cust))
 	
-	Do KlantPartij.ZetAanspreking("")
-	Do KlantPartij.ZetNaam($Piece(..AxToAdminUtils.ConvertCustNameToNaamEnToenaam(Cust.Name),"||",1))
-	Do KlantPartij.ZetToenaam($Piece(..AxToAdminUtils.ConvertCustNameToNaamEnToenaam(Cust.Name),"||",2))
+	Do KlantPartij.ZetNaam($Piece(..AxToAdminUtils.ConvertCustNameToNaamToenaamEnAanspreking(Cust.Name),"||",1))
+	Do KlantPartij.ZetToenaam($Piece(..AxToAdminUtils.ConvertCustNameToNaamToenaamEnAanspreking(Cust.Name),"||",2))
+	Do KlantPartij.ZetAanspreking($Piece(..AxToAdminUtils.ConvertCustNameToNaamToenaamEnAanspreking(Cust.Name),"||",3))
 	Do KlantPartij.ZetTaal(..GeefTaal(Cust))
 	Do KlantPartij.ZetTelefoon1(..GeefTelefoon1(Cust))
 	#dim PrimairAdres As DOM.VKP.LeverAdres = ..LeverAdresUtils.MaakPrimairAdres(Cust)
@@ -105,9 +105,9 @@
 	#dim TypeTemplateKlant as DOM.CRM.enu.TypeTemplateKlant = ##class(DOM.CRM.enu.TypeTemplateKlant).Onderneming() ; Consument/Medewerker
 		
 	Set dtoKlant.KlantNummer = + Cust.CustAccount
-	Set dtoKlant.Aanspreking = ""
-	Set dtoKlant.KlantNaam = $Piece(..AxToAdminUtils.ConvertCustNameToNaamEnToenaam(Cust.Name),"||",1)
-	Set dtoKlant.Toenaam = $Piece(..AxToAdminUtils.ConvertCustNameToNaamEnToenaam(Cust.Name),"||",2)
+	Set dtoKlant.KlantNaam = $Piece(..AxToAdminUtils.ConvertCustNameToNaamToenaamEnAanspreking(Cust.Name),"||",1)
+	Set dtoKlant.Toenaam = $Piece(..AxToAdminUtils.ConvertCustNameToNaamToenaamEnAanspreking(Cust.Name),"||",2)
+	Set dtoKlant.Aanspreking = $Piece(..AxToAdminUtils.ConvertCustNameToNaamToenaamEnAanspreking(Cust.Name),"||",3)
 	Set dtoKlant.Taal = ..GeefTaal(Cust)
 	Set dtoKlant.Telefoon1 = ..GeefTelefoon1(Cust)
 	Set dtoKlant.Fax = ..GeefFax(Cust) ; wordt blijkbaar niet in service gebruikt !!!!!
Index: vhUnitTest/AXimpl/AxToAdminUtils/ConvertCustNameToNaamEnToenaam/Test.cls.xml
===================================================================
diff -u -r49753 -r49906
--- vhUnitTest/AXimpl/AxToAdminUtils/ConvertCustNameToNaamEnToenaam/Test.cls.xml	(.../Test.cls.xml)	(revision 49753)
+++ vhUnitTest/AXimpl/AxToAdminUtils/ConvertCustNameToNaamEnToenaam/Test.cls.xml	(.../Test.cls.xml)	(revision 49906)
@@ -3,77 +3,105 @@
 <Class name="vhUnitTest.AXimpl.AxToAdminUtils.ConvertCustNameToNaamEnToenaam.Test">
 <Super>vhUnitTest.TestCase</Super>
 
-<Method name="Test: ConvertCustNameToNaamEnToenaam default -&gt; Naam is maximaal 28 lang, de rest zit in Toenaam">
+<Method name="Test: Als het laatste deel een Juridische Vorm is -&gt; in 3e pipe pipe delimited piece steken">
 <Implementation><![CDATA[
 	Set Converter = ##class(AXimpl.AxToAdminUtils).%New()
-	Do $$$AssertEquals(Converter.ConvertCustNameToNaamEnToenaam("12345678901234567890123456789012345"),"1234567890123456789012345678||9012345")
+	Do $$$AssertEquals(Converter.ConvertCustNameToNaamToenaamEnAanspreking("12345678901234567890123456789012345 BVBA"),"1234567890123456789012345678||9012345||BVBA")
 ]]></Implementation>
 </Method>
 
-<Method name="Test: ConvertCustNameToNaamEnToenaam variatie -&gt; karakter 29 is een spatie">
+<Method name="Test: Als de Juridische Vorm uit 2 delen bestaat -&gt; in 3e pipe pipe delimited piece steken">
 <Implementation><![CDATA[
 	Set Converter = ##class(AXimpl.AxToAdminUtils).%New()
-	Do $$$AssertEquals(Converter.ConvertCustNameToNaamEnToenaam("1234567890123456789012345678 012345"),"1234567890123456789012345678||012345")
+	Do $$$AssertEquals(Converter.ConvertCustNameToNaamToenaamEnAanspreking("12345678901234567890123456789012345 BV BVBA"),"1234567890123456789012345678||9012345||BV BVBA")
 ]]></Implementation>
 </Method>
 
-<Method name="Test: ConvertCustNameToNaamEnToenaam variatie -&gt; karakter 28 is een spatie">
+<Method name="Test: Als er geen Juridische Vorm meegegeven wordt -&gt; 3e pipe pipe delimited piece leeg houden">
 <Implementation><![CDATA[
 	Set Converter = ##class(AXimpl.AxToAdminUtils).%New()
-	Do $$$AssertEquals(Converter.ConvertCustNameToNaamEnToenaam("123456789012345678901234567 9012345"),"123456789012345678901234567||9012345")
+	Do $$$AssertEquals(Converter.ConvertCustNameToNaamToenaamEnAanspreking("1234567890123456789 0123456789012345"),"1234567890123456789||0123456789012345||")
 ]]></Implementation>
 </Method>
 
-<Method name="Test: ConvertCustNameToNaamEnToenaam variatie -&gt; er staat een spatie ergens voor karakter 28">
+<Method name="Test: ConvertCustNameToNaamToenaamEnAanspreking -&gt; 1e pipe pipe delimited piece is maximaal 28 lang, de rest zit in 2e piece">
 <Implementation><![CDATA[
 	Set Converter = ##class(AXimpl.AxToAdminUtils).%New()
-	Do $$$AssertEquals(Converter.ConvertCustNameToNaamEnToenaam("12345678901234567890123456 89012345"),"12345678901234567890123456||89012345")
+	Do $$$AssertEquals(Converter.ConvertCustNameToNaamToenaamEnAanspreking("12345678901234567890123456789012345"),"1234567890123456789012345678||9012345||")
 ]]></Implementation>
 </Method>
 
-<Method name="Test: ConvertCustNameToNaamEnToenaam variatie -&gt; er staan meerdere spaties voor karakter 28">
+<Method name="Test: ConvertCustNameToNaamToenaamEnAanspreking variatie -&gt; karakter 29 is een spatie">
 <Implementation><![CDATA[
 	Set Converter = ##class(AXimpl.AxToAdminUtils).%New()
-	Do $$$AssertEquals(Converter.ConvertCustNameToNaamEnToenaam("123 567890123 567890 23456 89012345"),"123 567890123 567890 23456||89012345")
+	Do $$$AssertEquals(Converter.ConvertCustNameToNaamToenaamEnAanspreking("1234567890123456789012345678 012345"),"1234567890123456789012345678||012345||")
 ]]></Implementation>
 </Method>
 
-<Method name="Test: ConvertCustNameToNaamEnToenaam variatie -&gt; er staat een spatie na karakter 29">
+<Method name="Test: ConvertCustNameToNaamToenaamEnAanspreking variatie -&gt; karakter 28 is een spatie">
 <Implementation><![CDATA[
 	Set Converter = ##class(AXimpl.AxToAdminUtils).%New()
-	Do $$$AssertEquals(Converter.ConvertCustNameToNaamEnToenaam("123 567890123 567890 23456 89 12345"),"123 567890123 567890 23456||89 12345")
+	Do $$$AssertEquals(Converter.ConvertCustNameToNaamToenaamEnAanspreking("123456789012345678901234567 9012345"),"123456789012345678901234567||9012345||")
 ]]></Implementation>
 </Method>
 
-<Method name="Test: ConvertCustNameToNaamEnToenaam variatie -&gt; er staan meerdere spaties voor en na karakter 28">
+<Method name="Test: ConvertCustNameToNaamToenaamEnAanspreking variatie -&gt; er staat een spatie ergens voor karakter 28">
 <Implementation><![CDATA[
 	Set Converter = ##class(AXimpl.AxToAdminUtils).%New()
-	Do $$$AssertEquals(Converter.ConvertCustNameToNaamEnToenaam("123 567890123 567890 23456 89 123 5"),"123 567890123 567890 23456||89 123 5")
+	Do $$$AssertEquals(Converter.ConvertCustNameToNaamToenaamEnAanspreking("12345678901234567890123456 89012345"),"12345678901234567890123456||89012345||")
 ]]></Implementation>
 </Method>
 
-<Method name="Test: ConvertCustNameToNaamEnToenaam variatie -&gt; Name is minder dan 28 lang">
+<Method name="Test: ConvertCustNameToNaamToenaamEnAanspreking variatie -&gt; er staan meerdere spaties voor karakter 28">
 <Implementation><![CDATA[
 	Set Converter = ##class(AXimpl.AxToAdminUtils).%New()
-	Do $$$AssertEquals(Converter.ConvertCustNameToNaamEnToenaam("123 567890123 567890"),"123 567890123 567890||")
+	Do $$$AssertEquals(Converter.ConvertCustNameToNaamToenaamEnAanspreking("123 567890123 567890 23456 89012345"),"123 567890123 567890 23456||89012345||")
 ]]></Implementation>
 </Method>
 
-<Method name="Test: ConvertCustNameToNaamEnToenaam variatie -&gt; Toenaam wordt afgekapt op 28 lang">
+<Method name="Test: ConvertCustNameToNaamToenaamEnAanspreking variatie -&gt; er staat een spatie na karakter 29">
 <Implementation><![CDATA[
 	Set Converter = ##class(AXimpl.AxToAdminUtils).%New()
-	Do $$$AssertEquals(Converter.ConvertCustNameToNaamEnToenaam("1234567890123456789012345678 123456789012345678901234567890"),"1234567890123456789012345678||1234567890123456789012345678")
+	Do $$$AssertEquals(Converter.ConvertCustNameToNaamToenaamEnAanspreking("123 567890123 567890 23456 89 12345"),"123 567890123 567890 23456||89 12345||")
 ]]></Implementation>
 </Method>
 
-<Method name="Test: ConvertCustNameToNaamEnToenaam variatie -&gt; Als Toenaam langer is dan 28 wordt een Warning gelogd">
+<Method name="Test: ConvertCustNameToNaamToenaamEnAanspreking variatie -&gt; er staan meerdere spaties voor en na karakter 28">
 <Implementation><![CDATA[
+	Set Converter = ##class(AXimpl.AxToAdminUtils).%New()
+	Do $$$AssertEquals(Converter.ConvertCustNameToNaamToenaamEnAanspreking("123 567890123 567890 23456 89 123 5"),"123 567890123 567890 23456||89 123 5||")
+]]></Implementation>
+</Method>
+
+<Method name="Test: ConvertCustNameToNaamToenaamEnAanspreking variatie -&gt; er staan spaties naast elkaar">
+<Implementation><![CDATA[
+	Set Converter = ##class(AXimpl.AxToAdminUtils).%New()
+	Do $$$AssertEquals(Converter.ConvertCustNameToNaamToenaamEnAanspreking("123 567890123  67890 23456 89 123 5"),"123 567890123  67890 23456||89 123 5||")
+]]></Implementation>
+</Method>
+
+<Method name="Test: ConvertCustNameToNaamToenaamEnAanspreking variatie -&gt; CustName is minder dan 28 lang">
+<Implementation><![CDATA[
+	Set Converter = ##class(AXimpl.AxToAdminUtils).%New()
+	Do $$$AssertEquals(Converter.ConvertCustNameToNaamToenaamEnAanspreking("123 567890123 567890"),"123 567890123 567890||||")
+]]></Implementation>
+</Method>
+
+<Method name="Test: ConvertCustNameToNaamToenaamEnAanspreking variatie -&gt; 2e pipe pipe delimited piece wordt afgekapt op 28 lang">
+<Implementation><![CDATA[
+	Set Converter = ##class(AXimpl.AxToAdminUtils).%New()
+	Do $$$AssertEquals(Converter.ConvertCustNameToNaamToenaamEnAanspreking("1234567890123456789012345678 123456789012345678901234567890"),"1234567890123456789012345678||1234567890123456789012345678||")
+]]></Implementation>
+</Method>
+
+<Method name="Test: ConvertCustNameToNaamToenaamEnAanspreking variatie -&gt; Als 2e pipe pipe delimited piece langer is dan 28 wordt een Warning gelogd">
+<Implementation><![CDATA[
 	#dim Name As %String = "1234567890123456789012345678 123456789012345678901234567890"
 	#dim LoggerMock As vhLib.Logger = ##class(vhTest.Mock.vhLib.Logger).%New()
 	Do LoggerMock.VerwachtMethodCall("Warning","Klant synchronizatie AX - Admin","De maximale veldlengte voor Toenaam is 28. Lengte Toenaam voor '"_Name_"' is '30'").DanDoeNiks().ExactAantalKeer(1)
 	
 	Set Converter = ##class(AXimpl.AxToAdminUtils).%New(LoggerMock)
-	Do Converter.ConvertCustNameToNaamEnToenaam(Name)
+	Do Converter.ConvertCustNameToNaamToenaamEnAanspreking(Name)
 	
 	Do LoggerMock.Verifieer()
 ]]></Implementation>
Index: AXimpl/AxToAdminUtils.cls.xml
===================================================================
diff -u -r49753 -r49906
--- AXimpl/AxToAdminUtils.cls.xml	(.../AxToAdminUtils.cls.xml)	(revision 49753)
+++ AXimpl/AxToAdminUtils.cls.xml	(.../AxToAdminUtils.cls.xml)	(revision 49906)
@@ -299,25 +299,43 @@
 ]]></Implementation>
 </Method>
 
-<Method name="ConvertCustNameToNaamEnToenaam">
-<FormalSpec>Name:%String</FormalSpec>
+<Method name="ConvertCustNameToNaamToenaamEnAanspreking">
+<FormalSpec>CustName:%String</FormalSpec>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	#dim Naam,Toenaam As %String
-	#dim Eerste28Karakters As %String = $Extract(Name,1,28)
-	If (($Length(Name) <= 28) || ($Extract(Name,29) = " ")) {
+	#dim Naam,Toenaam,Aanspreking,NettoCustName As %String = ""
+	#dim Occurrences As %Integer = ##class(TECH.StringUtils).Occurrences(CustName," ")
+	#dim LaatsteWoord As %String = ##class(TECH.StringUtils).GetLastPart(CustName," ")
+	
+	If (Occurrences > 1) {
+		#dim Laatste2Woorden As %String = $Piece(CustName," ",Occurrences)_" "_$Piece(CustName," ",Occurrences + 1)
+		If (##class(APPS.common.enu.JuridischeVorm).IsValid(Laatste2Woorden)) {
+			Set Aanspreking = Laatste2Woorden
+		} ElseIf (##class(APPS.common.enu.JuridischeVorm).IsValid(LaatsteWoord)) {
+				Set Aanspreking = LaatsteWoord
+		}
+	} ElseIf (Occurrences = 1) {
+		If (##class(APPS.common.enu.JuridischeVorm).IsValid(LaatsteWoord)) {
+			Set Aanspreking = LaatsteWoord
+		} 
+	}
+	
+	Set NettoCustName = ##class(TECH.StringUtils).RightTrim($Extract(CustName,1,*-$Length(Aanspreking)))
+	#dim Eerste28Karakters As %String = $Extract(NettoCustName,1,28)
+	
+	If (($Length(NettoCustName) <= 28) || ($Extract(NettoCustName,29) = " ")) {
 		Set Naam = Eerste28Karakters
-		Set Toenaam = ##class(TECH.StringUtils).LeftTrim($Extract(Name,29,*))
+		Set Toenaam = ##class(TECH.StringUtils).LeftTrim($Extract(NettoCustName,29,*))
 	} Else {
 		Set Naam = $Reverse($Extract($Reverse(Eerste28Karakters),$Find($Reverse(Eerste28Karakters)," "),*))
-		Set Toenaam = ##class(TECH.StringUtils).LeftTrim($Extract(Name,$Length(Naam)+1,*))
+		Set Toenaam = ##class(TECH.StringUtils).LeftTrim($Extract(NettoCustName,$Length(Naam)+1,*))
 	}
 	If ($Length(Toenaam) > 28) {
-		Do ..Logger.Warning("Klant synchronizatie AX - Admin","De maximale veldlengte voor Toenaam is 28. Lengte Toenaam voor '"_Name_"' is '"_$Length(Toenaam)_"'")
+		Do ..Logger.Warning("Klant synchronizatie AX - Admin","De maximale veldlengte voor Toenaam is 28. Lengte Toenaam voor '"_CustName_"' is '"_$Length(Toenaam)_"'")
 		Set Toenaam = $Extract(Toenaam,1,28)
 	}
 	
-	Quit Naam_"||"_Toenaam
+	Quit Naam_"||"_Toenaam_"||"_Aanspreking
 ]]></Implementation>
 </Method>
 </Class>