Index: APPS/EC/impl/VroegsteLeverdatumBepaler.cls.xml
===================================================================
diff -u -r40000 -r41107
--- APPS/EC/impl/VroegsteLeverdatumBepaler.cls.xml	(.../VroegsteLeverdatumBepaler.cls.xml)	(revision 40000)
+++ APPS/EC/impl/VroegsteLeverdatumBepaler.cls.xml	(.../VroegsteLeverdatumBepaler.cls.xml)	(revision 41107)
@@ -37,7 +37,12 @@
 	Set:(VerzendWijze = "") VerzendWijze = ##class(APPS.EC.impl.VerzendWijzeBepaler).%New().GeefVerzendWijze(Winkelkar)	
 	
 	Set ..VroegsteLeverdatum = ""
-	Set DatumPerLijnIterator = ##class(TECH.ListIterator).%New(..LeverDatumBepaler.GeefLeverdatumPerLijn(Winkelkar,VerzendWijze))
+	
+	#Dim VroegsteLeverDatumPerLijn As %ArrayOfDataTypes = ..LeverDatumBepaler.GeefLeverdatumPerLijn(Winkelkar,VerzendWijze)
+	Do:(VroegsteLeverDatumPerLijn.Count() = 0) ##class(TECH.ExceptionHandler).Throw( 
+		##class(TECH.Exceptions.InvalidInputException).%New("Er lijken geen lijnen te zitten in de winkelkar met ID '" _ Winkelkar.GeefID() _ "'") )
+
+	Set DatumPerLijnIterator = ##class(TECH.ListIterator).%New( VroegsteLeverDatumPerLijn )	
 	While DatumPerLijnIterator.HasNext() {
 		#dim Datum As %Date = DatumPerLijnIterator.Next()
 		Set:(Datum > ..VroegsteLeverdatum) ..VroegsteLeverdatum = Datum
Index: vhTest/Utils/DOM/EC/Winkelkar/Winkelkar.cls.xml
===================================================================
diff -u -r40897 -r41107
--- vhTest/Utils/DOM/EC/Winkelkar/Winkelkar.cls.xml	(.../Winkelkar.cls.xml)	(revision 40897)
+++ vhTest/Utils/DOM/EC/Winkelkar/Winkelkar.cls.xml	(.../Winkelkar.cls.xml)	(revision 41107)
@@ -21,6 +21,15 @@
 ]]></Implementation>
 </Method>
 
+<Method name="LegeWinkelkar">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.EC.Winkelkar.Winkelkar</ReturnType>
+<Implementation><![CDATA[
+	Set LegeWinkelkar = ##class(vhTest.Fake.DOM.EC.Winkelkar.Winkelkar).%New("testapp",$$$DummyInteger)
+	Quit LegeWinkelkar
+]]></Implementation>
+</Method>
+
 <Method name="GeefMaatwerkLijn">
 <ClassMethod>1</ClassMethod>
 <FormalSpec>Aantal:%Integer,EenheidPrijs:%Decimal,TotaalPrijs:%Decimal</FormalSpec>
Index: vhUnitTest/APPS/EC/impl/VroegsteLeverdatumBepaler/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/APPS/EC/impl/VroegsteLeverdatumBepaler/Test.cls.xml	(revision 0)
+++ vhUnitTest/APPS/EC/impl/VroegsteLeverdatumBepaler/Test.cls.xml	(revision 41107)
@@ -0,0 +1,29 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.APPS.EC.impl.VroegsteLeverdatumBepaler.Test">
+<ClassType/>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test : GeefVroegsteLeverdatum throwt exceptie indien geen lijnen in winkelkar">
+<Implementation><![CDATA[
+	Set LeverdatumBepalerMock = ##class(vhTest.Mock.DOM.EC.Winkelkar.impl.LeverdatumBepaler).%New()
+	
+	#Dim LegeWinkelkar as DOM.EC.Winkelkar.Winkelkar = ##class(vhTest.Utils.DOM.EC.Winkelkar.Winkelkar).LegeWinkelkar()
+	
+	Set VroegsteLeverdatumBepaler = ##class(APPS.EC.impl.VroegsteLeverdatumBepaler).%New(LeverdatumBepalerMock)
+
+ 	Do LeverdatumBepalerMock.VerwachtMethodCall("GeefLeverdatumPerLijn",LegeWinkelkar,"AFH").DanReturn(##class(%ArrayOfDataTypes).%New())
+
+	#dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("Er lijken geen lijnen te zitten in de winkelkar met ID '" _ $$$DummyInteger _ "'")
+	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidInputException",Substrings))
+	
+	Set Datum = VroegsteLeverdatumBepaler.GeefVroegsteLeverdatum(LegeWinkelkar,"AFH")
+	
+	Do LeverdatumBepalerMock.Verifier()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>