Index: vhUnitTest/KLACHT2/CONVELEM/Test.cls.xml
===================================================================
diff -u -r44354 -r44356
--- vhUnitTest/KLACHT2/CONVELEM/Test.cls.xml	(.../Test.cls.xml)	(revision 44354)
+++ vhUnitTest/KLACHT2/CONVELEM/Test.cls.xml	(.../Test.cls.xml)	(revision 44356)
@@ -65,7 +65,12 @@
 
 <Method name="TestOrder">
 <Implementation><![CDATA[
-	
+		#dim OrderID As %Integer = 123456
+		#dim Klantnummer As %String = ($P($G(^KO1(OrderID,"F")),"\",1))
+		If $L(Klantnummer) && ($$$Not($D(^KOD(Klantnummer,"F",OrderID)))) {
+			Kill ^KO1(OrderID)
+		}
+
 		Do ..AssertCONVELEM("O#123456",..#InternDocument,"Order    : 123.456")
 		
 		Do ..AssertCONVELEM("O#123456",..#ExternDocument,"Order 123.456")