Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/Rugv000.cls.xml
===================================================================
diff -u -r31848 -r57423
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/Rugv000.cls.xml	(.../Rugv000.cls.xml)	(revision 31848)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/Rugv000.cls.xml	(.../Rugv000.cls.xml)	(revision 57423)
@@ -3,13 +3,18 @@
 <Class name="DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.Rugv000">
 <Super>DOM.PM.Maatwerk.TAX.impl.Base,DOM.PM.Maatwerk.Calc.HF.IDynamischSamengesteldHalffabItemBuilder</Super>
 
+<Property name="KantenbandRolEnum">
+<Type>DOM.PM.Maatwerk.Lade.enu.KantenbandRol.AutoComplete</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>SamengesteldHalffabItemBuilder:DOM.PM.Maatwerk.Calc.HF.ISamengesteldHalffabItemBuilder</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
-	Set ..Rol= ..Enum.Rol.Rug
+	Set ..Rol = ..Enum.Rol.Rug
 	Quit ##class(DOM.PM.Maatwerk.Calc.HF.IDynamischSamengesteldHalffabItemBuilder)##this.%OnNew(SamengesteldHalffabItemBuilder)
 ]]></Implementation>
 </Method>
@@ -23,7 +28,8 @@
 	
 	Do Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFRugPlaatv000).%New(##this))
 	Do Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFHulsInsteekpenGeleiderv000).%New(##this))
-	Do Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFKantenBandRugv000).%New(##this))
+	Do Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFKantenBandRugv000).%New(##this, ..KantenbandRolEnum.Boven))
+	Do Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFKantenBandRugv000).%New(##this, ..KantenbandRolEnum.Onder))
 	
 	Quit ##class(TECH.ListIterator).%New(Builders)
 ]]></Implementation>
Index: vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFKantenBandRug/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFKantenBandRug/Test.cls.xml	(revision 0)
+++ vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFKantenBandRug/Test.cls.xml	(revision 57423)
@@ -0,0 +1,23 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFKantenBandRug.Test">
+<Super>vhUnitTest.DOM.PM.Maatwerk.TAX.Base</Super>
+
+<Method name="Test: KantenBandKleurBepaler wordt opgeroepen bij genereren van SelectieKenmerken">
+<Implementation><![CDATA[
+	#dim RandomKantenbandRol As %String = "RandomKantenbandRol"
+	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).StandaardLade()
+	
+	#dim KantenBandKleurBepalerMock As vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.impl.TAOR.KantenbandKleurBepaler = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.impl.TAOR.KantenbandKleurBepaler).%New()
+	Do KantenBandKleurBepalerMock.VerwachtMethodCall("Bepaal", IngegevenKenmerken, RandomKantenbandRol).DanReturn("RandomKleur")
+	
+	#dim KantenbandRugBuilder As DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFKantenBandRugv000 = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFKantenBandRugv000).%New("", RandomKantenbandRol, KantenBandKleurBepalerMock)
+	#dim SelectieKenmerken As %ArrayOfDataTypes = KantenbandRugBuilder.GenereerKenmerken(IngegevenKenmerken)
+	
+	Do KantenBandKleurBepalerMock.Verifieer()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFKantenBandRugv000.cls.xml
===================================================================
diff -u -r30204 -r57423
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFKantenBandRugv000.cls.xml	(.../HFKantenBandRugv000.cls.xml)	(revision 30204)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFKantenBandRugv000.cls.xml	(.../HFKantenBandRugv000.cls.xml)	(revision 57423)
@@ -3,26 +3,74 @@
 <Class name="DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFKantenBandRugv000">
 <Super>DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.Generated.HFKantenBandv000</Super>
 
+<Property name="KantenbandRol">
+<Type>DOM.PM.Maatwerk.Lade.enu.KantenbandRol</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="KantenBandKleurBepaler">
+<Type>DOM.PM.Maatwerk.Calc.HF.impl.TAOR.KantenbandKleurBepaler</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="ProjectSettingsApi">
+<Type>DOM.common.ProjectSettingsAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>SamengesteldHalffabItemBuilder:DOM.PM.Maatwerk.Calc.HF.ISamengesteldHalffabItemBuilder,KantenbandRol:DOM.PM.Maatwerk.Lade.enu.KantenbandRol,KantenBandKleurBepaler:DOM.PM.Maatwerk.Calc.HF.impl.TAOR.KantenbandKleurBepaler="",ProjectSettingsApi:DOM.common.ProjectSettingsAPI=""</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+	Set ..Rol = ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).KantenBand()
+	Set ..KantenbandRol = KantenbandRol
+	Set ..KantenBandKleurBepaler = $$$Inject(KantenBandKleurBepaler, ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.KantenbandKleurBepaler).%New())
+	Set ..ProjectSettingsApi = $$$Inject(ProjectSettingsApi, ##class(DOM.common.impl.ProjectSettingsAPI).%New())
+	
+	Quit ##super(SamengesteldHalffabItemBuilder)
+]]></Implementation>
+</Method>
+
 <Method name="GeefTeBekomenAfmetingPerBewerkteDimensie">
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken</FormalSpec>
 <Private>1</Private>
 <ReturnType>%ArrayOfDataTypes</ReturnType>
 <ReturnTypeParams>ELEMENTTYPE="%Decimal"</ReturnTypeParams>
 <Implementation><![CDATA[
 	#dim AfmetingPerBewerkteDimensie As array of %Decimal = ##class(%ArrayOfDataTypes).%New()
-	#dim Lengte As %Decimal = (2 * IngegevenKenmerken.InterneBreedte)
-	Do AfmetingPerBewerkteDimensie.SetAt(Lengte,"Lengte")
+	#dim Lengte As %Decimal = 2 * IngegevenKenmerken.InterneBreedte
+	
+	If (..ProjectSettingsApi.IsActiefKantenbandKleurVolgtLadeKleur()) {
+		Set Lengte = IngegevenKenmerken.InterneBreedte
+	}
+
+	Do AfmetingPerBewerkteDimensie.SetAt(Lengte, "Lengte")
+	
 	Quit AfmetingPerBewerkteDimensie
 ]]></Implementation>
 </Method>
 
 <Method name="BuilderMoetWerken">
-<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext</FormalSpec>
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext</FormalSpec>
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit 1
+<Implementation><![CDATA[	Quit $$$True
 ]]></Implementation>
 </Method>
+
+<Method name="GenereerKenmerken">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken</FormalSpec>
+<ReturnType>%ArrayOfDataTypes</ReturnType>
+<Implementation><![CDATA[
+	#dim SelectieKenmerken As %ArrayOfDataTypes = ##class(%ArrayOfDataTypes).%New()
+
+	Do SelectieKenmerken.SetAt(..KantenBandKleurBepaler.Bepaal(IngegevenKenmerken, ..KantenbandRol), "LadeKleur") // "LadeKleur" moet aangepast worden naar "KantenbandKleur" 
+	
+	Quit SelectieKenmerken
+]]></Implementation>
+</Method>
 </Class>