Index: DOM/PM/impl/DataM/DataMMATTAORCreator.cls.xml
===================================================================
diff -u -r60857 -r60861
--- DOM/PM/impl/DataM/DataMMATTAORCreator.cls.xml	(.../DataMMATTAORCreator.cls.xml)	(revision 60857)
+++ DOM/PM/impl/DataM/DataMMATTAORCreator.cls.xml	(.../DataMMATTAORCreator.cls.xml)	(revision 60861)
@@ -3,7 +3,7 @@
 <Class name="DOM.PM.impl.DataM.DataMMATTAORCreator">
 <Description>
 N.B. Deze klasse wordt - sinds ORGALUX matjes op maat in Vhintra worden geconfigureerd i.p.v. met "GEN.HAL INGEKORT ORGALUX" - ook voor ORGALUX matjes op maat gebruikt.</Description>
-<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>
@@ -31,24 +31,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefDimensieVoorKorttekst">
-<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken,DimensieSeparator:%String="x"</FormalSpec>
-<Implementation><![CDATA[
-	#dim Dimensie As %String = $J(IngegevenKenmerken.Diepte,3)_DimensieSeparator_$J($Normalize(IngegevenKenmerken.Breedte,-1),4)
-	Quit $Extract(Dimensie, 1, 8)
-]]></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="GeefLangtekst">
 <FormalSpec>Taal:DOM.enu.Taal</FormalSpec>
 <Private>1</Private>
Index: DOM/PM/impl/DataM/DataMMATCreator.cls.xml
===================================================================
diff -u
--- DOM/PM/impl/DataM/DataMMATCreator.cls.xml	(revision 0)
+++ DOM/PM/impl/DataM/DataMMATCreator.cls.xml	(revision 60861)
@@ -0,0 +1,27 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.PM.impl.DataM.DataMMATCreator">
+<Abstract>1</Abstract>
+<Super>TECH.RegisteredObject</Super>
+
+<Method name="GeefDimensieVoorKorttekst">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken,DimensieSeparator:%String="x"</FormalSpec>
+<Implementation><![CDATA[
+	#dim Dimensie As %String = $J(IngegevenKenmerken.Diepte,3)_DimensieSeparator_$J($Normalize(IngegevenKenmerken.Breedte,-1),4)
+	Quit $Extract(Dimensie, 1, 8)
+]]></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>
+</Class>
+
+
+</Export>
Index: DOM/PM/impl/DataM/DataMMATBasisCreator.cls.xml
===================================================================
diff -u -r60857 -r60861
--- DOM/PM/impl/DataM/DataMMATBasisCreator.cls.xml	(.../DataMMATBasisCreator.cls.xml)	(revision 60857)
+++ 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>
@@ -23,24 +23,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefDimensieVoorKorttekst">
-<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken,DimensieSeparator:%String="x"</FormalSpec>
-<Implementation><![CDATA[
-	#dim Dimensie As %String = $J(IngegevenKenmerken.Diepte,3)_DimensieSeparator_$J($Normalize(IngegevenKenmerken.Breedte,-1),4)
-	Quit $Extract(Dimensie, 1, 8)
-]]></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>