Index: DOM/PM/impl/DataM/DataMMATBasisCreator.cls.xml
===================================================================
diff -u -r60787 -r60861
--- DOM/PM/impl/DataM/DataMMATBasisCreator.cls.xml	(.../DataMMATBasisCreator.cls.xml)	(revision 60787)
+++ DOM/PM/impl/DataM/DataMMATBasisCreator.cls.xml	(.../DataMMATBasisCreator.cls.xml)	(revision 60861)
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="DOM.PM.impl.DataM.DataMMATBasisCreator">
-<Super>DOM.PM.impl.DataM.DataMProductCreator</Super>
+<Super>DOM.PM.impl.DataM.DataMProductCreator,DOM.PM.impl.DataM.DataMMATCreator</Super>
 
 <Method name="%OnNew">
 <FormalSpec>ProductSpecificatie:DOM.PM.Maatwerk.Calc.Common.ProductSpecificatie,BerekeningsSpecificatie:DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie,HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,KostItem:DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem</FormalSpec>
@@ -18,21 +18,11 @@
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken = ..ProductSpecificatie.GeefIngegevenKenmerken()
-	
-	Quit "MAT."_IngegevenKenmerken.Materiaal_"."_$J(DossierNummer,4)_".D"_IngegevenKenmerken.Diepte_"B"_$J($Normalize(IngegevenKenmerken.Breedte,-1),4)_..GeefKleurCodeVoorKorttekst(IngegevenKenmerken)
+	#dim Dimensie As %String = ".D"_..GeefDimensieVoorKorttekst(IngegevenKenmerken, "B")
+	Quit "MAT."_IngegevenKenmerken.Materiaal_"."_$J(DossierNummer,4)_Dimensie_..GeefKleurCodeVoorKorttekst(IngegevenKenmerken)
 ]]></Implementation>
 </Method>
 
-<Method name="GeefKleurCodeVoorKorttekst">
-<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken</FormalSpec>
-<Private>1</Private>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[
-	#dim KleurCodeVoorKorttekst As %String = ##class(DOM.PM.impl.MATKleurUtils).%New().GeefKleurCode(IngegevenKenmerken.Kleur, IngegevenKenmerken.Materiaal)
-	Quit $J(KleurCodeVoorKorttekst,4)
-]]></Implementation>
-</Method>
-
 <Method name="GeefClassificatie">
 <Private>1</Private>
 <ReturnType>%Integer</ReturnType>