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