Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/PlaatAfwerkingBepaler.cls.xml
===================================================================
diff -u -r57756 -r58350
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/PlaatAfwerkingBepaler.cls.xml	(.../PlaatAfwerkingBepaler.cls.xml)	(revision 57756)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/PlaatAfwerkingBepaler.cls.xml	(.../PlaatAfwerkingBepaler.cls.xml)	(revision 58350)
@@ -47,22 +47,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefKantenbandPlaatAfwerking">
-<FormalSpec>Kleur:%String</FormalSpec>
-<ReturnType>DOM.PM.enu.TAORPlaatAfwerking</ReturnType>
-<Implementation><![CDATA[
-	#dim PlaatAfwerking As DOM.PM.enu.TAORPlaatAfwerking = ""
-
-	If (..IsFineer(Kleur)) {
-		Set PlaatAfwerking = ..PlaatAfwerkingEnum.Fineer
-	} ElseIf (..IsMelamine(Kleur)) {
-		Set PlaatAfwerking = ..PlaatAfwerkingEnum.Melamine
-	}
-	
-	Quit PlaatAfwerking
-]]></Implementation>
-</Method>
-
 <Method name="IsFineer">
 <FormalSpec>Kleur:%String</FormalSpec>
 <Private>1</Private>
Index: vhTest/Fake/DOM/PM/Maatwerk/Calc/HF/impl/TAOR/PlaatAfwerkingBepaler.cls.xml
===================================================================
diff -u -r54703 -r58350
--- vhTest/Fake/DOM/PM/Maatwerk/Calc/HF/impl/TAOR/PlaatAfwerkingBepaler.cls.xml	(.../PlaatAfwerkingBepaler.cls.xml)	(revision 54703)
+++ vhTest/Fake/DOM/PM/Maatwerk/Calc/HF/impl/TAOR/PlaatAfwerkingBepaler.cls.xml	(.../PlaatAfwerkingBepaler.cls.xml)	(revision 58350)
@@ -7,13 +7,6 @@
 <ProcedureBlock>1</ProcedureBlock>
 <Super>DOM.PM.Maatwerk.Calc.HF.impl.TAOR.PlaatAfwerkingBepaler</Super>
 
-<Method name="GeefKantenbandPlaatAfwerking">
-<FormalSpec>Kleur:%String</FormalSpec>
-<ReturnType>DOM.PM.enu.TAORPlaatAfwerking</ReturnType>
-<Implementation><![CDATA[	Quit ""
-]]></Implementation>
-</Method>
-
 <Method name="GeefPlaatAfwerking">
 <FormalSpec>LadeKleur:DOM.PM.enu.TAORLadeKleur</FormalSpec>
 <ReturnType>DOM.PM.enu.TAORPlaatAfwerking</ReturnType>
Index: vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/TAOR/PlaatAfwerkingBepaler/GeefPlaatAfwerking/Test.cls.xml
===================================================================
diff -u -r57756 -r58350
--- vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/TAOR/PlaatAfwerkingBepaler/GeefPlaatAfwerking/Test.cls.xml	(.../Test.cls.xml)	(revision 57756)
+++ vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/TAOR/PlaatAfwerkingBepaler/GeefPlaatAfwerking/Test.cls.xml	(.../Test.cls.xml)	(revision 58350)
@@ -40,7 +40,6 @@
 		#dim LadeKleur As DOM.PM.enu.TAORLadeKleur = Iterator.Next()
 		
 		Do ..AssertPlaatAfwerking(LadeKleur)
-		Do ..AssertKantenbandPlaatAfwerking(LadeKleur)
 	}
 ]]></Implementation>
 </Method>
@@ -53,7 +52,6 @@
 		#dim BodemKleur As DOM.PM.enu.TAORBodemKleur = Iterator.Next()
 		
 		Do ..AssertPlaatAfwerking(BodemKleur)
-		Do ..AssertKantenbandPlaatAfwerking(BodemKleur)
 	}
 ]]></Implementation>
 </Method>
@@ -66,7 +64,6 @@
 		#dim KantenbandKleur As DOM.PM.enu.TAORKantenbandKleur = Iterator.Next()
 		
 		Do ..AssertPlaatAfwerking(KantenbandKleur)
-		Do ..AssertKantenbandPlaatAfwerking(KantenbandKleur)
 	}
 ]]></Implementation>
 </Method>
@@ -93,28 +90,6 @@
 	}
 ]]></Implementation>
 </Method>
-
-<Method name="AssertKantenbandPlaatAfwerking">
-<FormalSpec>Kleur:%CacheString,VerwachtePlaatAfwerking:DOM.PM.enu.TAORPlaatAfwerking</FormalSpec>
-<Private>1</Private>
-<Implementation><![CDATA[
-	#dim PlaatAfwerking As DOM.PM.enu.TAORPlaatAfwerking = ..PlaatAfwerkingBepaler.GeefKantenbandPlaatAfwerking(Kleur)
-	#dim IsFineer As %Boolean = ##class(TECH.ListUtils).Contains(..VerwachteFineerKleuren, Kleur)
-	#dim IsMelamine As %Boolean = ##class(TECH.ListUtils).Contains(..VerwachteMelamineKleuren, Kleur)
-	
-	If ($$$Not(IsFineer) && $$$Not(IsMelamine)) {
-		Do ..Fail("Geen Kantenband PlaatAfwerking gedefinieerd voor kleur '" _ Kleur _ "'.")
-	} Else {
-		If (IsFineer) {
-			Do $$$AssertEquals(PlaatAfwerking, ..Enum.PlaatAfwerking.Fineer)
-		}
-		
-		If (IsMelamine) {
-			Do $$$AssertEquals(PlaatAfwerking, ..Enum.PlaatAfwerking.Melamine)
-		}
-	}
-]]></Implementation>
-</Method>
 </Class>
 
 
