Index: APPS/EC/impl/ConfiguratorService/KenmerkPostProcessor.cls.xml
===================================================================
diff -u -r31764 -r32067
--- APPS/EC/impl/ConfiguratorService/KenmerkPostProcessor.cls.xml	(.../KenmerkPostProcessor.cls.xml)	(revision 31764)
+++ APPS/EC/impl/ConfiguratorService/KenmerkPostProcessor.cls.xml	(.../KenmerkPostProcessor.cls.xml)	(revision 32067)
@@ -29,6 +29,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="AuthorizatieRol">
+<Type>DOM.common.Authorizatie.enu.Rol.AutoComplete</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="KenmerkMogelijkheden">
 <Type>APPS.PM.Maatwerk.dto.KenmerkMogelijkheden</Type>
 <Private>1</Private>
@@ -62,6 +67,7 @@
 <Implementation><![CDATA[
 	Set ..IngegevenKenmerkenTypeAPI = ##class(APPS.ApplicatieContext).Instance().GeefIngegevenKenmerkenTypeAPI()
 	Set ..KenmerkCombinatieVerwijderaar = ##class(APPS.EC.impl.ConfiguratorService.KenmerkMogelijkhedenCombinatieVerwijderaar).%New()
+	
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -70,22 +76,27 @@
 <FormalSpec>Kenmerken:APPS.PM.Maatwerk.dto.IngegevenKenmerken,KenmerkMogelijkheden:APPS.PM.Maatwerk.dto.KenmerkMogelijkheden,Klant:DOM.VKP.VanHoeckeKlant,Personality:DOM.common.impl.Personality</FormalSpec>
 <Implementation><![CDATA[
 	#dim GekoppeldeKenmerkMogelijkheden As APPS.PM.Maatwerk.dto.KenmerkMogelijkheden
-	If KenmerkMogelijkheden.GekoppeldeKenmerkMogelijkheden.Count() >= 1 {
-		Set GekoppeldeKenmerkMogelijkhedenIt = ##class(TECH.ListIterator).%New(KenmerkMogelijkheden.GekoppeldeKenmerkMogelijkheden)
-		While GekoppeldeKenmerkMogelijkhedenIt.HasNext() {
-			#dim GekoppeldKenmerkMogelijkheden As APPS.PM.Maatwerk.dto.GekoppeldKenmerkMogelijkheden = GekoppeldeKenmerkMogelijkhedenIt.Next()
+	
+	If (KenmerkMogelijkheden.GekoppeldeKenmerkMogelijkheden.Count() >= 1) {
+		#dim GekoppeldeKenmerkMogelijkhedenIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(KenmerkMogelijkheden.GekoppeldeKenmerkMogelijkheden)
+		
+		While (GekoppeldeKenmerkMogelijkhedenIterator.HasNext()) {
+			#dim GekoppeldKenmerkMogelijkheden As APPS.PM.Maatwerk.dto.GekoppeldKenmerkMogelijkheden = GekoppeldeKenmerkMogelijkhedenIterator.Next()
 			Set GekoppeldeKenmerkMogelijkheden = GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden
-			#dim GekoppeldeIngegevenKenmerken As APPS.PM.Maatwerk.dto.IngegevenKenmerken = ..GeefGekoppeldeIngegevenKenmerken(GekoppeldKenmerkMogelijkheden,Kenmerken)
-			Do ..VerwerkKenmerkMogelijkheden(GekoppeldeIngegevenKenmerken,GekoppeldeKenmerkMogelijkheden,Klant,Personality)
+			
+			#dim GekoppeldeIngegevenKenmerken As APPS.PM.Maatwerk.dto.IngegevenKenmerken = ..GeefGekoppeldeIngegevenKenmerken(GekoppeldKenmerkMogelijkheden, Kenmerken)
+			Do ..VerwerkKenmerkMogelijkheden(GekoppeldeIngegevenKenmerken, GekoppeldeKenmerkMogelijkheden, Klant, Personality)
 		}
-	}Else {
-		Set GekoppeldeIngegevenKenmerkenIt = ##class(TECH.ListIterator).%New(Kenmerken.GekoppeldeIngegevenKenmerken)
-		While GekoppeldeIngegevenKenmerkenIt.HasNext() {
-			#dim GekoppeldIngegevenKenmerken As APPS.PM.Maatwerk.dto.GekoppeldIngegevenKenmerk = GekoppeldeIngegevenKenmerkenIt.Next()	
+	} Else {
+		#dim GekoppeldeIngegevenKenmerkenIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(Kenmerken.GekoppeldeIngegevenKenmerken)
+		
+		While (GekoppeldeIngegevenKenmerkenIterator.HasNext()) {
+			#dim GekoppeldIngegevenKenmerken As APPS.PM.Maatwerk.dto.GekoppeldIngegevenKenmerk = GekoppeldeIngegevenKenmerkenIterator.Next()	
 			#dim IngegevenKenmerken As APPS.PM.Maatwerk.dto.IngegevenKenmerken = GekoppeldIngegevenKenmerken.IngegevenKenmerken
-			#dim CS As APPS.VKP.Maatwerk.ConfiguratorService = ##class(APPS.ApplicatieContext).Instance().GeefVerkoopAPI().GeefMaatwerkConfiguratorService()
-			Set GekoppeldeKenmerkMogelijkheden = CS.GeefKenmerkMogelijkheden(IngegevenKenmerken,Klant.GeefID())
-			Do ..VerwerkKenmerkMogelijkheden(GekoppeldIngegevenKenmerken.IngegevenKenmerken,GekoppeldeKenmerkMogelijkheden,Klant,Personality)
+			#dim ConfiguratorService As APPS.VKP.Maatwerk.ConfiguratorService = ##class(APPS.ApplicatieContext).Instance().GeefVerkoopAPI().GeefMaatwerkConfiguratorService()
+			
+			Set GekoppeldeKenmerkMogelijkheden = ConfiguratorService.GeefKenmerkMogelijkheden(IngegevenKenmerken, Klant.GeefID())
+			Do ..VerwerkKenmerkMogelijkheden(GekoppeldIngegevenKenmerken.IngegevenKenmerken, GekoppeldeKenmerkMogelijkheden, Klant, Personality)
 		}	
 	}
 ]]></Implementation>
@@ -97,11 +108,12 @@
 <ReturnType>APPS.PM.Maatwerk.dto.GekoppeldIngegevenKenmerk</ReturnType>
 <Implementation><![CDATA[
 	#dim Key As %String = GekoppeldKenmerkMogelijkheden.Key
-	#dim GekoppeldeIngegevenKenmerken As APPS.PM.Maatwerk.dto.IngegevenKenmerken = ..IngegevenKenmerkenTypeAPI.GeefGekoppeldeIngegevenKenmerken(Kenmerken,Key)
+	#dim GekoppeldeIngegevenKenmerken As APPS.PM.Maatwerk.dto.IngegevenKenmerken = ..IngegevenKenmerkenTypeAPI.GeefGekoppeldeIngegevenKenmerken(Kenmerken, Key)
 	
-	If '$IsObject(GekoppeldeIngegevenKenmerken) {
-		Set GekoppeldeIngegevenKenmerken = $ClassMethod(GekoppeldKenmerkMogelijkheden.IngegevenKenmerkClassName,"%New")
+	If $$$Not($IsObject(GekoppeldeIngegevenKenmerken)) {
+		Set GekoppeldeIngegevenKenmerken = $ClassMethod(GekoppeldKenmerkMogelijkheden.IngegevenKenmerkClassName, "%New")
 	}
+	
 	Quit GekoppeldeIngegevenKenmerken
 ]]></Implementation>
 </Method>
@@ -112,14 +124,15 @@
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	#dim IngegevenKenmerkClassNameDtoVersie As %String
-	If ##class(DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken).%ClassName(1) = IngegevenKenmerkClassName
-	{
+	
+	If (##class(DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken).%ClassName(1) = IngegevenKenmerkClassName) {
 		Set IngegevenKenmerkClassNameDtoVersie = ##class(APPS.PM.Maatwerk.dto.MATKenmerken).%ClassName(1)
 	}
 	
-	If IngegevenKenmerkClassNameDtoVersie = "" {
-		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.GeneralErrorException).%New("'"_IngegevenKenmerkClassName_"' is niet ondersteund als gekoppeld ingegeven kenmerk."))
+	If (IngegevenKenmerkClassNameDtoVersie = "") {
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.GeneralErrorException).%New("'" _ IngegevenKenmerkClassName _ "' is niet ondersteund als gekoppeld ingegeven kenmerk."))
 	}
+	
 	Quit IngegevenKenmerkClassNameDtoVersie
 ]]></Implementation>
 </Method>