Index: vhUnitTest/DOM/PM/impl/VerkoopPrijsBepaler/BepaalVerkoopPrijs/Test.cls.xml
===================================================================
diff -u -r39252 -r39411
--- vhUnitTest/DOM/PM/impl/VerkoopPrijsBepaler/BepaalVerkoopPrijs/Test.cls.xml	(.../Test.cls.xml)	(revision 39252)
+++ vhUnitTest/DOM/PM/impl/VerkoopPrijsBepaler/BepaalVerkoopPrijs/Test.cls.xml	(.../Test.cls.xml)	(revision 39411)
@@ -14,7 +14,7 @@
 	Set TbxKenmerken.LegacyKenmerken = LegacyKenmerken
 	
 	Set VerkoopPrijsBepaler = ##class(DOM.PM.impl.VerkoopPrijsBepaler).%New()
-	#dim VerkoopPrijs As %Numeric = VerkoopPrijsBepaler.BepaalVerkoopPrijs(TbxKenmerken, Aantal, ##class(DOM.common.enu.Personality).VanHoecke(), KlantID)
+	#dim VerkoopPrijs As %Numeric = VerkoopPrijsBepaler.BepaalVerkoopPrijs(TbxKenmerken, Aantal, ##class(DOM.common.enu.Personality).VanHoecke(), KlantID).GeefVerkoopPrijs()
 	
 	Do $$$AssertEquals(VerkoopPrijs,51.47)
 ]]></Implementation>
@@ -31,7 +31,7 @@
 	Set TbxKenmerken.LegacyKenmerken = LegacyKenmerken
 	
 	Set VerkoopPrijsBepaler = ##class(DOM.PM.impl.VerkoopPrijsBepaler).%New()
-	#dim VerkoopPrijs As %Numeric = VerkoopPrijsBepaler.BepaalVerkoopPrijs(TbxKenmerken, Aantal, ##class(DOM.common.enu.Personality).VanHoecke(), KlantID)
+	#dim VerkoopPrijs As %Numeric = VerkoopPrijsBepaler.BepaalVerkoopPrijs(TbxKenmerken, Aantal, ##class(DOM.common.enu.Personality).VanHoecke(), KlantID).GeefVerkoopPrijs()
 	
 	Do $$$AssertEquals(VerkoopPrijs,76.56)
 ]]></Implementation>
@@ -48,7 +48,7 @@
 	Set TbxKenmerken.LegacyKenmerken = LegacyKenmerken
 	
 	Set VerkoopPrijsBepaler = ##class(DOM.PM.impl.VerkoopPrijsBepaler).%New()
-	#dim VerkoopPrijs As %Numeric = VerkoopPrijsBepaler.BepaalVerkoopPrijs(TbxKenmerken, Aantal, ##class(DOM.common.enu.Personality).VanHoecke(), KlantID)
+	#dim VerkoopPrijs As %Numeric = VerkoopPrijsBepaler.BepaalVerkoopPrijs(TbxKenmerken, Aantal, ##class(DOM.common.enu.Personality).VanHoecke(), KlantID).GeefVerkoopPrijs()
 	
 	Do $$$AssertEquals(VerkoopPrijs,135.54)
 ]]></Implementation>
@@ -65,7 +65,7 @@
 	Set TbxKenmerken.LegacyKenmerken = LegacyKenmerken
 	
 	Set VerkoopPrijsBepaler = ##class(DOM.PM.impl.VerkoopPrijsBepaler).%New()
-	#dim VerkoopPrijs As %Numeric = VerkoopPrijsBepaler.BepaalVerkoopPrijs(TbxKenmerken, Aantal, ##class(DOM.common.enu.Personality).VanHoecke(), KlantID)
+	#dim VerkoopPrijs As %Numeric = VerkoopPrijsBepaler.BepaalVerkoopPrijs(TbxKenmerken, Aantal, ##class(DOM.common.enu.Personality).VanHoecke(), KlantID).GeefVerkoopPrijs()
 	
 	Do $$$AssertEquals(VerkoopPrijs,35.76)
 ]]></Implementation>
@@ -82,7 +82,7 @@
 	Set TbxKenmerken.LegacyKenmerken = LegacyKenmerken
 	
 	Set VerkoopPrijsBepaler = ##class(DOM.PM.impl.VerkoopPrijsBepaler).%New()
-	#dim VerkoopPrijs As %Numeric = VerkoopPrijsBepaler.BepaalVerkoopPrijs(TbxKenmerken, Aantal, ##class(DOM.common.enu.Personality).VanHoecke(), KlantID)
+	#dim VerkoopPrijs As %Numeric = VerkoopPrijsBepaler.BepaalVerkoopPrijs(TbxKenmerken, Aantal, ##class(DOM.common.enu.Personality).VanHoecke(), KlantID).GeefVerkoopPrijs()
 	
 	Do $$$AssertEquals(VerkoopPrijs,"58.60")
 ]]></Implementation>
Index: DOM/PM/impl/VerkoopPrijsBepaler.cls.xml
===================================================================
diff -u -r39082 -r39411
--- DOM/PM/impl/VerkoopPrijsBepaler.cls.xml	(.../VerkoopPrijsBepaler.cls.xml)	(revision 39082)
+++ DOM/PM/impl/VerkoopPrijsBepaler.cls.xml	(.../VerkoopPrijsBepaler.cls.xml)	(revision 39411)
@@ -52,7 +52,7 @@
 		Set Verkoopprijs = ..TbxHelper.BepaalVerkoopPrijs(IngegevenKenmerken.LegacyKenmerken, Aantal, KlantID)
 	}
 	
-	Quit Verkoopprijs
+	Quit ##class(DOM.VKP.info.VerkoopPrijsInfo).%New(,Verkoopprijs)
 ]]></Implementation>
 </Method>