Index: vhTest/Mock/DOM/PM/Maatwerk/Calc/HF/impl/TAOR/PlaatAfwerkingBepaler.cls.xml
===================================================================
diff -u -r54703 -r58350
--- vhTest/Mock/DOM/PM/Maatwerk/Calc/HF/impl/TAOR/PlaatAfwerkingBepaler.cls.xml	(.../PlaatAfwerkingBepaler.cls.xml)	(revision 54703)
+++ vhTest/Mock/DOM/PM/Maatwerk/Calc/HF/impl/TAOR/PlaatAfwerkingBepaler.cls.xml	(.../PlaatAfwerkingBepaler.cls.xml)	(revision 58350)
@@ -8,10 +8,9 @@
 <Super>DOM.PM.Maatwerk.Calc.HF.impl.TAOR.PlaatAfwerkingBepaler,vhTest.Mock.DOM.PM.enu.TAORLadeKleur.Verwerker</Super>
 <Inheritance>right</Inheritance>
 
-<Method name="GeefKantenbandPlaatAfwerking">
-<FormalSpec>Kleur:%String</FormalSpec>
-<ReturnType>DOM.PM.enu.TAORPlaatAfwerking</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefKantenbandPlaatAfwerking",Kleur)
+<Method name="%OnNew">
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	Quit $$$OK
 ]]></Implementation>
 </Method>
 
Index: vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/common/KantenbandDataLadeInfoAanvuller/Test.cls.xml
===================================================================
diff -u -r54703 -r58350
--- vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/common/KantenbandDataLadeInfoAanvuller/Test.cls.xml	(.../Test.cls.xml)	(revision 54703)
+++ vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/common/KantenbandDataLadeInfoAanvuller/Test.cls.xml	(.../Test.cls.xml)	(revision 58350)
@@ -23,14 +23,15 @@
 	#dim LadeMock As vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.Lade = ##class(vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.Lade).%New()
 	Do LadeMock.VerwachtMethodCall("GeefConcept").DanReturn(RandomConcept)
 	Do LadeMock.VerwachtMethodCall("GeefDiepte").DanReturn(RandomLadeDiepte)
+	Do LadeMock.VerwachtMethodCall("GeefKleur").DanReturn(DummyKleuren.GetAt(1))
 	
 	#dim LadeOnderdeelMock As vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel = ##class(vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel).%New()
 	Do LadeOnderdeelMock.VerwachtMethodCall("GeefLade").DanReturn(LadeMock)
 	Do LadeOnderdeelMock.VerwachtMethodCall("GeefKleuren").DanReturn(DummyKleuren)
 	Do LadeOnderdeelMock.VerwachtMethodCall("GeefRol").DanReturn(RandomRol)
 	
 	#dim PlaatAfwerkingBepalerMock As vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.impl.TAOR.PlaatAfwerkingBepaler = ##class(vhTest.Mock.DOM.PM.Maatwerk.Calc.HF.impl.TAOR.PlaatAfwerkingBepaler).%New()
-	Do PlaatAfwerkingBepalerMock.VerwachtMethodCall("GeefKantenbandPlaatAfwerking", DummyKleuren.GetAt(3)).DanReturn(RandomPlaatAfwerking)
+	Do PlaatAfwerkingBepalerMock.VerwachtMethodCall("GeefPlaatAfwerking", DummyKleuren.GetAt(1)).DanReturn(RandomPlaatAfwerking)
 	
 	#dim LadeInfoAanvuller As APPS.Halux.PPS.Activiteit.impl.TAOR.common.KantenbandDataLadeInfoAanvuller = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.common.KantenbandDataLadeInfoAanvuller).%New(LadeOnderdeelMock, PlaatAfwerkingBepalerMock)
 	Do LadeInfoAanvuller.VulAan(UitvoeringInfo)
Index: APPS/Halux/PPS/Activiteit/impl/TAOR/common/KantenbandDataLadeInfoAanvuller.cls.xml
===================================================================
diff -u -r54703 -r58350
--- APPS/Halux/PPS/Activiteit/impl/TAOR/common/KantenbandDataLadeInfoAanvuller.cls.xml	(.../KantenbandDataLadeInfoAanvuller.cls.xml)	(revision 54703)
+++ APPS/Halux/PPS/Activiteit/impl/TAOR/common/KantenbandDataLadeInfoAanvuller.cls.xml	(.../KantenbandDataLadeInfoAanvuller.cls.xml)	(revision 58350)
@@ -40,7 +40,7 @@
 	Set UitvoeringInfo.KantenbandData.LadeDiepte = Lade.GeefDiepte()
 	Set UitvoeringInfo.KantenbandData.Kleur = KantenbandKleur
 	Set UitvoeringInfo.KantenbandData.Rol = ..LadeOnderdeel.GeefRol()
-	Set UitvoeringInfo.KantenbandData.PlaatAfwerking = ..PlaatAfwerkingBepaler.GeefKantenbandPlaatAfwerking(KantenbandKleur)
+	Set UitvoeringInfo.KantenbandData.PlaatAfwerking = ..PlaatAfwerkingBepaler.GeefPlaatAfwerking(..LadeOnderdeel.GeefLade().GeefKleur())
 ]]></Implementation>
 </Method>
 </Class>