Index: csp/vhisie/TBX/Main/tmpDev.mac.rou
===================================================================
diff -u -r219 -r220
--- csp/vhisie/TBX/Main/tmpDev.mac.rou	(.../tmpDev.mac.rou)	(revision 219)
+++ csp/vhisie/TBX/Main/tmpDev.mac.rou	(.../tmpDev.mac.rou)	(revision 220)
@@ -111,7 +111,7 @@
 	. Do ophSendAlertMail(msg)
  
 	Set WSOrd=$S($L($G(wsID)):##class(WS.TBX.Order).%OpenId(wsID), 1:"")
-	Set TBXOrdersDto=##class(APPS.TBXWeb.dto.TBXOrderLijst).%New(##class(TECH.ListUtils).CreateListOfObjects(WSOrd),TBXContext)
+	Set TBXOrdersDto=##class(APPS.TBXWeb.dto.TBXOrderLijst).%New($S($IsObject(WSOrd):##class(TECH.ListUtils).CreateListOfObjects(WSOrd),1:""),TBXContext)
 	
 	Do ophSetHeaderLogo(WSOrd)
 	If ($IsObject(WSOrd))&&($$$Not(WSOrd.IsBonTypeGeldig())) {
Index: APPS/TBXWeb/dto/TBXOrderLijst.cls.xml
===================================================================
diff -u -r219 -r220
--- APPS/TBXWeb/dto/TBXOrderLijst.cls.xml	(.../TBXOrderLijst.cls.xml)	(revision 219)
+++ APPS/TBXWeb/dto/TBXOrderLijst.cls.xml	(.../TBXOrderLijst.cls.xml)	(revision 220)
@@ -37,8 +37,10 @@
 	Set ..Orders=LijstTBXOrders
 	Set ..TBXContext=TBXContext
 	
-	Set ..VerpakkingType=..Orders.GetAt(1).GeefVerpakkingType()
-	Set ..MinimaleBestelhoeveelheid=..TBXContext.GeefMinimaleBestelhoeveelheid(..VerpakkingType)
+	If ..Orders.Count() {
+		Set ..VerpakkingType=..Orders.GetAt(1).GeefVerpakkingType()
+		Set ..MinimaleBestelhoeveelheid=..TBXContext.GeefMinimaleBestelhoeveelheid(..VerpakkingType)
+	}
 
 	Quit $$$OK
 ]]></Implementation>