Index: vhTestFiles/IntegratieTests/Webshop.Offerte.IngaveTotBestelling/Test/HaefeleBE/HaefeleBEMetKorting/HaefeleBEGebruikerMetKorting/PostMessage001.txt
===================================================================
diff -u -r45936 -r46857
--- vhTestFiles/IntegratieTests/Webshop.Offerte.IngaveTotBestelling/Test/HaefeleBE/HaefeleBEMetKorting/HaefeleBEGebruikerMetKorting/PostMessage001.txt	(.../PostMessage001.txt)	(revision 45936)
+++ vhTestFiles/IntegratieTests/Webshop.Offerte.IngaveTotBestelling/Test/HaefeleBE/HaefeleBEMetKorting/HaefeleBEGebruikerMetKorting/PostMessage001.txt	(.../PostMessage001.txt)	(revision 46857)
@@ -11,7 +11,7 @@
   <CUSTOMER_ORDERREF>DummyOrderReferentie</CUSTOMER_ORDERREF>
   <CUSTOMER_ID>1001MetKorting</CUSTOMER_ID>
   <CUSTOMER_NAME>HaefeleBE_KlantMetKorting</CUSTOMER_NAME>
-  <PURCHASEPRICE munt="EUR">216.77</PURCHASEPRICE>
+  <PURCHASEPRICE munt="EUR">289.02</PURCHASEPRICE>
   <SELLINGPRICE munt="EUR">361.28</SELLINGPRICE>
   <SELLINGPRICE_MARKUP>0</SELLINGPRICE_MARKUP>
   <TOTALQTY>4</TOTALQTY>
@@ -23,7 +23,7 @@
     <LINE_CUSTREF></LINE_CUSTREF>
     <QTY>1</QTY>
     <SELLPRICE munt="EUR">72.95</SELLPRICE>
-    <BUYPRICE munt="EUR">43.77</BUYPRICE>
+    <BUYPRICE munt="EUR">58.36</BUYPRICE>
     <DESIGNCODE>LBX_Pure</DESIGNCODE>
     <DESIGNCODE_TXT>LEGRABOX pure</DESIGNCODE_TXT>
     <DESIGN_TXT>Orion grijs</DESIGN_TXT>
@@ -63,7 +63,7 @@
     <LINE_CUSTREF></LINE_CUSTREF>
     <QTY>1</QTY>
     <SELLPRICE munt="EUR">152.85</SELLPRICE>
-    <BUYPRICE munt="EUR">91.71</BUYPRICE>
+    <BUYPRICE munt="EUR">122.28</BUYPRICE>
     <DESIGNCODE>LBX_Pure</DESIGNCODE>
     <DESIGNCODE_TXT>LEGRABOX pure</DESIGNCODE_TXT>
     <DESIGN_TXT>Inox Geborsteld</DESIGN_TXT>
@@ -109,7 +109,7 @@
     <LINE_CUSTREF></LINE_CUSTREF>
     <QTY>1</QTY>
     <SELLPRICE munt="EUR">62.91</SELLPRICE>
-    <BUYPRICE munt="EUR">37.74</BUYPRICE>
+    <BUYPRICE munt="EUR">50.32</BUYPRICE>
     <DESIGNCODE>TAOR</DESIGNCODE>
     <DESIGNCODE_TXT>TA'OR BOX</DESIGNCODE_TXT>
     <DESIGN_TXT>Wit</DESIGN_TXT>
@@ -164,7 +164,7 @@
     <LINE_CUSTREF></LINE_CUSTREF>
     <QTY>1</QTY>
     <SELLPRICE munt="EUR">72.57</SELLPRICE>
-    <BUYPRICE munt="EUR">43.55</BUYPRICE>
+    <BUYPRICE munt="EUR">58.06</BUYPRICE>
     <DESIGNCODE>TAOR</DESIGNCODE>
     <DESIGNCODE_TXT>TA'OR BOX</DESIGNCODE_TXT>
     <DESIGN_TXT>Wit</DESIGN_TXT>
