Index: vhUnitTest/DataHelper.cls.xml
===================================================================
diff -u -r29059 -r33089
--- vhUnitTest/DataHelper.cls.xml	(.../DataHelper.cls.xml)	(revision 29059)
+++ vhUnitTest/DataHelper.cls.xml	(.../DataHelper.cls.xml)	(revision 33089)
@@ -46,6 +46,9 @@
 			 Kill ^TO("IP",ProductID,ToeleveringNr,LijnID)
 		}
 		Kill ^KTO1(ToeleveringNr)
+		Kill ^KTO3(ToeleveringNr)
+		Do ##class(BL.Legacy.Toelevering).VerwijderIndexKTO4viaBestelBevestigingNr(LeverancierNr,ToeleveringNr,"")
+		Do ##class(BL.Legacy.Toelevering).VerwijderIndexKTO4(LeverancierNr,ToeleveringNr)
 	}
 	
 	#dim Global As %String = ""