Index: DOM/PM/impl/DataM/SamengesteldProduct.cls.xml
===================================================================
diff -u -r1354 -r1478
--- DOM/PM/impl/DataM/SamengesteldProduct.cls.xml	(.../SamengesteldProduct.cls.xml)	(revision 1354)
+++ DOM/PM/impl/DataM/SamengesteldProduct.cls.xml	(.../SamengesteldProduct.cls.xml)	(revision 1478)
@@ -96,17 +96,17 @@
 	Set OperatieScope = ##class(TECH.OperatieScope).StartMetTx()
 	
 	Set i = 0
-	While (($$$ISOK(Status)) && (i < ..Bouwstenen.Count()))
+	While ($$$ISOK(Status) && (i < ..VerwijderdeBouwstenen.Count()))
 	{
 		Set i = i + 1
-		Set Status = ..Bouwstenen.GetAt(i).Save()
+		Set Status = ..VerwijderdeBouwstenen.GetAt(i).Delete()
 	}
 	
 	Set i = 0
-	While ($$$ISOK(Status) && (i < ..VerwijderdeBouwstenen.Count()))
+	While (($$$ISOK(Status)) && (i < ..Bouwstenen.Count()))
 	{
 		Set i = i + 1
-		Set Status = ..VerwijderdeBouwstenen.GetAt(i).Delete()
+		Set Status = ..Bouwstenen.GetAt(i).Save()
 	}
 	
 	If ($$$ISOK(Status))