Index: APPS/EC/Winkelkar/WinkelkarService/impl/PrijsFactorBepalerFactory.cls.xml
===================================================================
diff -u -r55425 -r57716
--- APPS/EC/Winkelkar/WinkelkarService/impl/PrijsFactorBepalerFactory.cls.xml	(.../PrijsFactorBepalerFactory.cls.xml)	(revision 55425)
+++ APPS/EC/Winkelkar/WinkelkarService/impl/PrijsFactorBepalerFactory.cls.xml	(.../PrijsFactorBepalerFactory.cls.xml)	(revision 57716)
@@ -88,6 +88,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkBeslagteknikk">
+<FormalSpec>BeslagteknikkPersonality:DOM.common.BeslagteknikkPersonality</FormalSpec>
+<Implementation><![CDATA[	Set ..PrijsFactorBepaler = ##class(APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBepaler.BeslagteknikkPrijsFactorBepaler).%New()
+]]></Implementation>
+</Method>
+
 <Method name="VerwerkZweygart">
 <FormalSpec>ZweygartPersonality:DOM.common.ZweygartPersonality</FormalSpec>
 <Implementation><![CDATA[	Set ..PrijsFactorBepaler = ##class(APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBepaler.ZweygartPrijsFactorBepaler).%New()
Index: vhTest/Mock/APPS/EC/Winkelkar/WinkelkarService/impl/PrijsBerekeningPrijsBepaler.cls.xml
===================================================================
diff -u -r55423 -r57716
--- vhTest/Mock/APPS/EC/Winkelkar/WinkelkarService/impl/PrijsBerekeningPrijsBepaler.cls.xml	(.../PrijsBerekeningPrijsBepaler.cls.xml)	(revision 55423)
+++ vhTest/Mock/APPS/EC/Winkelkar/WinkelkarService/impl/PrijsBerekeningPrijsBepaler.cls.xml	(.../PrijsBerekeningPrijsBepaler.cls.xml)	(revision 57716)
@@ -28,6 +28,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkBeslagteknikk">
+<FormalSpec>BeslagteknikkPersonality:DOM.common.BeslagteknikkPersonality</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("VerwerkBeslagteknikk",BeslagteknikkPersonality)
+]]></Implementation>
+</Method>
+
 <Method name="VerwerkDaro">
 <FormalSpec>DaroPersonality:DOM.common.DaroPersonality</FormalSpec>
 <Implementation><![CDATA[	do ..VerwerkMethodCall("VerwerkDaro",DaroPersonality)
Index: APPS/EC/Winkelkar/impl/VerkoopPrijsMuntBepaler.cls.xml
===================================================================
diff -u -r52719 -r57716
--- APPS/EC/Winkelkar/impl/VerkoopPrijsMuntBepaler.cls.xml	(.../VerkoopPrijsMuntBepaler.cls.xml)	(revision 52719)
+++ APPS/EC/Winkelkar/impl/VerkoopPrijsMuntBepaler.cls.xml	(.../VerkoopPrijsMuntBepaler.cls.xml)	(revision 57716)
@@ -48,6 +48,12 @@
 <Implementation><![CDATA[	Set ..Munt=##class(DOM.enu.Munt).SEK()
 ]]></Implementation>
 </Method>
+
+<Method name="VerwerkBeslagteknikk">
+<FormalSpec>BeslagteknikkPersonality:DOM.common.BeslagteknikkPersonality</FormalSpec>
+<Implementation><![CDATA[	Set ..Munt=##class(DOM.enu.Munt).NOK()
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: APPS/EC/Winkelkar/WinkelkarService/impl/PrijsBerekeningPrijsBepaler.cls.xml
===================================================================
diff -u -r55423 -r57716
--- APPS/EC/Winkelkar/WinkelkarService/impl/PrijsBerekeningPrijsBepaler.cls.xml	(.../PrijsBerekeningPrijsBepaler.cls.xml)	(revision 55423)
+++ APPS/EC/Winkelkar/WinkelkarService/impl/PrijsBerekeningPrijsBepaler.cls.xml	(.../PrijsBerekeningPrijsBepaler.cls.xml)	(revision 57716)
@@ -191,16 +191,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="VerwerkBeslagDesign">
-<FormalSpec>BeslagDesignPersonality:DOM.common.BeslagDesignPersonality</FormalSpec>
-<Implementation><![CDATA[
-	#dim LeverancierData As DOM.common.LeverancierPersonalityData = BeslagDesignPersonality.GeefLeverancierData()
-	Set ..AankoopPrijs = ..GeefVerkoopPrijs(..PersonalityRepo.GeefViaID(LeverancierData.PersonalityId),LeverancierData.EigenKlantId)
-	Set ..VerkoopPrijs = ..GeefEindklantEenheidsPrijs(BeslagDesignPersonality,..Winkelkar.GeefKlantID())
-	Set ..LijstPrijs = ..GeefBrutoPrijs(..Winkelkar.GeefPersonality(), ..Winkelkar.GeefKlantID())
-]]></Implementation>
-</Method>
-
 <Method name="VerwerkZweygart">
 <FormalSpec>ZweygartPersonality:DOM.common.ZweygartPersonality</FormalSpec>
 <Implementation><![CDATA[
@@ -241,6 +231,26 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkBeslagDesign">
+<FormalSpec>BeslagDesignPersonality:DOM.common.BeslagDesignPersonality</FormalSpec>
+<Implementation><![CDATA[
+	#dim LeverancierData As DOM.common.LeverancierPersonalityData = BeslagDesignPersonality.GeefLeverancierData()
+	Set ..AankoopPrijs = ..GeefVerkoopPrijs(..PersonalityRepo.GeefViaID(LeverancierData.PersonalityId),LeverancierData.EigenKlantId)
+	Set ..VerkoopPrijs = ..GeefEindklantEenheidsPrijs(BeslagDesignPersonality,..Winkelkar.GeefKlantID())
+	Set ..LijstPrijs = ..GeefBrutoPrijs(..Winkelkar.GeefPersonality(), ..Winkelkar.GeefKlantID())
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkBeslagteknikk">
+<FormalSpec>BeslagteknikkPersonality:DOM.common.BeslagteknikkPersonality</FormalSpec>
+<Implementation><![CDATA[
+	#dim LeverancierData As DOM.common.LeverancierPersonalityData = BeslagteknikkPersonality.GeefLeverancierData()
+	Set ..AankoopPrijs = ..GeefVerkoopPrijs(..PersonalityRepo.GeefViaID(LeverancierData.PersonalityId),LeverancierData.EigenKlantId)
+	Set ..LijstPrijs = ..GeefEchteLijstPrijs()
+	Set ..VerkoopPrijs = ..GeefLijstPrijsInclKortingEnFactor(BeslagteknikkPersonality,..Winkelkar.KlantID)
+]]></Implementation>
+</Method>
+
 <Method name="GeefLijstPrijs">
 <FormalSpec>Personality:DOM.common.Personality</FormalSpec>
 <Private>1</Private>
@@ -256,6 +266,17 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefEchteLijstPrijs">
+<Private>1</Private>
+<ReturnType>%Decimal</ReturnType>
+<Implementation><![CDATA[
+	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = ..MaatwerkLijn.GeefIngegevenKenmerken()
+	#dim Aantal As %Integer = ..GeefAantal()
+	#dim VerkoopPrijsInfo As DOM.VKP.info.VerkoopPrijsInfo = ..VerkoopPrijsBepaler.BepaalVerkoopPrijs(IngegevenKenmerken, Aantal, ##class(DOM.common.enu.Personality).VanHoecke(), ##class(DOM.VKP.enu.Klant).LijstPrijsKlant())
+	Quit VerkoopPrijsInfo.GeefLijstPrijs()
+]]></Implementation>
+</Method>
+
 <Method name="GeefLijstPrijsInclKorting">
 <FormalSpec>Personality:DOM.common.Personality,KlantId:%String</FormalSpec>
 <Private>1</Private>
Index: APPS/EC/Winkelkar/WinkelkarService/impl/PrijsBepaler/BeslagteknikkPrijsFactorBepaler.cls.xml
===================================================================
diff -u
--- APPS/EC/Winkelkar/WinkelkarService/impl/PrijsBepaler/BeslagteknikkPrijsFactorBepaler.cls.xml	(revision 0)
+++ APPS/EC/Winkelkar/WinkelkarService/impl/PrijsBepaler/BeslagteknikkPrijsFactorBepaler.cls.xml	(revision 57716)
@@ -0,0 +1,19 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBepaler.BeslagteknikkPrijsFactorBepaler">
+<Super>TECH.RegisteredObject,APPS.EC.Winkelkar.WinkelkarService.PrijsFactorBepaler</Super>
+
+<Method name="GeefPrijsFactor">
+<FormalSpec>MaatwerkLijn:DOM.EC.Winkelkar.MaatwerkLijn</FormalSpec>
+<ReturnType>%Numeric</ReturnType>
+<Implementation><![CDATA[
+	#dim ValutaFactor As %Numeric = 10
+	#dim Markup As %Numeric = 0.6
+	
+	Quit ValutaFactor / Markup
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Fake/APPS/EC/Winkelkar/WinkelkarService/impl/PrijsBerekeningPrijsBepaler.cls.xml
===================================================================
diff -u -r56421 -r57716
--- vhTest/Fake/APPS/EC/Winkelkar/WinkelkarService/impl/PrijsBerekeningPrijsBepaler.cls.xml	(.../PrijsBerekeningPrijsBepaler.cls.xml)	(revision 56421)
+++ vhTest/Fake/APPS/EC/Winkelkar/WinkelkarService/impl/PrijsBerekeningPrijsBepaler.cls.xml	(.../PrijsBerekeningPrijsBepaler.cls.xml)	(revision 57716)
@@ -21,6 +21,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkBeslagteknikk">
+<FormalSpec>BeslagteknikkPersonality:DOM.common.BeslagteknikkPersonality</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
 <Method name="VerwerkFerexpert">
 <FormalSpec>FerexpertPersonality:DOM.common.FerexpertPersonality</FormalSpec>
 <Implementation><![CDATA[]]></Implementation>