Index: vhUnitTest/APPS/Halux/PPS/TAORVerpakking/TestDoos.cls.xml
===================================================================
diff -u -r30396 -r30499
--- vhUnitTest/APPS/Halux/PPS/TAORVerpakking/TestDoos.cls.xml	(.../TestDoos.cls.xml)	(revision 30396)
+++ vhUnitTest/APPS/Halux/PPS/TAORVerpakking/TestDoos.cls.xml	(.../TestDoos.cls.xml)	(revision 30499)
@@ -3,7 +3,7 @@
 <Class name="vhUnitTest.APPS.Halux.PPS.TAORVerpakking.TestDoos">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhUnitTest.DOM.PM.Verpakking.impl.DoosBerekenaar.TestDoos</Super>
+<Super>vhUnitTest.DOM.PM.Verpakking.impl.DoosBerekenaar.TestDoos,DOM.PM.Maatwerk.TAX.impl.Base</Super>
 
 <Property name="Context">
 <Type>DOM.PM.Maatwerk.Calc.HF.HalffabContext</Type>
@@ -25,9 +25,15 @@
 <Method name="OnBeforeOneTest">
 <FormalSpec>aTestName:%String</FormalSpec>
 <Implementation><![CDATA[
- 	Do ##super(aTestName)
+ 	 do ##super(aTestName)
  	
- 	Set ..TAORKenmerken = ..GeefTAORKenmerken(##class(DOM.PM.enu.TAORLadeHoogte).M(), ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte500(), 563)
+ 	set ..TAORKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).StandaardLade()
+ 	set ..TAORKenmerken.LadeHoogte = ..Enum.LadeHoogte.M
+ 	set ..TAORKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte500
+ 	set ..TAORKenmerken.CorpusBinnenbreedte = 563
+ 	
+ 	set ..TAORKenmerken.FrontEindkapKleur = ..Enum.FrontEindkapKleur.AluminiumLook
+ 	set ..TAORKenmerken.OpvullijstKleur = ..Enum.OpvullijstKleur.Lichtgrijs
 ]]></Implementation>
 </Method>
 
@@ -247,37 +253,6 @@
 	Quit ##class(APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar).%New(..Context.HalffabItemsBoom, IngegevenKenmerken,ProductID)
 ]]></Implementation>
 </Method>
-
-<Method name="GeefTAORKenmerken">
-<FormalSpec>LadeHoogte:DOM.PM.enu.TAORLadeHoogte,LadeDiepte:DOM.PM.enu.TAORLadeDiepte,CorpusBinnenBreedte:%Integer</FormalSpec>
-<Private>1</Private>
-<ReturnType>DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken</ReturnType>
-<Implementation><![CDATA[
-	#Dim TAORKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).%New()
-	
-	Set TAORKenmerken.LadeHoogte = LadeHoogte
-	Set TAORKenmerken.LadeDiepte = LadeDiepte
-	Set TAORKenmerken.CorpusBinnenbreedte = CorpusBinnenBreedte
-	Set TAORKenmerken.LadeKleur = ##class(DOM.PM.enu.TAORLadeKleur).NatuurNotenhout()
-	Set TAORKenmerken.BodemKleur = ##class(DOM.PM.enu.TAORLadeKleur).NatuurNotenhout()
-	Set TAORKenmerken.IsBinnenlade = $$$False
-	Set TAORKenmerken.Draagkracht = ##class(DOM.PM.enu.TAORDraagkracht).Draagkracht40()
-	Set TAORKenmerken.GlijderType = ##class(DOM.PM.enu.TAORGlijderType).Movento()
-	Set TAORKenmerken.HeeftDiepteVerstelling = $$$False
-	Set TAORKenmerken.HeeftOpvullijstLinks = $$$False
-	Set TAORKenmerken.HeeftOpvullijstRechts = $$$False
-	Set TAORKenmerken.HeeftTipon = $$$False
-	Set TAORKenmerken.HeeftZijstabilisering = $$$False
-	Set TAORKenmerken.FrontBevestiging = ##class(DOM.PM.enu.TAORFrontBevestiging).Expando()
-	Set TAORKenmerken.VerpakkingType = ##class(DOM.PM.enu.TAORVerpakkingType).V1()
-	Set TAORKenmerken.OpvullijstKleur = ##class(DOM.PM.enu.TAOROpvullijstKleur).Lichtgrijs()
-	Set TAORKenmerken.FrontEindkapKleur = ##class(DOM.PM.enu.TAORFrontEindkapKleur).AluminiumLook()
-	Set TAORKenmerken.AfdekkapBovenKleur = ##class(DOM.PM.enu.TAORAfdekkapBovenKleur).AluminiumLook()
-	Set TAORKenmerken.KoppelingType = ##class(DOM.PM.enu.TAORKoppelingType).Schroef()
-	
-	Quit TAORKenmerken
-]]></Implementation>
-</Method>
 </Class>