Index: vhUnitTest/DOM/PM/TestSamengesteldProduct.cls.xml
===================================================================
diff -u -r1336 -r1339
--- vhUnitTest/DOM/PM/TestSamengesteldProduct.cls.xml	(.../TestSamengesteldProduct.cls.xml)	(revision 1336)
+++ vhUnitTest/DOM/PM/TestSamengesteldProduct.cls.xml	(.../TestSamengesteldProduct.cls.xml)	(revision 1339)
@@ -27,8 +27,8 @@
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
 	Kill ^PRBS("BS",999)
-	Kill ^PRBS("IP",..KindPRNr)
-	Kill ^PRLINK("D",999,..KindPRNr)
+	Kill ^PRBS("IP",999,..KindPRNr)
+	Kill ^PRLINK("D",999)
 	Kill ^PRLINK("IKM",..KindPRNr,999)
 	Quit $$$OK
 ]]></Implementation>
@@ -117,6 +117,8 @@
 	Do $$$AssertFalse($D(^PRLINK("IKM",..KindPRNr,999)),"De index van kind op moeder werd verwijderd")
 	Do $$$AssertFalse($D(^PRBS("IP",..KindPRNr,999,"KIND.003")),"De index op bouwsteentype werd verwijderd")
 	Do $$$AssertFalse(NieuwKindBouwsteen.IsModified(),"De bouwsteen werd verwijderd en de modified vlag is op true gezet")
+	
+	Do $$$AssertFalse($D(^PRLINK("D",999)),"De andere nodes hadden geen index voordien en zijn ook niet aangemaakt, omdat de objecten niet zijn gewijzigd")
 ]]></Implementation>
 </Method>
 </Class>