Index: vhUnitTest/DOM/VKP/dto/VerkoopPrijsUitzondering/Test.cls.xml
===================================================================
diff -u -r45313 -r45319
--- vhUnitTest/DOM/VKP/dto/VerkoopPrijsUitzondering/Test.cls.xml	(.../Test.cls.xml)	(revision 45313)
+++ vhUnitTest/DOM/VKP/dto/VerkoopPrijsUitzondering/Test.cls.xml	(.../Test.cls.xml)	(revision 45319)
@@ -5,11 +5,16 @@
 
 <Method name="Test: De node bestaat niet">
 <Implementation><![CDATA[
-	#dim GlobelRef As %String = "^KLPUTZ(""N"",20486,""01CH "",0,0,0,1)"
+	#dim TypePrijs As %String = """N"""
+	#dim KlantNummer As %String = """999"""
+	#dim HoofdGroep As %String = """01CH """
 	
-	#dim VerkoopPrijsUitzondering As DOM.VKP.dto.VerkoopPrijsUitzondering = ##class(DOM.VKP.dto.VerkoopPrijsUitzondering).FromNode(GlobelRef)
+	#dim Subscript As %String = "("_TypePrijs_","_KlantNummer_","_HoofdGroep_",0,0,0,1)"
 	
-	Do $$$AssertEquals(VerkoopPrijsUitzondering,"")
+	#dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("Subscript '"_Subscript_"' bestaat niet.")
+	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New(..E.InvalidInputException,Substrings))
+	
+	#dim VerkoopPrijsUitzondering As DOM.VKP.dto.VerkoopPrijsUitzondering = ##class(DOM.VKP.dto.VerkoopPrijsUitzondering).FromNode(Subscript)
 ]]></Implementation>
 </Method>
 </Class>