Index: vhUnitTest/APPS/EC/Winkelkar/impl/LijnPrijsBepaler/Process/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/APPS/EC/Winkelkar/impl/LijnPrijsBepaler/Process/Test.cls.xml	(revision 0)
+++ vhUnitTest/APPS/EC/Winkelkar/impl/LijnPrijsBepaler/Process/Test.cls.xml	(revision 32678)
@@ -0,0 +1,99 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.APPS.EC.Winkelkar.impl.LijnPrijsBepaler.Process.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Property name="LijnPrijsBepaler">
+<Type>APPS.EC.Winkelkar.impl.LijnPrijsBepaler</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="MaatwerkLijn">
+<Type>APPS.EC.Winkelkar.dto.MaatwerkLijn</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="OnBeforeOneTest">
+<FormalSpec>aTestName:%String</FormalSpec>
+<Implementation><![CDATA[
+	do ##super(aTestName)
+	Set ..LijnPrijsBepaler = ##class(APPS.EC.Winkelkar.impl.LijnPrijsBepaler).%New()
+	Set ..MaatwerkLijn = ..MaakMaatwerkLijn()
+]]></Implementation>
+</Method>
+
+<Method name="TestGeenWebShopSessieGeenPrijs">
+<Implementation><![CDATA[
+	#dim KlantID As DOM.VKP.KlantID = ""
+	
+	Do ..LijnPrijsBepaler.Process(..MaatwerkLijn, KlantID)
+	
+	Do $$$AssertEquals(..MaatwerkLijn.EenheidPrijs,"")
+]]></Implementation>
+</Method>
+
+<Method name="TestWebShopSessie">
+<Implementation><![CDATA[
+	#dim KlantID As DOM.VKP.KlantID = ""
+	
+	Do ..LijnPrijsBepaler.Process(..MaatwerkLijn, KlantID)
+	
+	Do $$$AssertEquals(..MaatwerkLijn.EenheidPrijs,"")
+]]></Implementation>
+</Method>
+
+<Method name="MaakMaatwerkLijn">
+<Private>1</Private>
+<ReturnType>APPS.EC.Winkelkar.dto.MaatwerkLijn</ReturnType>
+<Implementation><![CDATA[
+	#dim MaatwerkLijn As APPS.EC.Winkelkar.dto.MaatwerkLijn = ##class(APPS.EC.Winkelkar.dto.MaatwerkLijn).%New()
+	
+	Set MaatwerkLijn.IngegevenKenmerken = ""
+	
+	Quit MaatwerkLijn
+]]></Implementation>
+</Method>
+
+<UDLText name="T">
+<Content><![CDATA[
+/*
+
+
+
+///Property PrijsBerekeningPrijsBepaler As APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler [ Private ];
+
+Property TAORKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken [ Private ];
+
+Property VerkoopPrijsBepalerMock As vhTest.Mock.APPS.EC.VerkoopPrijsBepaler [ Private ];
+
+Property VerkoopPrijsInfo As DOM.VKP.info.VerkoopPrijsInfo [ Private ];
+
+
+Method OnBeforeOneTest(aTestName As %String)
+{
+	do ##super(aTestName)
+	
+	set ..TAORKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).StandaardLade()
+	set ..VerkoopPrijsBepalerMock = ##class(vhTest.Mock.APPS.EC.VerkoopPrijsBepaler).%New()
+	//set ..PrijsBerekeningPrijsBepaler = ##class(APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBerekeningPrijsBepaler).%New(..VerkoopPrijsBepalerMock)
+}
+
+Method "Test: IngegevenKenmerkenAPI wordt opgeroepen"()
+{
+	set ..VerkoopPrijsInfo = ##class(vhTest.Dummy.DOM.VKP.info.VerkoopPrijsInfo).Create(..EenheidPrijs, $$$DummyInteger, $$$DummyInteger, ..GeefPersonality().GeefID(), ..GeefKlantID())
+	do ..VerkoopPrijsBepalerMock.IndienMethodCall("BepaalVerkoopPrijs", ..TAORKenmerken, $$$DummyInteger, ..GeefPersonality().GeefID(), ..GeefKlantID()).DanReturn(..VerkoopPrijsInfo)
+}
+
+
+Method GeefPersonality() As DOM.common.Personality [ Private ]
+{
+	quit ##class(DOM.common.VanHoeckePersonality).Instance()
+}
+
+*/
+]]></Content>
+</UDLText>
+</Class>
+
+
+</Export>