Index: APPS/Halux/Planning/impl/ResourceGebruikCalculator.cls.xml
===================================================================
diff -u -r1502 -r1637
--- APPS/Halux/Planning/impl/ResourceGebruikCalculator.cls.xml	(.../ResourceGebruikCalculator.cls.xml)	(revision 1502)
+++ APPS/Halux/Planning/impl/ResourceGebruikCalculator.cls.xml	(.../ResourceGebruikCalculator.cls.xml)	(revision 1637)
@@ -110,8 +110,10 @@
 	While (ProductIterator.HasNext())
 	{
 		Set ProductLijnen = ProductIterator.Next()
+		Set PRNr = ProductIterator.Key()
+		Set $ZTRAP = "ProductBerekenFout"
 		Set ProductLijnIterator = ##class(TECH.ListIterator).%New(ProductLijnen)
-		Set Product = Producten.GetAt(ProductIterator.Key()).GetAt(1).GeefProduct()
+		Set Product = Producten.GetAt(PRNr).GetAt(1).GeefProduct()
 		Set Categorie = ##class(APPS.Halux.Planning.impl.ProductPlanningUtils).GeefCategorie(Product)
 		Set ActiviteitInfoLijst = ..BerekenActiviteitInfo(Product)
 		While (ProductLijnIterator.HasNext())
@@ -151,6 +153,10 @@
 				If ($$$ISERR(Status)) { Do ##class(vhLib.Logger).%New("Halux planningstool").Error("Kon ActiviteitInfo niet opslaan!","Toelevering: "_..Toelevering.GeefToeNr()_$C(13,10)_"Status: "_$$ParseStatus^vhLib(Status)) }
 			}
 		}
+		Continue
+ProductBerekenFout
+		Set $ZTRAP = ""
+		Do ##class(vhLib.Logger).%New("Halux planningstool").Error("Bereken product mislukt","Product met PRNr "_$Get(PRNr,"onbekend")_" kon niet worden berekend (zerror: "_$zerror_")")
 	}
 ]]></Implementation>
 </Method>