Index: APPS/EC/impl/ConfiguratorService/KenmerkPostProcessor.cls.xml
===================================================================
diff -u -r29254 -r29771
--- APPS/EC/impl/ConfiguratorService/KenmerkPostProcessor.cls.xml	(.../KenmerkPostProcessor.cls.xml)	(revision 29254)
+++ APPS/EC/impl/ConfiguratorService/KenmerkPostProcessor.cls.xml	(.../KenmerkPostProcessor.cls.xml)	(revision 29771)
@@ -39,6 +39,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="IngegevenKenmerkenTypeAPI">
+<Type>APPS.PM.Maatwerk.impl.IngegevenKenmerkenTypeAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>KenmerkMogelijkhedenUtils:APPS.PM.Maatwerk.impl.KenmerkMogelijkhedenUtils=""</FormalSpec>
 <Private>1</Private>
@@ -47,6 +52,7 @@
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..KenmerkMogelijkhedenUtils = $$$Implementation(KenmerkMogelijkhedenUtils, ##class(APPS.PM.Maatwerk.impl.KenmerkMogelijkhedenUtils).%New())
+	Set ..IngegevenKenmerkenTypeAPI = ##class(APPS.ApplicatieContext).Instance().GeefIngegevenKenmerkenTypeAPI()
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -81,18 +87,9 @@
 <Private>1</Private>
 <ReturnType>APPS.PM.Maatwerk.dto.GekoppeldIngegevenKenmerk</ReturnType>
 <Implementation><![CDATA[
-	#dim GekoppeldeIngegevenKenmerken As APPS.PM.Maatwerk.dto.IngegevenKenmerken = ""
 	#dim Key As %String = GekoppeldKenmerkMogelijkheden.Key
+	#dim GekoppeldeIngegevenKenmerken As APPS.PM.Maatwerk.dto.IngegevenKenmerken = ..IngegevenKenmerkenTypeAPI.GeefGekoppeldeIngegevenKenmerken(Kenmerken,Key)
 	
-	Set GekoppeldeIngegevenKenmerkenIt = ##class(TECH.ListIterator).%New(Kenmerken.GekoppeldeIngegevenKenmerken)
-	While GekoppeldeIngegevenKenmerkenIt.HasNext()
-	{
-		#dim GekoppeldIngegevenKenmerken As APPS.PM.Maatwerk.dto.GekoppeldIngegevenKenmerk = GekoppeldeIngegevenKenmerkenIt.Next()	
-		If GekoppeldIngegevenKenmerken.Key = Key {
-			Set GekoppeldeIngegevenKenmerken = GekoppeldIngegevenKenmerken.IngegevenKenmerken
-		}
-	}
-	
 	If '$IsObject(GekoppeldeIngegevenKenmerken) {
 		Set GekoppeldeIngegevenKenmerken = $ClassMethod(GekoppeldKenmerkMogelijkheden.IngegevenKenmerkClassName,"%New")
 	}