Index: DOM/PM/TBXProduct/impl/TBXRugImpl.cls.xml
===================================================================
diff -u -r2529 -r2533
--- DOM/PM/TBXProduct/impl/TBXRugImpl.cls.xml	(.../TBXRugImpl.cls.xml)	(revision 2529)
+++ DOM/PM/TBXProduct/impl/TBXRugImpl.cls.xml	(.../TBXRugImpl.cls.xml)	(revision 2533)
@@ -4,26 +4,20 @@
 <Description>
 Halfabrikaat plaatmateriaal houtenrug</Description>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>DOM.PM.TBXProduct.TBXRug,DOM.PM.TBXProduct.impl.TBXSpaanplaatImpl</Super>
+<Super>DOM.PM.impl.ProductImpl,DOM.PM.TBXProduct.TBXRug</Super>
 <ClassDefinitionError>0</ClassDefinitionError>
 
 <Method name="GeefHoogte">
-<ReturnType>DOM.PM.enu.TBXRugHoogte</ReturnType>
-<Implementation><![CDATA[	Quit $LG(##class(Prod.Kenmerk.DataDefinitie).Get("TB",..GeefPRNr(),"RugHoogte"))
-]]></Implementation>
-</Method>
-
-<Method name="GeefExacteHoogte">
-<ReturnType>%Float</ReturnType>
+<ReturnType>%Integer</ReturnType>
 <Implementation><![CDATA[
-	Set RugCode=..GeefHoogte()
+	Set RugCode=..GeefHoogteVanLade()
 	Quit $Case(RugCode,"N":69,"M":84,"K":116,"B":135,"C":167,"D":199,:"")
 ]]></Implementation>
 </Method>
 
-<Method name="GeefKleur">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit $LG(##class(Prod.Kenmerk.DataDefinitie).Get("TB",..GeefPRNr(),"Kleur"))
+<Method name="GeefHoogteVanLade">
+<ReturnType>DOM.PM.enu.TBXRugHoogte</ReturnType>
+<Implementation><![CDATA[	Quit $LG(##class(Prod.Kenmerk.DataDefinitie).Get("TB",..GeefPRNr(),"RugHoogte"))
 ]]></Implementation>
 </Method>
 </Class>