Index: APPS/PM/Maatwerk/impl/KenmerkenConverter/DomNaarApps/Mat.cls.xml
===================================================================
diff -u
--- APPS/PM/Maatwerk/impl/KenmerkenConverter/DomNaarApps/Mat.cls.xml	(revision 0)
+++ APPS/PM/Maatwerk/impl/KenmerkenConverter/DomNaarApps/Mat.cls.xml	(revision 50636)
@@ -0,0 +1,41 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.PM.Maatwerk.impl.KenmerkenConverter.DomNaarApps.Mat">
+<Super>TECH.RegisteredObject</Super>
+
+<Method name="Converteer">
+<FormalSpec>DomKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken</FormalSpec>
+<ReturnType>APPS.PM.Maatwerk.dto.MATKenmerken</ReturnType>
+<Implementation><![CDATA[
+	#dim AppsKenmerken As APPS.PM.Maatwerk.dto.MATKenmerken = ##class(APPS.PM.Maatwerk.dto.MATKenmerken).%New()
+
+	Set AppsKenmerken.Breedte = DomKenmerken.Breedte
+	Set AppsKenmerken.Diepte = DomKenmerken.Diepte
+	Set AppsKenmerken.Materiaal = DomKenmerken.Materiaal
+	Set AppsKenmerken.Kleur = DomKenmerken.Kleur
+	Set AppsKenmerken.Type = DomKenmerken.Type
+	Set AppsKenmerken.NietMeeleveren = ..GeefNietMeeleveren(DomKenmerken)
+	
+	Quit AppsKenmerken
+]]></Implementation>
+</Method>
+
+<Method name="GeefNietMeeleveren">
+<FormalSpec>DomKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
+<Private>1</Private>
+<ReturnType>%ListOfDataTypes</ReturnType>
+<Implementation><![CDATA[
+	#dim NietMeeleveren As APPS.PM.Maatwerk.dto.IngegevenKenmerkenNietMeeleveren = ##class(APPS.PM.Maatwerk.dto.IngegevenKenmerkenNietMeeleveren).%New()
+	#dim Iterator As TECH.Iterator = ##class(TECH.ListIterator).%New(DomKenmerken.NietMeeleveren)
+	
+	While (Iterator.HasNext()) {
+		Do NietMeeleveren.Insert(Iterator.Next())
+	}
+	
+	Quit NietMeeleveren
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/APPS/PM/Maatwerk/impl/KenmerkenConverter/DomNaarApps/Mat/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/APPS/PM/Maatwerk/impl/KenmerkenConverter/DomNaarApps/Mat/Test.cls.xml	(revision 0)
+++ vhUnitTest/APPS/PM/Maatwerk/impl/KenmerkenConverter/DomNaarApps/Mat/Test.cls.xml	(revision 50636)
@@ -0,0 +1,27 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.APPS.PM.Maatwerk.impl.KenmerkenConverter.DomNaarApps.Mat.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test: Standaardgedrag">
+<Implementation><![CDATA[
+	#dim DomKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken).StandaardLade()
+	Do DomKenmerken.NietMeeleveren.Insert("NietMeeleveren1")
+	Do DomKenmerken.NietMeeleveren.Insert("NietMeeleveren2")
+	
+	#dim DomNaarAppsConverter As APPS.PM.Maatwerk.impl.KenmerkenConverter.DomNaarApps.Mat = ##class(APPS.PM.Maatwerk.impl.KenmerkenConverter.DomNaarApps.Mat).%New()
+	#dim AppsKenmerken As APPS.PM.Maatwerk.dto.MATKenmerken = DomNaarAppsConverter.Converteer(DomKenmerken)
+	
+	Do $$$AssertEquals(DomKenmerken.Breedte, AppsKenmerken.Breedte, "Breedte wordt overgenomen")
+	Do $$$AssertEquals(DomKenmerken.Diepte, AppsKenmerken.Diepte, "Diepte wordt overgenomen")
+	Do $$$AssertEquals(DomKenmerken.Materiaal, AppsKenmerken.Materiaal, "Materiaal wordt overgenomen")
+	Do $$$AssertEquals(DomKenmerken.Kleur, AppsKenmerken.Kleur, "Kleur wordt overgenomen")
+	Do $$$AssertEquals(DomKenmerken.Type, AppsKenmerken.Type, "Type wordt overgenomen")
+	Do $$$AssertEquals(DomKenmerken.NietMeeleveren.Count(), AppsKenmerken.NietMeeleveren.Count())
+	Do $$$AssertEqualsList(DomKenmerken.NietMeeleveren, AppsKenmerken.NietMeeleveren, "NietMeeleveren wordt overgenomen")
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/PM/Maatwerk/impl/KenmerkNaarDtoVisitor.cls.xml
===================================================================
diff -u -r50624 -r50636
--- APPS/PM/Maatwerk/impl/KenmerkNaarDtoVisitor.cls.xml	(.../KenmerkNaarDtoVisitor.cls.xml)	(revision 50624)
+++ APPS/PM/Maatwerk/impl/KenmerkNaarDtoVisitor.cls.xml	(.../KenmerkNaarDtoVisitor.cls.xml)	(revision 50636)
@@ -20,6 +20,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="KenmerkenConverterMat">
+<Type>APPS.PM.Maatwerk.impl.KenmerkenConverter.DomNaarApps.Mat</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="KenmerkenConverterOlm">
 <Type>APPS.PM.Maatwerk.impl.KenmerkenConverter.DomNaarApps.Olm</Type>
 <Private>1</Private>
@@ -44,6 +49,7 @@
 <Implementation><![CDATA[
 	Set ..IngegevenKenmerkenTypeAPI = ##class(DOM.PM.Maatwerk.impl.IngegevenKenmerkenTypeAPI).%New()
 	Set ..LbxConverter = $$$Inject(LbxConverter, ##class(APPS.PM.Maatwerk.impl.LBX.KenmerkNaarDtoConverter).%New())
+	Set ..KenmerkenConverterMat = ##class(APPS.PM.Maatwerk.impl.KenmerkenConverter.DomNaarApps.Mat).%New()
 	Set ..KenmerkenConverterOlm = ##class(APPS.PM.Maatwerk.impl.KenmerkenConverter.DomNaarApps.Olm).%New()
 	Set ..KenmerkenConverterTax = ##class(APPS.PM.Maatwerk.impl.KenmerkenConverter.DomNaarApps.Tax).%New()
 	Set ..KenmerkenConverterTbx = ##class(APPS.PM.Maatwerk.impl.KenmerkenConverter.DomNaarApps.Tbx).%New()
@@ -133,19 +139,11 @@
 </Method>
 
 <Method name="VerwerkMATKenmerken">
-<FormalSpec>MATKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken</FormalSpec>
+<FormalSpec>MatKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken</FormalSpec>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
-	Set ..IngegevenKenmerken = ##class(APPS.PM.Maatwerk.dto.MATKenmerken).%New()
+	Set ..IngegevenKenmerken = ..KenmerkenConverterMat.Converteer(MatKenmerken)
 	
-	Set ..IngegevenKenmerken.Breedte = MATKenmerken.Breedte
-	Set ..IngegevenKenmerken.Diepte = MATKenmerken.Diepte
-	Set ..IngegevenKenmerken.Materiaal = MATKenmerken.Materiaal
-	Set ..IngegevenKenmerken.Kleur = MATKenmerken.Kleur
-	Set ..IngegevenKenmerken.Type = MATKenmerken.Type
-	
-	Do ..KopieerNietMeeleveren(MATKenmerken,..IngegevenKenmerken)
-	
 	Quit $$$OK
 ]]></Implementation>
 </Method>