Index: vhUnitTest/DOM/EC/Winkelkar/impl/LeverdatumBepaler/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/DOM/EC/Winkelkar/impl/LeverdatumBepaler/Test.cls.xml	(revision 0)
+++ vhUnitTest/DOM/EC/Winkelkar/impl/LeverdatumBepaler/Test.cls.xml	(revision 39870)
@@ -0,0 +1,66 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.DOM.EC.Winkelkar.impl.LeverdatumBepaler.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test: LeverdatumBepaler geeft per lijn een vroegste leverdatum terug">
+<Implementation><![CDATA[
+	Set VerzendWijzeBepaler = ##class(vhTest.Mock.APPS.EC.impl.VerzendWijzeBepaler).%New()
+	Set DateTimeApiMock = ##class(vhTest.Mock.TECH.DateTime.DateTimeAPI).%New()
+	Set LeveringsTermijnFactoryMock = ##class(vhTest.Mock.APPS.VKP.LeveringsTermijnFactory).%New()
+	
+	#Dim Winkelkar as DOM.EC.Winkelkar.Winkelkar = ##class(vhTest.Fake.DOM.EC.Winkelkar.Winkelkar).%New("WinkelkarID","DummyID")
+	Do Winkelkar.VoegToe(..MaakMaatwerkLijn("MaatwerkID1",##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).StandaardLade(),"MaatwerkProductID1", 1))
+	Do Winkelkar.VoegToe(..MaakMaatwerkLijn("MaatwerkID2",##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).StandaardBinnenlade(),"MaatwerkProductID2", 1))
+	
+	#Dim VerzendWijze as APPS.VKP.VerzendWijze
+	Set VerzendWijze = ##Class(vhTest.Utils.APPS.VKP.VerzendWijze).GeefVerzendWijze()
+	
+	#Dim CurrentDate as %Integer = 64331 ;17/2/2017
+	
+	Do VerzendWijzeBepaler.VerwachtMethodCall("GeefVerzendWijze",Winkelkar).DanReturn(VerzendWijze)
+	Do DateTimeApiMock.VerwachtMethodCall("CurrentHorolog").DanReturn(CurrentDate)
+	
+	Set LeveringsTermijnMock = ##class(vhTest.Mock.APPS.VKP.LeveringsTermijn).%New("",VerzendWijze)
+	Do LeveringsTermijnFactoryMock.VerwachtMethodCall("MaakLeveringsTermijn",CurrentDate, VerzendWijze).DanReturn(LeveringsTermijnMock)
+	Do LeveringsTermijnMock.VerwachtMethodCall("BinnenWelkeTermijnIsHetMaatwerkProductBeschikbaarBijVanHoecke","MaatwerkProductID1").DanReturn($ListBuild(2,"A")) 
+	Do LeveringsTermijnMock.VerwachtMethodCall("BinnenWelkeTermijnIsHetMaatwerkProductBeschikbaarBijVanHoecke","MaatwerkProductID2").DanReturn($ListBuild(3,"A")) 
+	Do LeveringsTermijnMock.VerwachtMethodCall("GetVroegsteDatumFromTermijn",$ListBuild(2,"A")).DanReturn(CurrentDate+2) 
+	Do LeveringsTermijnMock.VerwachtMethodCall("GetVroegsteDatumFromTermijn",$ListBuild(3,"A")).DanReturn(CurrentDate+3) 
+	Do LeveringsTermijnMock.VerwachtMethodCall("GetPickDatumMagazijnGesloten",64333).DanReturn(64333) 
+	Do LeveringsTermijnMock.VerwachtMethodCall("GetPickDatumMagazijnGesloten",64334).DanReturn(64334) 
+	Do LeveringsTermijnMock.VerwachtMethodCall("GetVroegsteLevering",64333).DanReturn( 64334)
+	Do LeveringsTermijnMock.VerwachtMethodCall("GetVroegsteLevering",64334).DanReturn( 64335)
+	
+	Set LeverdatumBepaler = ##class(DOM.EC.Winkelkar.impl.LeverdatumBepaler).%New(VerzendWijzeBepaler,DateTimeApiMock,LeveringsTermijnFactoryMock)	
+	#Dim Datums as %ArrayOfDataTypes = LeverdatumBepaler.GeefLeverdatumPerLijn(Winkelkar)
+	
+	Do $$$AssertEquals(Datums.Count(),2)
+	Do $$$AssertEquals(Datums.GetAt("MaatwerkID1"),64334)
+	Do $$$AssertEquals(Datums.GetAt("MaatwerkID2"),64335)
+	
+	
+	Do VerzendWijzeBepaler.Verifieer()
+	Do DateTimeApiMock.Verifieer()
+	Do LeveringsTermijnFactoryMock.Verifieer()
+	Do LeveringsTermijnMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="MaakMaatwerkLijn">
+<FormalSpec>ID:%String,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken,ProductID:%String,Aantal:%Integer</FormalSpec>
+<Private>1</Private>
+<ReturnType>vhTest.Fake.DOM.EC.Winkelkar.MaatwerkLijn</ReturnType>
+<Implementation><![CDATA[
+	#dim MaatwerkLijn = ##class(vhTest.Fake.DOM.EC.Winkelkar.MaatwerkLijn).%New("",ID)
+	Do MaatwerkLijn.ZetProductID(ProductID)
+	Do MaatwerkLijn.ZetIngegevenKenmerken(IngegevenKenmerken)
+	Do MaatwerkLijn.ZetAantal(Aantal)
+	
+	Quit MaatwerkLijn
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>