Index: APPS/EC/Winkelkar/WinkelkarService/impl/PrijsBerekeningPrijsBepaler.cls.xml
===================================================================
diff -u -r46856 -r46857
--- APPS/EC/Winkelkar/WinkelkarService/impl/PrijsBerekeningPrijsBepaler.cls.xml	(.../PrijsBerekeningPrijsBepaler.cls.xml)	(revision 46856)
+++ APPS/EC/Winkelkar/WinkelkarService/impl/PrijsBerekeningPrijsBepaler.cls.xml	(.../PrijsBerekeningPrijsBepaler.cls.xml)	(revision 46857)
@@ -23,6 +23,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="PersonalityRepo">
+<Type>DOM.common.impl.PersonalityRepository</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="Winkelkar">
 <Type>DOM.EC.Winkelkar.Winkelkar</Type>
 <Private>1</Private>
@@ -54,6 +59,7 @@
 	Set ..PrijsFactorBepalerFactory = $$$Inject(PrijsFactorBepalerFactory, ##class(APPS.EC.Winkelkar.WinkelkarService.impl.PrijsFactorBepalerFactory).%New())
 	Set ..KortingBepaler = $$$Inject(KortingBepaler, ##class(APPS.EC.Winkelkar.WinkelkarService.impl.KortingBepaler).%New())
 	Set ..IngegevenKenmerkenTypeAPI = ##class(DOM.PM.Maatwerk.impl.IngegevenKenmerkenTypeAPI).%New()
+	set ..PersonalityRepo = ##class(DOM.common.impl.PersonalityRepository).%New()
 	
 	Quit $$$OK
 ]]></Implementation>
