Index: vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml
===================================================================
diff -u -r37930 -r37932
--- vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml	(.../Test.cls.xml)	(revision 37930)
+++ vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml	(.../Test.cls.xml)	(revision 37932)
@@ -69,7 +69,7 @@
 	Do ..Partij.IndienMethodCall("GeefToenaam").DanReturn("Een toenaam die zeker meer dan 50 karakters lang zou moeten zijn")
 	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)	
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	#dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID())
 	
 	Do $$$AssertEquals(GeconverteerdeKlant.Toenaam,"Een toenaam die zeker meer dan 50 karakters lang z")
 ]]></Implementation>
@@ -83,7 +83,7 @@
 	Do ..Partij.IndienMethodCall("GeefVerkortNummer").DanReturn("7001")
 	Do ..Partij.IndienMethodCall("GeefEmail").DanReturn("info@example.com")
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	#dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID())
 	
 	Do $$$AssertEquals(GeconverteerdeKlant.Klantnummer,"01234")
 	Do $$$AssertEquals(GeconverteerdeKlant.Naam,"DE NAAM")
@@ -126,7 +126,7 @@
 	
 	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	#dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID())
 	
 	Do $$$AssertEquals(GeconverteerdeKlant.Telefoon,"03/1234899")
 ]]></Implementation>
@@ -139,7 +139,7 @@
 	
 	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	#dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID())
 	
 	Do $$$AssertEquals(GeconverteerdeKlant.Telefoon,"03/987654")
 ]]></Implementation>
@@ -149,7 +149,7 @@
 <Implementation><![CDATA[
 	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	#dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID())
 	
 	Do $$$AssertEquals(GeconverteerdeKlant.RelatieType,"3")
 ]]></Implementation>
@@ -161,7 +161,7 @@
 	
 	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	#dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID())
 	
 	Do $$$AssertEquals(GeconverteerdeKlant.Status,"1")
 ]]></Implementation>
@@ -173,7 +173,7 @@
 	
 	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	#dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID())
 	
 	Do $$$AssertEquals(GeconverteerdeKlant.Status,"0")
 ]]></Implementation>
@@ -185,7 +185,7 @@
 	
 	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	#dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID())
 	
 	Do $$$AssertEquals(GeconverteerdeKlant.Status,"0")
 ]]></Implementation>
@@ -197,7 +197,7 @@
 	
 	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	#dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID())
 	
 	Do $$$AssertEquals(GeconverteerdeKlant.Activiteit,"969950000")
 ]]></Implementation>
@@ -209,7 +209,7 @@
 	
 	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	#dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID())
 	
 	Do $$$AssertEquals(GeconverteerdeKlant.Activiteit,"969950021")
 ]]></Implementation>
@@ -221,7 +221,7 @@
 	
 	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	#dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID())
 	
 	Do $$$AssertEquals(GeconverteerdeKlant.Activiteit,"969950021")
 ]]></Implementation>
@@ -233,7 +233,7 @@
 	
 	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	#dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID())
 	
 	Do $$$AssertEquals(GeconverteerdeKlant.Kwantitatief,"969950014")
 ]]></Implementation>
@@ -245,7 +245,7 @@
 	
 	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	#dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID())
 	
 	Do $$$AssertEquals(GeconverteerdeKlant.Kwantitatief,"969950014")
 ]]></Implementation>
@@ -257,7 +257,7 @@
 	
 	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	#dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID())
 	
 	Do $$$AssertEquals(GeconverteerdeKlant.Kwantitatief,"969950008")
 ]]></Implementation>
@@ -269,7 +269,7 @@
 	
 	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	#dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID())
 	
 	Do $$$AssertEquals(GeconverteerdeKlant.Kwaliteit,"969950001")
 ]]></Implementation>
@@ -281,7 +281,7 @@
 	
 	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	#dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID())
 	
 	Do $$$AssertEquals(GeconverteerdeKlant.Kwaliteit,"")
 ]]></Implementation>
@@ -294,7 +294,7 @@
 
 	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	#dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID())
 	
 	If $$$AssertEquals(GeconverteerdeKlant.Adressen.Count(),3) {
 		Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).Klantnummer,"01234")
@@ -328,7 +328,7 @@
 <Implementation><![CDATA[
 	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	#dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID())
 	
 	Do $$$AssertEquals(GeconverteerdeKlant.Adressen.Count(),1)
 ]]></Implementation>
@@ -340,7 +340,7 @@
 	
 	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	#dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID())
 	
 	If $$$AssertEquals(GeconverteerdeKlant.Adressen.Count(),2) {
 		Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).Klantnummer,"01234")
@@ -366,7 +366,7 @@
 	
 	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	#dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID())
 	
 	If $$$AssertEquals(GeconverteerdeKlant.Adressen.Count(),4) {
 		Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(1).LeveringAdres,$$$False)
@@ -400,7 +400,7 @@
 	
 	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	#dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID())
 	
 	If $$$AssertEquals(GeconverteerdeKlant.Adressen.Count(),2) {
 		Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).LandCodeISO3,"BEL")