Index: vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/TeOntvangenProductLocker/Test.cls.xml
===================================================================
diff -u -r50947 -r50951
--- vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/TeOntvangenProductLocker/Test.cls.xml	(.../Test.cls.xml)	(revision 50947)
+++ vhUnitTest/AXimpl/Dynamics/InventoryIn/Converter/TeOntvangenProductLocker/Test.cls.xml	(.../Test.cls.xml)	(revision 50951)
@@ -72,6 +72,32 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test exceptie tijdens bepalen producten maakt lijst producten leeg als er reeds producten gevonden waren">
+<Implementation><![CDATA[
+	Set ProductLookupMock = ##class(vhTest.Mock.AXimpl.Admin.Common.ProductBepaler).%New()
+	Do ProductLookupMock.VerwachtMethodCall("GeefProductIdVoorLeverancierId","Identnummer","L||1234").DanReturn(987654)
+	
+	Set EenExceptie = ##class(TECH.Exceptions.GeneralErrorException).%New("EenExceptie")
+	Do ProductLookupMock.IndienMethodCall("GeefProductIdVoorLeverancierId","Identnummer2","L||5678").DanException(EenExceptie)
+	
+	#dim Substrings as %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("EenExceptie")
+	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New(##class(TECH.Exceptions.GeneralErrorException).%ClassName(1),Substrings))
+
+	Set MultiGlobalLockerMock = ##class(vhTest.Mock.TECH.Lock.MultiGlobalLocker).%New()
+	Do MultiGlobalLockerMock.VerwachtMethodCall("ClearGlobalRefs").ExactAantalKeer(2)
+	Do MultiGlobalLockerMock.VerwachtMethodCall("VoegToeGlobalRef","^KPR(987654)").DanDoeNiks()
+	
+	Set ProductLocker = ##class(AXimpl.Dynamics.InventoryIn.Converter.TeOntvangenProductLocker).%New(ProductLookupMock,MultiGlobalLockerMock)
+
+	Do ProductLocker.BepaalTeLockenProducten(..GeefJournal("ontvangstjournaal.xml"))
+
+	Do $$$AssertFalse(ProductLocker.HeeftTeLockenProducten())
+	
+	Do ProductLookupMock.Verifieer()
+	Do MultiGlobalLockerMock.Verifieer()
+]]></Implementation>
+</Method>
+
 <Method name="GeefJournal">
 <FormalSpec>filenaam:%String</FormalSpec>
 <Private>1</Private>