Index: VerpakkingsDefinitie/WS/ProductsAgent.pas
===================================================================
diff -u -r617 -r618
--- VerpakkingsDefinitie/WS/ProductsAgent.pas	(.../ProductsAgent.pas)	(revision 617)
+++ VerpakkingsDefinitie/WS/ProductsAgent.pas	(.../ProductsAgent.pas)	(revision 618)
@@ -877,10 +877,14 @@
     DeelVanCaption := ProductVerpakking.DeelVanCaption;
     // Deel van informatie halen uit object. Leeg betekent niks geslecteerd.
     if ProductVerpakking.DeelVan <> nil then
-      // Caption wordt door server juist gezet
-      DeelVanID := ProductVerpakking.DeelVan.ID
+      if ProductVerpakking.ID = ProductVerpakking.DeelVan.ID then
+        Exception.Create('Een verpakking kan geen onderdeel zijn van zichzelf.')
+      else
+        // Caption wordt door server juist gezet
+        DeelVanID := ProductVerpakking.DeelVan.ID
     else
     begin
+      // Geen deel van een andere verpakking
       DeelVanID := '';
       DeelVanCaption := '';
     end;