Index: vhUnitTest/DOM/VKP/impl/DataM/DataMBon/NaleveringDataAanvuller/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/DOM/VKP/impl/DataM/DataMBon/NaleveringDataAanvuller/Test.cls.xml	(revision 0)
+++ vhUnitTest/DOM/VKP/impl/DataM/DataMBon/NaleveringDataAanvuller/Test.cls.xml	(revision 64148)
@@ -0,0 +1,24 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.DOM.VKP.impl.DataM.DataMBon.NaleveringDataAanvuller.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test: Er staan geen orders open op de bon">
+<Implementation><![CDATA[
+	Set NaleveringDataAanvuller = ##class(DOM.VKP.impl.DataM.DataMBon.NaleveringDataAanvuller).%New()
+	#dim BonStub As DOM.VKP.Bon = ##class(vhTest.Mock.DOM.VKP.Bon).%New()
+	#dim pxLevOrd = ##class(BL.Flow.Proxy.pxLevOrd).%New()
+	#dim Taal As DOM.enu.Taal = ##class(DOM.enu.Taal).Nederlands()
+	
+	#dim EmptyOrderIterator As TECH.Iterator = ..EmptyIterator()
+	Do BonStub.IndienMethodCall("GeefOrderIterator").DanReturn(EmptyOrderIterator)
+	
+	Do NaleveringDataAanvuller.VulNaleveringDataAanIndienNodig(BonStub, pxLevOrd, Taal)
+	
+	Do $$$AssertEquals(pxLevOrd.LIJNEN.Count(), 0)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>