Index: APPS/PM/Maatwerk/impl/KenmerkNaarDtoVisitor.cls.xml
===================================================================
diff -u -r50652 -r53836
--- APPS/PM/Maatwerk/impl/KenmerkNaarDtoVisitor.cls.xml	(.../KenmerkNaarDtoVisitor.cls.xml)	(revision 50652)
+++ APPS/PM/Maatwerk/impl/KenmerkNaarDtoVisitor.cls.xml	(.../KenmerkNaarDtoVisitor.cls.xml)	(revision 53836)
@@ -36,7 +36,7 @@
 </Property>
 
 <Property name="KenmerkenConverterTbx">
-<Type>APPS.PM.Maatwerk.impl.KenmerkenConverter.DomNaarApps.Tax</Type>
+<Type>APPS.PM.Maatwerk.impl.KenmerkenConverter.DomNaarApps.Tbx</Type>
 <Private>1</Private>
 </Property>
 
@@ -61,10 +61,10 @@
 <FormalSpec>IngegevenKenmerkenObject:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
 <ReturnType>APPS.PM.Maatwerk.dto.IngegevenKenmerken</ReturnType>
 <Implementation><![CDATA[
+	
 	Do IngegevenKenmerkenObject.Accept($this)
 
 	Do ..VerwerkBasis(IngegevenKenmerkenObject)
-	
 	Quit ..IngegevenKenmerken
 ]]></Implementation>
 </Method>
@@ -83,7 +83,13 @@
 <FormalSpec>TbxKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken</FormalSpec>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
+	Do ##class(Tools.Wlip).%New(127).String("GeefIngegevenKenmerken")
+	Do ##class(Tools.Wlip).%New(127).ObjToXML(TbxKenmerken)
+	Do ##class(Tools.Wlip).%New(127).ObjToXML(TbxKenmerken.LegacyKenmerken)
 	Set ..IngegevenKenmerken = ..KenmerkenConverterTbx.Converteer(TbxKenmerken)
+	Do ##class(Tools.Wlip).%New(127).String("..IngegevenKenmerken")
+	Do ##class(Tools.Wlip).%New(127).ObjToXML(..IngegevenKenmerken)
+	Do ##class(Tools.Wlip).%New(127).ObjToXML(..IngegevenKenmerken.LegacyKenmerken)
 	
 	Quit $$$OK
 ]]></Implementation>