@@ -91,71 +97,80 @@
 <Method name="VerwerkSFS">
 <FormalSpec>SFSPersonality:DOM.common.SFSPersonality</FormalSpec>
 <Implementation><![CDATA[
-	set ..AankoopPrijs = ..GeefVerkoopPrijs(SFSPersonality,..Winkelkar.GeefKlantID())
+	#dim LeverancierData As DOM.common.LeverancierPersonalityData = SFSPersonality.GeefLeverancierData()
+	set ..AankoopPrijs = ..GeefVerkoopPrijs(..PersonalityRepo.GeefViaID(LeverancierData.PersonalityId),LeverancierData.EigenKlantId)
 	set ..VerkoopPrijs = ..GeefEindklantEenheidsPrijs(SFSPersonality,..Winkelkar.GeefKlantID())
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkHaefeleBE">
 <FormalSpec>HaefeleBEPersonality:DOM.common.HaefeleBEPersonality</FormalSpec>
 <Implementation><![CDATA[
-	set ..AankoopPrijs = ..GeefVerkoopPrijs(HaefeleBEPersonality,..Winkelkar.GeefKlantID())
+	#dim LeverancierData As DOM.common.LeverancierPersonalityData = HaefeleBEPersonality.GeefLeverancierData()
+	set ..AankoopPrijs = ..GeefVerkoopPrijs(..PersonalityRepo.GeefViaID(LeverancierData.PersonalityId),LeverancierData.EigenKlantId)
 	set ..VerkoopPrijs = ..GeefLijstPrijsInclKorting(HaefeleBEPersonality,..Winkelkar.GeefKlantID())
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkHaefeleNL">
 <FormalSpec>HaefeleNLPersonality:DOM.common.HaefeleNLPersonality</FormalSpec>
 <Implementation><![CDATA[
-	set ..AankoopPrijs = ..GeefVerkoopPrijs(HaefeleNLPersonality,..Winkelkar.GeefKlantID())
+	#dim LeverancierData As DOM.common.LeverancierPersonalityData = HaefeleNLPersonality.GeefLeverancierData()
+	set ..AankoopPrijs = ..GeefVerkoopPrijs(..PersonalityRepo.GeefViaID(LeverancierData.PersonalityId),LeverancierData.EigenKlantId)
 	set ..VerkoopPrijs = ..GeefLijstPrijsInclKorting(HaefeleNLPersonality,..Winkelkar.GeefKlantID())
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkDestil">
 <FormalSpec>DestilPersonality:DOM.common.DestilPersonality</FormalSpec>
 <Implementation><![CDATA[
-	set ..AankoopPrijs = ..GeefVerkoopPrijs(DestilPersonality,..Winkelkar.GeefKlantID())
+	#dim LeverancierData As DOM.common.LeverancierPersonalityData = DestilPersonality.GeefLeverancierData()
+	set ..AankoopPrijs = ..GeefVerkoopPrijs(..PersonalityRepo.GeefViaID(LeverancierData.PersonalityId),LeverancierData.EigenKlantId)
 	set ..VerkoopPrijs = ..GeefLijstPrijsInclKorting(DestilPersonality,..Winkelkar.GeefKlantID())
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkDupont">
 <FormalSpec>DupontPersonality:DOM.common.DupontPersonality</FormalSpec>
 <Implementation><![CDATA[
-	set ..AankoopPrijs = ..GeefVerkoopPrijs(DupontPersonality,..Winkelkar.GeefKlantID())
+	#dim LeverancierData As DOM.common.LeverancierPersonalityData = DupontPersonality.GeefLeverancierData()
+	set ..AankoopPrijs = ..GeefVerkoopPrijs(..PersonalityRepo.GeefViaID(LeverancierData.PersonalityId),LeverancierData.EigenKlantId)
 	set ..VerkoopPrijs = ..GeefLijstPrijsInclKorting(DupontPersonality,..Winkelkar.GeefKlantID())
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkKisch">
 <FormalSpec>KischPersonality:DOM.common.KischPersonality</FormalSpec>
 <Implementation><![CDATA[
-	set ..AankoopPrijs = ..GeefVerkoopPrijs(KischPersonality,..Winkelkar.GeefKlantID())
+	#dim LeverancierData As DOM.common.LeverancierPersonalityData = KischPersonality.GeefLeverancierData()
+	set ..AankoopPrijs = ..GeefVerkoopPrijs(..PersonalityRepo.GeefViaID(LeverancierData.PersonalityId),LeverancierData.EigenKlantId)
 	set ..VerkoopPrijs = ..GeefLijstPrijsInclKorting(KischPersonality,..Winkelkar.GeefKlantID())
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkVanRaemdonck">
 <FormalSpec>VanRaemdonckPersonality:DOM.common.VanRaemdonckPersonality</FormalSpec>
 <Implementation><![CDATA[
-	set ..AankoopPrijs = ..GeefVerkoopPrijs(VanRaemdonckPersonality,..Winkelkar.GeefKlantID())
+	#dim LeverancierData As DOM.common.LeverancierPersonalityData = VanRaemdonckPersonality.GeefLeverancierData()
+	set ..AankoopPrijs = ..GeefVerkoopPrijs(..PersonalityRepo.GeefViaID(LeverancierData.PersonalityId),LeverancierData.EigenKlantId)
 	set ..VerkoopPrijs = ..GeefLijstPrijsInclKorting(VanRaemdonckPersonality,..Winkelkar.GeefKlantID())
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkDaro">
 <FormalSpec>DaroPersonality:DOM.common.DaroPersonality</FormalSpec>
 <Implementation><![CDATA[
-	set ..AankoopPrijs = ..GeefVerkoopPrijs(DaroPersonality,..Winkelkar.GeefKlantID())
+	#dim LeverancierData As DOM.common.LeverancierPersonalityData = DaroPersonality.GeefLeverancierData()
+	set ..AankoopPrijs = ..GeefVerkoopPrijs(..PersonalityRepo.GeefViaID(LeverancierData.PersonalityId),LeverancierData.EigenKlantId)
 	set ..VerkoopPrijs = ..GeefEindklantEenheidsPrijs(DaroPersonality,..Winkelkar.GeefKlantID())
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkHein">
 <FormalSpec>HeinPersonality:DOM.common.HeinPersonality</FormalSpec>
 <Implementation><![CDATA[
-	Set ..AankoopPrijs = ..GeefVerkoopPrijs(HeinPersonality,..Winkelkar.GeefKlantID())
+	#dim LeverancierData As DOM.common.LeverancierPersonalityData = HeinPersonality.GeefLeverancierData()
+	set ..AankoopPrijs = ..GeefVerkoopPrijs(..PersonalityRepo.GeefViaID(LeverancierData.PersonalityId),LeverancierData.EigenKlantId)
 	set ..VerkoopPrijs = ..GeefEindklantEenheidsPrijs(HeinPersonality,..Winkelkar.GeefKlantID())
 ]]></Implementation>
 </Method>