Index: vhUnitTest/DOM/PM/ASMProduct/TestASMProduct.cls.xml
===================================================================
diff -u -r36029 -r37633
--- vhUnitTest/DOM/PM/ASMProduct/TestASMProduct.cls.xml	(.../TestASMProduct.cls.xml)	(revision 36029)
+++ vhUnitTest/DOM/PM/ASMProduct/TestASMProduct.cls.xml	(.../TestASMProduct.cls.xml)	(revision 37633)
@@ -1,18 +1,16 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="vhUnitTest.DOM.PM.ASMProduct.TestASMProduct">
-<Description>
-do ##class(vhUnitTest.Manager).RunTest("/debug/display=all","DOM.PM.ASMProduct.TestASMProduct")</Description>
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
 <Super>vhUnitTest.TestCase</Super>
 
 <Method name="TestAntislipmatOpMaat">
 <Implementation><![CDATA[
-	Set ProductAPI = ##class(DOM.DomeinContext).Instance().GeefProductAPI()
+	#dim ProductAPI As DOM.PM.ProductAPI = ##class(DOM.DomeinContext).Instance().GeefProductAPI()
 	
 	// Antislipmat op maat
-	Set Product = ProductAPI.GeefProduct(550763)
+	#dim Product As DOM.PM.Product = ProductAPI.GeefProduct(550763)
 	
 	Do $$$AssertTrue(Product.%Extends("DOM.PM.ASMProduct.ASMAntislipmat"),"Het product is een antislipmat")
 	Do $$$AssertEquals(Product.GeefKleur(), ##class(DOM.PM.ASMProduct.enu.Kleur).Grijs(),"Kleur grijs")
@@ -22,21 +20,6 @@
 	Do $$$AssertEquals(Product.GeefNettoDiepte(), 623,"Nettodiepte 623")
 ]]></Implementation>
 </Method>
-
-<Method name="TestTBXAntislipmat">
-<Implementation><![CDATA[
-	Set ProductAPI = ##class(DOM.DomeinContext).Instance().GeefProductAPI()
-	
-	Set Product = ProductAPI.GeefProduct(525905)
-	
-	Do $$$AssertTrue(Product.%Extends("DOM.PM.ASMProduct.ASMAntislipmat"),"Het product is een antislipmat")
-	Do $$$AssertEquals(Product.GeefKleur(), ##class(DOM.PM.ASMProduct.enu.Kleur).Grijs(),"Kleur grijs")
-	Do $$$AssertEquals(Product.GeefCorpusBreedte(), 567,"Corpusbreedte 567")
-	Do $$$AssertEquals(Product.GeefLadeDiepte(), 500,"Ladediepte 500")
-	Do $$$AssertEquals(Product.GeefNettoBreedte(), 445,"Nettobreedte 175")
-	Do $$$AssertEquals(Product.GeefNettoDiepte(), 473,"Nettodiepte 473")
-]]></Implementation>
-</Method>
 </Class>