Index: APPS/Halux/PPS/Activiteit/impl/MVX/ZijstabiliseringInkorten.cls.xml
===================================================================
diff -u -r66142 -r66270
--- APPS/Halux/PPS/Activiteit/impl/MVX/ZijstabiliseringInkorten.cls.xml	(.../ZijstabiliseringInkorten.cls.xml)	(revision 66142)
+++ APPS/Halux/PPS/Activiteit/impl/MVX/ZijstabiliseringInkorten.cls.xml	(.../ZijstabiliseringInkorten.cls.xml)	(revision 66270)
@@ -82,15 +82,18 @@
 <Implementation><![CDATA[
 	#dim IsBewerkingNodigOpMinstensEenSubHFItem = $$$False
 	#dim ZijstabiliseringVoorItem As DOM.PM.Maatwerk.Calc.HF.IHalffabItem = Item.GeefHalffabItemsBoom().GeefHalffabItem(..GeefRolZijstabilisering())
-	#dim IndividueleZijstabOnderdelenIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(ZijstabiliseringVoorItem.HalffabItems)
-	#dim Product As DOM.PM.MaatwerkProduct = ##class(DOM.DomeinContext).Instance().GeefProductTypeAPI().GeefMaatwerkProduct(Item.ProductID)
-	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken = Product.GeefIngegevenKenmerken()
-	#dim ZijstabOnderdeel As DOM.PM.Maatwerk.Calc.HF.IHalffabItem
 	
-	While (IndividueleZijstabOnderdelenIterator.HasNext() && $$$Not(IsBewerkingNodigOpMinstensEenSubHFItem)) {
-		Set ZijstabOnderdeel = IndividueleZijstabOnderdelenIterator.Next()
-		If (##class(DOM.PM.Maatwerk.Calc.HF.HalffabItemUtils).IsBewerkingNodig(ZijstabOnderdeel, ##class(DOM.PM.enu.BewerkingDimensie).Lengte())) {
-			Set IsBewerkingNodigOpMinstensEenSubHFItem = $$$True
+	If $IsObject(ZijstabiliseringVoorItem) {
+		#dim IndividueleZijstabOnderdelenIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(ZijstabiliseringVoorItem.HalffabItems)
+		#dim Product As DOM.PM.MaatwerkProduct = ##class(DOM.DomeinContext).Instance().GeefProductTypeAPI().GeefMaatwerkProduct(Item.ProductID)
+		#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken = Product.GeefIngegevenKenmerken()
+		#dim ZijstabOnderdeel As DOM.PM.Maatwerk.Calc.HF.IHalffabItem
+		
+		While (IndividueleZijstabOnderdelenIterator.HasNext() && $$$Not(IsBewerkingNodigOpMinstensEenSubHFItem)) {
+			Set ZijstabOnderdeel = IndividueleZijstabOnderdelenIterator.Next()
+			If (##class(DOM.PM.Maatwerk.Calc.HF.HalffabItemUtils).IsBewerkingNodig(ZijstabOnderdeel, ##class(DOM.PM.enu.BewerkingDimensie).Lengte())) {
+				Set IsBewerkingNodigOpMinstensEenSubHFItem = $$$True
+			}
 		}
 	}