Index: vhConsistency/Checks/DOM/VKP/DocumentReferenties.cls.xml
===================================================================
diff -u -r49771 -r49869
--- vhConsistency/Checks/DOM/VKP/DocumentReferenties.cls.xml	(.../DocumentReferenties.cls.xml)	(revision 49771)
+++ vhConsistency/Checks/DOM/VKP/DocumentReferenties.cls.xml	(.../DocumentReferenties.cls.xml)	(revision 49869)
@@ -48,15 +48,26 @@
 		#dim KlantNr As %String = ##class(DOM.DomeinContext).Instance().GeefLegacyPartijAPI().GeefKlantNummerVoorPartijID(Order.GeefKlantID())
 		#dim DocumentRefID As %String = $P(^KOD(KlantNr,"F",Order.GeefID(),1),"\",57)
 	
-		If DocumentRefID'=""{				
+	#dim DocumentReferenties As DOM.VKP.DocumentReferenties = ""
+	
+	Try {
+		// hier nog repo gebruiken en bestaat voor docref. 
+		Set DocumentReferenties = Order.GeefDocumentReferenties()
+	} catch {
+			Do ..VoegMeldingToe("Order '"_Order.GeefID()_"' heeft documentreferrentie '" _DocumentRefID _"', maar deze documentreferentie bestaat niet!" )
+			Set Status = $$$ERROR()
+	}
+	
+	If $$$Not(DocumentRefID="") && $IsObject(DocumentReferenties) {				
 			#dim OrderRef As %String = $P(^KOD(KlantNr,"F",Order.GeefID(),1),"\",3)
-			If $$$Not(OrderRef [ Order.GeefOrderReferentie().OrderReferentie) {
-				Do ..VoegMeldingToe("OrderReferentie van order "_Order.GeefID()_" zijn niet consistent "_$C(9)_Order.GeefDocumentReferenties().OrderReferentie_" <> "_OrderRef)
+			
+			If $$$Not(OrderRef [ DocumentReferenties.OrderReferentie) {
+				Do ..VoegMeldingToe("OrderReferentie van order "_Order.GeefID()_" zijn niet consistent "_$C(9)_DocumentReferenties.OrderReferentie_" <> "_OrderRef)
 				Set Status = $$$ERROR()
 			}
 			#dim ComRef As %String = $P(^KOD(KlantNr,"F",Order.GeefID(),1),"\",19)
-			If Order.GeefDocumentReferenties().CommissieReferentie '= ComRef {
-				Do ..VoegMeldingToe("CommisieReferentie van order "_Order.GeefID()_" zijn niet consistent "_$C(9)_Order.GeefDocumentReferenties().CommissieReferentie_" <> "_ComRef)
+			If DocumentReferenties.CommissieReferentie '= ComRef {
+				Do ..VoegMeldingToe("CommisieReferentie van order "_Order.GeefID()_" zijn niet consistent "_$C(9)_DocumentReferenties.CommissieReferentie_" <> "_ComRef)
 				Set Status = $$$ERROR()
 			}
 		}Else{