Index: vhUnitTest/WS/EC/Unishop/InternationaleZending/impl/TransportFirmaBepalerFactory/GeefTransportFirmaBepaler/Test.cls.xml
===================================================================
diff -u -r37401 -r37418
--- vhUnitTest/WS/EC/Unishop/InternationaleZending/impl/TransportFirmaBepalerFactory/GeefTransportFirmaBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 37401)
+++ vhUnitTest/WS/EC/Unishop/InternationaleZending/impl/TransportFirmaBepalerFactory/GeefTransportFirmaBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 37418)
@@ -76,59 +76,58 @@
 
 <Method name="Test: geeft TransportFirmaBepaler geeft de juiste TransportFirmaBepaler voor de overeenkomstige klant">
 <Implementation><![CDATA[
-	#dim VerwachteBepaler As %ListOfDataTypes = ##class(%ListOfDataTypes).%New()
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).Keller())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).VanHoecke())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).TestklantVanHoecke())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).Bruynzeel())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).HaefeleBelgie())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).HaefeleNederland())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).OptimaPack())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).NordInox())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).Halux())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).NewSobelwood())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).SFS())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).Tulp())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).DeceuninckDeforce())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).GroupNivelles())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).NevesBelgium())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).DMLine())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).KastID())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).FranssenProducts())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).FranssenTrading())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).MeubelBeslagHolland())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).DeDecker())
-	Do VerwachteBepaler.InsertAt(..HeinTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).Hein())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).VanRaemdonck())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).Noteborn())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).LijstPrijsKlant())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).RabatPrijsKlant())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).SpilPrijsKlant())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).ConsumentVoorVhisieKlant())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).HoutenLaden())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).Planofurn())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).Intracto())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).HeylenJos())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).DKGDeKeukenfabriek())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).VanLaer())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).WilsInterieurbouw())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).Jongen())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).VOLUX())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).DiboDesign())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).SegersInterieur())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).Uytterhoeven())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).ThononKitchencenter())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).DaroFactors())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).SeboKinteque())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).TheyssensKeukens())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).KvikNL())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).KvikBE())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).BlumPortugal())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).MiwaInterieurs())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).FransenMarius())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).Strakk())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).LenssenProduktie())
-	Do VerwachteBepaler.InsertAt(..VanHoeckeTransportFirmaBepalerClassName,##class(DOM.VKP.enu.Klant).MiBois())
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).Keller()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).VanHoecke()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).TestklantVanHoecke()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).Bruynzeel()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).HaefeleBelgie()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).HaefeleNederland()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).OptimaPack()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).NordInox()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).Halux()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).NewSobelwood()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).SFS()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).Tulp()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).DeceuninckDeforce()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).GroupNivelles()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).NevesBelgium()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).DMLine()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).KastID()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).FranssenProducts()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).FranssenTrading()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).MeubelBeslagHolland()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).DeDecker()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).Hein()) = ..HeinTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).VanRaemdonck()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).Noteborn()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).LijstPrijsKlant()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).RabatPrijsKlant()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).SpilPrijsKlant()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).ConsumentVoorVhisieKlant()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).HoutenLaden()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).Planofurn()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).Intracto()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).HeylenJos()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).DKGDeKeukenfabriek()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).VanLaer()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).WilsInterieurbouw()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).Jongen()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).VOLUX()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).DiboDesign()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).SegersInterieur()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).Uytterhoeven()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).ThononKitchencenter()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).DaroFactors()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).SeboKinteque()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).TheyssensKeukens()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).KvikNL()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).KvikBE()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).BlumPortugal()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).MiwaInterieurs()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).FransenMarius()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).Strakk()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).LenssenProduktie()) = ..VanHoeckeTransportFirmaBepalerClassName
+	Set VerwachteBepaler(##class(DOM.VKP.enu.Klant).MiBois()) = ..VanHoeckeTransportFirmaBepalerClassName
 
 	#dim TransportFirmaBepalerFactory As WS.EC.Unishop.InternationaleZending.impl.TransportFirmaBepalerFactory
 	Set TransportFirmaBepalerFactory = ##class(WS.EC.Unishop.InternationaleZending.impl.TransportFirmaBepalerFactory).%New()
@@ -138,7 +137,7 @@
 	{
 		#dim KlantID As DOM.common.enu.Personality = KlantIterator.Next()
 		#dim Sessie As WSimpl.Unishop.dto.Sessie = ##class(WSimpl.Unishop.dto.Sessie).%New("",KlantID)
-		Do $$$AssertEquals(TransportFirmaBepalerFactory.GeefTransportFirmaBepaler(Sessie).%ClassName(1), VerwachteBepaler.GetAt(KlantID))
+		Do $$$AssertEquals(TransportFirmaBepalerFactory.GeefTransportFirmaBepaler(Sessie).%ClassName(1), VerwachteBepaler(KlantID))
 	}
 ]]></Implementation>
 </Method>