Index: vhConsistency/Checks/Bouwstenen.cls.xml
===================================================================
diff -u -r1712 -r1758
--- vhConsistency/Checks/Bouwstenen.cls.xml	(.../Bouwstenen.cls.xml)	(revision 1712)
+++ vhConsistency/Checks/Bouwstenen.cls.xml	(.../Bouwstenen.cls.xml)	(revision 1758)
@@ -94,7 +94,14 @@
 			Continue:'KPRNr
 			Set BSType=$P(^PRBS("BS",MPRNr,BSKey),"\",3)
 			If BSType'="K",BSType'="H" Continue
-			If $G(^PRBS("IP",KPRNr,MPRNr,BSKey))'=BSType Do ..VoegErrorMeldingToe($ZR,"type bouwsteen verschillend")
+			If '$D(^PRBS("IP",KPRNr,MPRNr,BSKey))
+			{
+				Do ..VoegErrorMeldingToe($ZR,"IP index is niet aanwezig")
+			}
+			ElseIf (^PRBS("IP",KPRNr,MPRNr,BSKey)'=BSType)
+			{
+				Do ..VoegErrorMeldingToe($ZR,"type bouwsteen verschillend")
+			}
 			Continue:BSType'="K"
 			Set Aantal=$P(^PRBS("BS",MPRNr,BSKey),"\",2)
 			Continue:'Aantal