Index: vhUnitTest/AXimpl/Admin/Common/HerverpakteSoprService/KindProductService/Test.cls.xml
===================================================================
diff -u -r51029 -r51030
--- vhUnitTest/AXimpl/Admin/Common/HerverpakteSoprService/KindProductService/Test.cls.xml	(.../Test.cls.xml)	(revision 51029)
+++ vhUnitTest/AXimpl/Admin/Common/HerverpakteSoprService/KindProductService/Test.cls.xml	(.../Test.cls.xml)	(revision 51030)
@@ -28,6 +28,23 @@
 <Private>1</Private>
 </Property>
 
+<Method name="Test: Er zijn geen bouwstenen">
+<Implementation><![CDATA[
+	Set MoederProduct = ##class(vhTest.Mock.DOM.PM.SamengesteldProduct).%New(..#ProductId1)
+	Do MoederProduct.IndienMethodCall("GeefKindBouwsteenIterator").DanReturn(##class(TECH.ListIterator).%New(##class(%ListOfDataTypes).%New()))
+	
+	Set ProductRolApiStub = ##class(vhTest.Mock.DOM.PM.ProductRolAPI).%New()
+	Do ProductRolApiStub.IndienMethodCall("GeefSamengesteldProduct", ..#ProductId1).DanReturn(MoederProduct)
+	
+	Set ..ProductRolApi = ProductRolApiStub
+	#dim MagMeerdereKinderenHebben As %Boolean = $$$False
+	#dim ZoekenOpSoprOfSoprKind As %String = "Sopr"
+	#dim KindProductId As %String = ..GeefKindProductService().GeefKindProductId(..#ProductId1, MagMeerdereKinderenHebben, ZoekenOpSoprOfSoprKind)
+	
+	Do $$$AssertEquals(KindProductId, "")
+]]></Implementation>
+</Method>
+
 <Method name="Test: Default werking igv Sopr">
 <Implementation><![CDATA[
 	Set MoederProduct = ##class(vhTest.Mock.DOM.PM.SamengesteldProduct).%New(..#ProductId1)