Index: vhUnitTest/CHUI/VKP/OrderIngave/TijdelijkOrderSluiterv01/Test.cls.xml
===================================================================
diff -u -r51206 -r51604
--- vhUnitTest/CHUI/VKP/OrderIngave/TijdelijkOrderSluiterv01/Test.cls.xml	(.../Test.cls.xml)	(revision 51206)
+++ vhUnitTest/CHUI/VKP/OrderIngave/TijdelijkOrderSluiterv01/Test.cls.xml	(.../Test.cls.xml)	(revision 51604)
@@ -124,6 +124,38 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test Order niet sluiten indien geen productorderlijnen in Order">
+<Implementation><![CDATA[
+	Do ##class(TECH.Config.ConfigMgr).Instance().SetBoolean("AX2A_SalesOrderOut_FileGenerationNeeded",$$$True,..#Applicatie)
+	#dim ProductAPIMock as vhTest.Mock.DOM.PM.ProductAPI = ##class(vhTest.Mock.DOM.PM.ProductAPI).MockInstance()
+	Set BouwsteenIteratorFactoryMock = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryOut.Converter.BouwsteenIteratorFactory).%New()
+
+	Set OrderMock = ##class(vhTest.Mock.DOM.VKP.Order).%New()
+	Do OrderMock.VerwachtMethodCall("GeefProductOrderLijnIterator").DanReturn(##class(vhTest.Utils.NullIterator).%New())
+	
+	#dim OrderAPIMock as DOM.VKP.OrderAPI = ##class(vhTest.Mock.DOM.VKP.OrderAPI).MockInstance()
+	Do OrderAPIMock.VerwachtMethodCall("GeefOrder","1000").DanReturn(OrderMock)
+	Do OrderAPIMock.VerwachtMethodCall("VerwijderOrder","1000").Nooit()
+
+	Set Request = ##class(AXimpl.Request).%New("SalesOrder/Create",1000)
+	Set GeneratorMock = ##class(vhTest.Mock.AXimpl.Generator).%New()
+	Do GeneratorMock.VerwachtMethodCall("Generate",..Matches.DataTransferObject(Request)).DanDoeNiks().Nooit()
+
+	Set BezwarenWeergeverMock = ##class(vhTest.Mock.CHUI.common.BezwarenWeergever).%New()
+	set BezwarenList = ##class(%ListOfDataTypes).%New()
+	Do BezwarenList.Insert("Geen productorderlijnen in order.")
+	Do BezwarenWeergeverMock.VerwachtMethodCall("Toon","Kan order niet sluiten",..Matches.List(BezwarenList)).DanDoeNiks()
+
+	Set Sluiter = ##class(CHUI.VKP.OrderIngave.TijdelijkOrderSluiterv01).%New(GeneratorMock,OrderAPIMock,ProductAPIMock,BezwarenWeergeverMock,BouwsteenIteratorFactoryMock)	
+	Do Sluiter.Sluit(1000,$$$DummyString,$$$DummyString)
+	
+	Do OrderAPIMock.Verifieer()
+	Do OrderMock.Verifieer()
+	Do BezwarenWeergeverMock.Verifieer()
+	Do GeneratorMock.Verifieer()
+]]></Implementation>
+</Method>
+
 <Method name="Test Test Ordersluiter sluit order niet voor order met niet actief product">
 <Implementation><![CDATA[
 	Do ##class(TECH.Config.ConfigMgr).Instance().SetBoolean("AX2A_SalesOrderOut_FileGenerationNeeded",$$$True,..#Applicatie)
@@ -145,7 +177,7 @@
 	Set BezwarenWeergeverMock = ##class(vhTest.Mock.CHUI.common.BezwarenWeergever).%New()
 	set BezwarenList = ##class(%ListOfDataTypes).%New()
 	Do BezwarenList.Insert("Product met nummer NietActiefProductID is niet meer actief.")
-	Do BezwarenWeergeverMock.VerwachtMethodCall("Toon","Niet actieve producten in order",..Matches.List(BezwarenList)).DanDoeNiks()
+	Do BezwarenWeergeverMock.VerwachtMethodCall("Toon","Kan order niet sluiten",..Matches.List(BezwarenList)).DanDoeNiks()
 	
 	Set BouwsteenIteratorFactoryMock = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryOut.Converter.BouwsteenIteratorFactory).%New()
 	Do BouwsteenIteratorFactoryMock.VerwachtMethodCall("Maak","NietActiefProductID").DanReturn(##class(TECH.ListIterator).%New(##class(%ListOfDataTypes).%New()))
@@ -189,7 +221,7 @@
 	Set BezwarenWeergeverMock = ##class(vhTest.Mock.CHUI.common.BezwarenWeergever).%New()
 	set BezwarenList = ##class(%ListOfDataTypes).%New()
 	Do BezwarenList.Insert("Kind/Bouwsteen met nummer NietActiefProductID van product ProductID is niet meer actief.")
-	Do BezwarenWeergeverMock.VerwachtMethodCall("Toon","Niet actieve producten in order",..Matches.List(BezwarenList)).DanDoeNiks()
+	Do BezwarenWeergeverMock.VerwachtMethodCall("Toon","Kan order niet sluiten",..Matches.List(BezwarenList)).DanDoeNiks()
 	
 	Set BouwsteenIteratorFactoryMock = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryOut.Converter.BouwsteenIteratorFactory).%New()
 	Set BouwsteenList = ##class(%ListOfDataTypes).%New()
Index: CHUI/VKP/OrderIngave/TijdelijkOrderSluiterv01.cls.xml
===================================================================
diff -u -r51206 -r51604
--- CHUI/VKP/OrderIngave/TijdelijkOrderSluiterv01.cls.xml	(.../TijdelijkOrderSluiterv01.cls.xml)	(revision 51206)
+++ CHUI/VKP/OrderIngave/TijdelijkOrderSluiterv01.cls.xml	(.../TijdelijkOrderSluiterv01.cls.xml)	(revision 51604)
@@ -60,7 +60,7 @@
 <Implementation><![CDATA[
 	#dim Bezwaren as %ListOfDataTypes = ..GeefOrderSluitenBezwaren(ORDNr)
 	if Bezwaren.Count() {
-		Do ..BezwarenWeergever.Toon("Niet actieve producten in order",Bezwaren)		
+		Do ..BezwarenWeergever.Toon("Kan order niet sluiten",Bezwaren)		
 	} else {
 		if ##class(TECH.Config.ConfigMgr).Instance().GeefBoolean("AX2A_SalesOrderOut_FileGenerationNeeded") {
 			set Request = ##class(AXimpl.Request).%New("SalesOrder/Create",ORDNr)
@@ -104,7 +104,11 @@
 	Set Bezwaren = ##class(%ListOfDataTypes).%New()
 	#dim SluitenMogelijk as %Boolean = $$$True
 	#dim Order as DOM.VKP.Order = ..OrderAPI.GeefOrder(ORDNr)
+	
 	#dim OrderlijnIterator as TECH.Iterator = Order.GeefProductOrderLijnIterator()
+	If $$$Not(OrderlijnIterator.HasNext()){
+		Do Bezwaren.Insert("Geen productorderlijnen in order.")	
+	}
 	While OrderlijnIterator.HasNext() {
 		#dim ProductOrderlijn as DOM.VKP.ProductOrderlijn = OrderlijnIterator.Next()
 		#dim Product as DOM.PM.Product = ..ProductAPI.GeefProduct(ProductOrderlijn.GeefProductID())