Index: vhTest/Mock/APPS/Halux/Machine/OpdeelZaag/impl/PlaatMateriaalBepaler.cls.xml
===================================================================
diff -u -r29059 -r42267
--- vhTest/Mock/APPS/Halux/Machine/OpdeelZaag/impl/PlaatMateriaalBepaler.cls.xml	(.../PlaatMateriaalBepaler.cls.xml)	(revision 29059)
+++ vhTest/Mock/APPS/Halux/Machine/OpdeelZaag/impl/PlaatMateriaalBepaler.cls.xml	(.../PlaatMateriaalBepaler.cls.xml)	(revision 42267)
@@ -3,8 +3,7 @@
 <Class name="vhTest.Mock.APPS.Halux.Machine.OpdeelZaag.impl.PlaatMateriaalBepaler">
 <Description>
 Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
-Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
-Inheritance van meerdere TECH.Interface interfaces resulteert nog niet in een mockklasse met overeenkomstige inheritance-structuur.</Description>
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
 <ProcedureBlock>1</ProcedureBlock>
 <Super>APPS.Halux.Machine.OpdeelZaag.impl.PlaatMateriaalBepaler,Tools.Mock.MockClassBase</Super>
 
Index: APPS/Halux/Machine/Kantenband/impl/KantenbandBepaler.cls.xml
===================================================================
diff -u -r30916 -r42267
--- APPS/Halux/Machine/Kantenband/impl/KantenbandBepaler.cls.xml	(.../KantenbandBepaler.cls.xml)	(revision 30916)
+++ APPS/Halux/Machine/Kantenband/impl/KantenbandBepaler.cls.xml	(.../KantenbandBepaler.cls.xml)	(revision 42267)
@@ -18,6 +18,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="ToeleveringApi">
+<Type>DOM.AKP.ToeleveringAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>KantenBandProgrammaRepository:APPS.Halux.Machine.Kantenband.impl.KantenBandProgrammaRepository</FormalSpec>
 <Private>1</Private>
@@ -28,6 +33,8 @@
 	Set ..KantenBandProgrammaRepository = $$$Implementation(KantenBandProgrammaRepository,##class(APPS.Halux.Machine.Kantenband.impl.KantenBandProgrammaRepository).%New())
 	set ..DikteCodeBepaler = ##class(APPS.Halux.Machine.Kantenband.impl.KantenbandDataBepaler.DikteCodeBepaler).%New()
 	set ..BreedteCodeBepaler = ##class(APPS.Halux.Machine.Kantenband.impl.KantenbandDataBepaler.BreedteCodeBepaler).%New()
+	
+	set ..ToeleveringApi = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI()
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -38,7 +45,11 @@
 <Implementation><![CDATA[
 	#dim Kantenband As %String = ""	
 	if ..HeeftKantenbandNodig(KantenbandData,Programma) { 
-		set Kantenband =  KantenbandData.LadeKleur_ ..GeefDikteCode(KantenbandData.Decor)_ ..GeefBreedteCode(KantenbandData.Decor)
+		if $length(KantenbandData.Toelevering) && ..ToeleveringApi.GeefToelevering(KantenbandData.Toelevering).GeefKlantID() = ##class(DOM.VKP.enu.Klant).SFS() {
+			set Kantenband =  $$$If(KantenbandData.LadeKleur = "W","W1",KantenbandData.LadeKleur) _ ..GeefDikteCode(KantenbandData.Decor)_ ..GeefBreedteCode(KantenbandData.Decor)
+		} else  {
+			set Kantenband =  KantenbandData.LadeKleur _ ..GeefDikteCode(KantenbandData.Decor)_ ..GeefBreedteCode(KantenbandData.Decor)
+		}
 	}
 	quit Kantenband
 ]]></Implementation>
Index: APPS/Halux/Machine/OpdeelZaag/impl/PlaatMateriaalBepaler.cls.xml
===================================================================
diff -u -r30755 -r42267
--- APPS/Halux/Machine/OpdeelZaag/impl/PlaatMateriaalBepaler.cls.xml	(.../PlaatMateriaalBepaler.cls.xml)	(revision 30755)
+++ APPS/Halux/Machine/OpdeelZaag/impl/PlaatMateriaalBepaler.cls.xml	(.../PlaatMateriaalBepaler.cls.xml)	(revision 42267)
@@ -8,6 +8,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="ToeleveringApi">
+<Type>DOM.AKP.ToeleveringAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="Materiaal">
 <Type>APPS.Halux.PPS.enu.TAORDecor</Type>
 <Private>1</Private>
@@ -34,6 +39,8 @@
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	set ..Validator = $$$Implementation(Validator,##class(TECH.OBJ.Validator).%New())
+	set ..ToeleveringApi = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI()
+
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -44,13 +51,17 @@
 <Implementation><![CDATA[
 	set ..Dikte = UitvoeringInfo.OptimalisatieData.Dikte
 	set ..Materiaal = UitvoeringInfo.OptimalisatieData.Decor
-	set ..Kleur = UitvoeringInfo.OptimalisatieData.Kleur
 	
+	if $length(UitvoeringInfo.ToeleveringID) && ..ToeleveringApi.GeefToelevering(UitvoeringInfo.ToeleveringID).GeefKlantID() = ##class(DOM.VKP.enu.Klant).SFS() {
+		set ..Kleur = $$$If(UitvoeringInfo.OptimalisatieData.Kleur = "W","W1",UitvoeringInfo.OptimalisatieData.Kleur) 
+	} else {
+		set ..Kleur = UitvoeringInfo.OptimalisatieData.Kleur
+	}
+	
 	do ..Validator.ValidateObject(%this)
 		
 	#dim StringDikte As %String = ##class(TECH.StringUtils).AlignRight(UitvoeringInfo.OptimalisatieData.Dikte * 10, "0", 3)
 	Set ..Materiaal = ##class(APPS.Halux.PPS.enu.TAORDecor).LogicalToDisplay(UitvoeringInfo.OptimalisatieData.Decor)
-	Set ..Kleur = UitvoeringInfo.OptimalisatieData.Kleur	
 		
 	#dim MateriaalCode As %String = ..Materiaal_"."_..Kleur_"."_StringDikte
 
Index: vhTest/Mock/APPS/Halux/Machine/Kantenband/impl/KantenbandBepaler.cls.xml
===================================================================
diff -u -r30916 -r42267
--- vhTest/Mock/APPS/Halux/Machine/Kantenband/impl/KantenbandBepaler.cls.xml	(.../KantenbandBepaler.cls.xml)	(revision 30916)
+++ vhTest/Mock/APPS/Halux/Machine/Kantenband/impl/KantenbandBepaler.cls.xml	(.../KantenbandBepaler.cls.xml)	(revision 42267)
@@ -3,8 +3,7 @@
 <Class name="vhTest.Mock.APPS.Halux.Machine.Kantenband.impl.KantenbandBepaler">
 <Description>
 Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
-Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
-Inheritance van meerdere TECH.Interface interfaces resulteert nog niet in een mockklasse met overeenkomstige inheritance-structuur.</Description>
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
 <ProcedureBlock>1</ProcedureBlock>
 <Super>APPS.Halux.Machine.Kantenband.impl.KantenbandBepaler,Tools.Mock.MockClassBase</Super>