Index: vhUnitTest/ECONimpl/PM/Maatwerk/KenmerkenConverter/AppsNaarEcon/Lbx/Test.cls.xml
===================================================================
diff -u -r50688 -r50810
--- vhUnitTest/ECONimpl/PM/Maatwerk/KenmerkenConverter/AppsNaarEcon/Lbx/Test.cls.xml	(.../Test.cls.xml)	(revision 50688)
+++ vhUnitTest/ECONimpl/PM/Maatwerk/KenmerkenConverter/AppsNaarEcon/Lbx/Test.cls.xml	(.../Test.cls.xml)	(revision 50810)
@@ -1,8 +1,27 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="vhUnitTest.ECONimpl.PM.Maatwerk.KenmerkenConverter.AppsNaarEcon.Lbx.Test">
-<Super>vhUnitTest.TestCase</Super>
+<Super>vhUnitTest.DOM.PM.Maatwerk.LBX.Base</Super>
 
+<Property name="Converter">
+<Type>ECONimpl.PM.Maatwerk.KenmerkenConverter.AppsNaarEcon.Lbx</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="Differenciator">
+<Type>TECH.ObjectUtils.impl.DifferenciatorXmlBased</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="OnBeforeAllTests">
+<Implementation><![CDATA[
+	Do ##super()
+	
+	Set ..Converter = ##class(ECONimpl.PM.Maatwerk.KenmerkenConverter.AppsNaarEcon.Lbx).%New()
+	Set ..Differenciator = ##class(TECH.ObjectUtils.impl.DifferenciatorXmlBased).%New()
+]]></Implementation>
+</Method>
+
 <Method name="Test Lbx Standaardlade">
 <Implementation><![CDATA[	Do ..AssertConverter("StandaardLade")
 ]]></Implementation>
@@ -38,25 +57,14 @@
 ]]></Implementation>
 </Method>
 
-<UDLText name="T">
-<Content><![CDATA[
-/* nood aan nieuwe niet meeleveren testen identiek aan Tax
-Method "Test Lbx StandaardLadeMetNietMeeleveren"()
-{
-	Do ..AssertConverter("StandaardLadeMetNietMeeleveren")
-}*/
-]]></Content>
-</UDLText>
-
 <Method name="AssertConverter">
 <FormalSpec>SoortLade:%String</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	#dim LbxKenmerken As ECON.PM.Maatwerk.dto.LbxKenmerken = $classMethod("vhTest.Utils.APPS.PM.Maatwerk.dto.LBXKenmerken",SoortLade)
+	#dim AppsKenmerken As APPS.PM.Maatwerk.dto.LBXKenmerken = $ClassMethod("vhTest.Utils.APPS.PM.Maatwerk.dto.LBXKenmerken", SoortLade)
+	#dim GeconverteerdeKenmerken As ECON.PM.Maatwerk.dto.LbxKenmerken = ..Converter.Converteer(AppsKenmerken)
 	
-	Set Converter = ##class(ECONimpl.PM.Maatwerk.AppsConverter).%New()
-	#dim GeconverteerdeKenmerken As APPS.PM.Maatwerk.dto.LBXKenmerken = Converter.ConverteerAppsNaarEcon(LbxKenmerken)
-	Do $$$AssertEmptyList(##class(TECH.ObjectUtils.impl.DifferenciatorXmlBased).%New().GetDifferences(GeconverteerdeKenmerken,$ClassMethod("vhTest.Utils.ECON.PM.Maatwerk.dto.LbxKenmerken",SoortLade)))
+	Do $$$AssertEmptyList(..Differenciator.GetDifferences(GeconverteerdeKenmerken, $ClassMethod("vhTest.Utils.ECON.PM.Maatwerk.dto.LbxKenmerken", SoortLade)))
 ]]></Implementation>
 </Method>
 </Class>