Index: zTryout/CSC/IKnaarIKID.cls.xml
===================================================================
diff -u -r1898 -r1904
--- zTryout/CSC/IKnaarIKID.cls.xml	(.../IKnaarIKID.cls.xml)	(revision 1898)
+++ zTryout/CSC/IKnaarIKID.cls.xml	(.../IKnaarIKID.cls.xml)	(revision 1904)
@@ -118,14 +118,20 @@
 		Set IKIDID = ResultSet.Data("IKID")
 		Set IKID = ##class(DOM.PM.Maatwerk.Calc.Common.IKID).%OpenId(IKIDID)
 		Set IKIDHash = ##class(DOM.PM.Maatwerk.Calc.Common.impl.IKIDHash).%OpenId(IKID.GeefHash())
-		Set IKIDHashDataIterator = IKIDHash.GeefIKIDHashDataIterator()
-		While (IKIDHashDataIterator.HasNext())
+		If ($IsObject(IKIDHash))
 		{
-			Set IKIDHashData = IKIDHashDataIterator.Next()
-			Set IngegevenKenmerken = IKIDHashData.GeefIngegevenKenmerken()
-			Do IngegevenKenmerken.%DeleteId(IngegevenKenmerken.%Id())
+			Set IKIDHashDataIterator = IKIDHash.GeefIKIDHashDataIterator()
+			While (IKIDHashDataIterator.HasNext())
+			{
+				Set IKIDHashData = IKIDHashDataIterator.Next()
+				Set IngegevenKenmerken = IKIDHashData.GeefIngegevenKenmerken()
+				If ($IsObject(IngegevenKenmerken))
+				{
+					Do IngegevenKenmerken.%DeleteId(IngegevenKenmerken.%Id())
+				}
+			}
+			Do IKIDHash.%DeleteId(IKIDHash.%Id())
 		}
-		Do IKIDHash.%DeleteId(IKIDHash.%Id())
 		Do IKID.%DeleteId(IKID.%Id())		
 	}
 ]]></Implementation>