Index: vhUnitTest/APPS/Halux/Machine/Kantenband/impl/PassageBepaler/TestZijkant.cls.xml
===================================================================
diff -u -r58574 -r58594
--- vhUnitTest/APPS/Halux/Machine/Kantenband/impl/PassageBepaler/TestZijkant.cls.xml	(.../TestZijkant.cls.xml)	(revision 58574)
+++ vhUnitTest/APPS/Halux/Machine/Kantenband/impl/PassageBepaler/TestZijkant.cls.xml	(.../TestZijkant.cls.xml)	(revision 58594)
@@ -63,6 +63,76 @@
 	Do ..AssertPassage(Passages.GetAt(4), ..ProgrammaNaam.Schiele, $$$False, $$$False, ..Uitgang)
 ]]></Implementation>
 </Method>
+
+<Method name="Test: Verschillende fineerkleur voor Kantenband boven-onder en PlaatAfwerking Fineer">
+<Implementation><![CDATA[
+	#dim UitvoeringInfo As APPS.Halux.PPS.Activiteit.impl.TAOR.dto.KantenbandUitvoeringInfo = ..GeefUitvoeringInfo(..Kleur.NatuurEikenhout, ..Kleur.NatuurNotenhout, ..PlaatAfwerking.Fineer)
+	#dim Passages As %ListOfObjects = ..PassageBepaler.GeefPassages(UitvoeringInfo)
+	
+	Do $$$AssertEquals(Passages.Count(), 4)
+	
+	Do ..AssertPassage(Passages.GetAt(1), ..ProgrammaNaam.NE13, $$$True, $$$False)
+	Do ..AssertPassage(Passages.GetAt(2), ..ProgrammaNaam.NN13, $$$True, $$$True)
+	Do ..AssertPassage(Passages.GetAt(3), ..ProgrammaNaam.Schiele, $$$True, $$$False)
+	Do ..AssertPassage(Passages.GetAt(4), ..ProgrammaNaam.Schiele, $$$False, $$$False, ..Uitgang)
+]]></Implementation>
+</Method>
+
+<Method name="Test: Kantenband boven Fineer, Kantenband onder Melamine en PlaatAfwerking Fineer">
+<Implementation><![CDATA[
+	#dim UitvoeringInfo As APPS.Halux.PPS.Activiteit.impl.TAOR.dto.KantenbandUitvoeringInfo = ..GeefUitvoeringInfo(..Kleur.NatuurEikenhout, ..Kleur.Wit, ..PlaatAfwerking.Fineer)
+	#dim Passages As %ListOfObjects = ..PassageBepaler.GeefPassages(UitvoeringInfo)
+	
+	Do $$$AssertEquals(Passages.Count(), 4)
+	
+	Do ..AssertPassage(Passages.GetAt(1), ..ProgrammaNaam.NE13, $$$True, $$$False)
+	Do ..AssertPassage(Passages.GetAt(2), ..ProgrammaNaam.PVC13, $$$True, $$$True)
+	Do ..AssertPassage(Passages.GetAt(3), ..ProgrammaNaam.Transfer, $$$True, $$$False)
+	Do ..AssertPassage(Passages.GetAt(4), ..ProgrammaNaam.Schiele, $$$False, $$$False, ..Uitgang)
+]]></Implementation>
+</Method>
+
+<Method name="Test: Kantenband boven Melamine, Kantenband onder Fineer en PlaatAfwerking Fineer">
+<Implementation><![CDATA[
+	#dim UitvoeringInfo As APPS.Halux.PPS.Activiteit.impl.TAOR.dto.KantenbandUitvoeringInfo = ..GeefUitvoeringInfo(..Kleur.Wit, ..Kleur.NatuurEikenhout, ..PlaatAfwerking.Fineer)
+	#dim Passages As %ListOfObjects = ..PassageBepaler.GeefPassages(UitvoeringInfo)
+	
+	Do $$$AssertEquals(Passages.Count(), 4)
+	
+	Do ..AssertPassage(Passages.GetAt(1), ..ProgrammaNaam.PVC13, $$$True, $$$False)
+	Do ..AssertPassage(Passages.GetAt(2), ..ProgrammaNaam.NE13, $$$True, $$$True)
+	Do ..AssertPassage(Passages.GetAt(3), ..ProgrammaNaam.Schiele, $$$True, $$$False)
+	Do ..AssertPassage(Passages.GetAt(4), ..ProgrammaNaam.Transfer, $$$False, $$$False, ..Uitgang)
+]]></Implementation>
+</Method>
+
+<Method name="Test: Kantenband boven Fineer, Kantenband onder Melamine en PlaatAfwerking Melamine">
+<Implementation><![CDATA[
+	#dim UitvoeringInfo As APPS.Halux.PPS.Activiteit.impl.TAOR.dto.KantenbandUitvoeringInfo = ..GeefUitvoeringInfo(..Kleur.NatuurEikenhout, ..Kleur.Wit, ..PlaatAfwerking.Melamine)
+	#dim Passages As %ListOfObjects = ..PassageBepaler.GeefPassages(UitvoeringInfo)
+	
+	Do $$$AssertEquals(Passages.Count(), 4)
+	
+	Do ..AssertPassage(Passages.GetAt(1), ..ProgrammaNaam.BINE13, $$$True, $$$False)
+	Do ..AssertPassage(Passages.GetAt(2), ..ProgrammaNaam.PVC13, $$$True, $$$True)
+	Do ..AssertPassage(Passages.GetAt(3), ..ProgrammaNaam.Transfer, $$$True, $$$False)
+	Do ..AssertPassage(Passages.GetAt(4), ..ProgrammaNaam.Schiele, $$$False, $$$False, ..Uitgang)
+]]></Implementation>
+</Method>
+
+<Method name="Test: Kantenband boven Melamine, Kantenband onder Fineer en PlaatAfwerking Melamine">
+<Implementation><![CDATA[
+	#dim UitvoeringInfo As APPS.Halux.PPS.Activiteit.impl.TAOR.dto.KantenbandUitvoeringInfo = ..GeefUitvoeringInfo(..Kleur.Wit, ..Kleur.NatuurEikenhout, ..PlaatAfwerking.Melamine)
+	#dim Passages As %ListOfObjects = ..PassageBepaler.GeefPassages(UitvoeringInfo)
+	
+	Do $$$AssertEquals(Passages.Count(), 4)
+	
+	Do ..AssertPassage(Passages.GetAt(1), ..ProgrammaNaam.PVC13, $$$True, $$$False)
+	Do ..AssertPassage(Passages.GetAt(2), ..ProgrammaNaam.BINE13, $$$True, $$$True)
+	Do ..AssertPassage(Passages.GetAt(3), ..ProgrammaNaam.Schiele, $$$True, $$$False)
+	Do ..AssertPassage(Passages.GetAt(4), ..ProgrammaNaam.Transfer, $$$False, $$$False, ..Uitgang)
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/TestMultiColour/StartBatch/External_SQL.DB_KantenbandData.xml
===================================================================
diff -u -r58424 -r58594
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/TestMultiColour/StartBatch/External_SQL.DB_KantenbandData.xml	(.../External_SQL.DB_KantenbandData.xml)	(revision 58424)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/TestMultiColour/StartBatch/External_SQL.DB_KantenbandData.xml	(.../External_SQL.DB_KantenbandData.xml)	(revision 58594)
@@ -14,23 +14,23 @@
 Pass1Tilting180 = 0
 Pass1Turning180 = 1
 Pass2Edgeband = NED08B17
-Pass2Exit = D
+Pass2Exit = ""
 Pass2PrinterText = ""
-Pass2Program = PVC_13
+Pass2Program = NE_13
 Pass2Tilting180 = 1
-Pass2Turning180 = 0
+Pass2Turning180 = 1
 Pass3Edgeband = ""
 Pass3Exit = ""
 Pass3PrinterText = ""
-Pass3Program = ""
-Pass3Tilting180 = ""
-Pass3Turning180 = ""
+Pass3Program = SCHIELE
+Pass3Tilting180 = 0
+Pass3Turning180 = 1
 Pass4Edgeband = ""
-Pass4Exit = ""
+Pass4Exit = D
 Pass4PrinterText = ""
-Pass4Program = ""
-Pass4Tilting180 = ""
-Pass4Turning180 = ""
+Pass4Program = TRANSFER
+Pass4Tilting180 = 0
+Pass4Turning180 = 0
 PassNumber = 0
 Thickness = 13
 Toelevering = 222222
@@ -51,23 +51,23 @@
 Pass1Tilting180 = 0
 Pass1Turning180 = 1
 Pass2Edgeband = NED08B17
-Pass2Exit = D
+Pass2Exit = ""
 Pass2PrinterText = ""
-Pass2Program = PVC_13
+Pass2Program = NE_13
 Pass2Tilting180 = 1
-Pass2Turning180 = 0
+Pass2Turning180 = 1
 Pass3Edgeband = ""
 Pass3Exit = ""
 Pass3PrinterText = ""
-Pass3Program = ""
-Pass3Tilting180 = ""
-Pass3Turning180 = ""
+Pass3Program = SCHIELE
+Pass3Tilting180 = 0
+Pass3Turning180 = 1
 Pass4Edgeband = ""
-Pass4Exit = ""
+Pass4Exit = D
 Pass4PrinterText = ""
-Pass4Program = ""
-Pass4Tilting180 = ""
-Pass4Turning180 = ""
+Pass4Program = TRANSFER
+Pass4Tilting180 = 0
+Pass4Turning180 = 0
 PassNumber = 0
 Thickness = 13
 Toelevering = 222222
@@ -88,23 +88,23 @@
 Pass1Tilting180 = 0
 Pass1Turning180 = 1
 Pass2Edgeband = NED08B17
-Pass2Exit = E
+Pass2Exit = ""
 Pass2PrinterText = ""
-Pass2Program = PVC_13_G
-Pass2Tilting180 = 0
+Pass2Program = NE_13_G
+Pass2Tilting180 = 1
 Pass2Turning180 = 0
 Pass3Edgeband = ""
 Pass3Exit = ""
 Pass3PrinterText = ""
-Pass3Program = ""
-Pass3Tilting180 = ""
-Pass3Turning180 = ""
+Pass3Program = TRANSFER
+Pass3Tilting180 = 0
+Pass3Turning180 = 1
 Pass4Edgeband = ""
-Pass4Exit = ""
+Pass4Exit = E
 Pass4PrinterText = ""
-Pass4Program = ""
-Pass4Tilting180 = ""
-Pass4Turning180 = ""
+Pass4Program = SCHIELE
+Pass4Tilting180 = 1
+Pass4Turning180 = 1
 PassNumber = 0
 Thickness = 13
 Toelevering = 222222
Index: vhUnitTest/APPS/Halux/Machine/Kantenband/impl/PassageBepaler/TestFront.cls.xml
===================================================================
diff -u -r58575 -r58594
--- vhUnitTest/APPS/Halux/Machine/Kantenband/impl/PassageBepaler/TestFront.cls.xml	(.../TestFront.cls.xml)	(revision 58575)
+++ vhUnitTest/APPS/Halux/Machine/Kantenband/impl/PassageBepaler/TestFront.cls.xml	(.../TestFront.cls.xml)	(revision 58594)
@@ -38,7 +38,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Zelfde Fineerkleur voor Kantenband boven-onder en Fineer PlaatAfwerking verwacht slechts 2 passage voor BrutEik">
+<Method name="Test: Zelfde Fineerkleur voor Kantenband boven-onder en Fineer PlaatAfwerking verwacht slechts 2 passages voor BrutEik">
 <Implementation><![CDATA[
 	#dim UitvoeringInfo As APPS.Halux.PPS.Activiteit.impl.TAOR.dto.KantenbandUitvoeringInfo = ..GeefUitvoeringInfo(..Kleur.BrutEik, ..Kleur.BrutEik, ..PlaatAfwerking.Fineer)
 	#dim Passages As %ListOfObjects = ..PassageBepaler.GeefPassages(UitvoeringInfo)
Index: APPS/Halux/Machine/Kantenband/PassageDefinitieDefinieerder/Zijkant.cls.xml
===================================================================
diff -u -r58574 -r58594
--- APPS/Halux/Machine/Kantenband/PassageDefinitieDefinieerder/Zijkant.cls.xml	(.../Zijkant.cls.xml)	(revision 58574)
+++ APPS/Halux/Machine/Kantenband/PassageDefinitieDefinieerder/Zijkant.cls.xml	(.../Zijkant.cls.xml)	(revision 58594)
@@ -20,7 +20,7 @@
 <Implementation><![CDATA[
 	Do ..DefinieerKantenbandFineer()
 	Do ..DefinieerKantenbandMelamine()
-	//Do ..DefinieerKantenbandFineerEnMelamine()
+	Do ..DefinieerKantenbandFineerEnMelamine()
 ]]></Implementation>
 </Method>
 
@@ -127,6 +127,143 @@
 	Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, KantenbandDefinitie.KleurBoven, KantenbandDefinitie.KleurOnder).MetWaarde(..Passage.Twee, KantenbandDefinitie.ProgrammaNaamOnder, $$$False, $$$True, ..Uitgang)
 ]]></Implementation>
 </Method>
+
+<Method name="DefinieerKantenbandFineerEnMelamine">
+<Private>1</Private>
+<Implementation><![CDATA[
+	Do ..VoegToeDefinitiesFineerMetKantenbandFineerEnMelamine(..Kleur.NatuurEikenhout, ..ProgrammaNaam.NE13)
+	Do ..VoegToeDefinitiesFineerMetKantenbandFineerEnMelamine(..Kleur.NatuurNotenhout, ..ProgrammaNaam.NN13)
+	Do ..VoegToeDefinitiesFineerMetKantenbandFineerEnMelamine(..Kleur.ZwartIngekleurdYaya, ..ProgrammaNaam.ZY13)
+	Do ..VoegToeDefinitiesFineerMetKantenbandFineerEnMelamine(..Kleur.Berk, ..ProgrammaNaam.BE13)
+	Do ..VoegToeDefinitiesFineerMetKantenbandFineerEnMelamine(..Kleur.Sycomore, ..ProgrammaNaam.SY13)
+	Do ..VoegToeDefinitiesFineerMetKantenbandFineerEnMelamine(..Kleur.BrutEik, ..ProgrammaNaam.XE13)
+	Do ..VoegToeDefinitiesFineerMetKantenbandFineerEnMelamine(..Kleur.MultiplexBerk, ..ProgrammaNaam.MB13)
+	
+	Do ..VoegToeDefinitiesFineerMetKantenbandMelamineEnFineer(..Kleur.BardolinoEik, ..ProgrammaNaam.PVC13)
+	Do ..VoegToeDefinitiesFineerMetKantenbandMelamineEnFineer(..Kleur.NebraskaEikenhout, ..ProgrammaNaam.PVC13)
+	Do ..VoegToeDefinitiesFineerMetKantenbandMelamineEnFineer(..Kleur.Zwart, ..ProgrammaNaam.PVC13)
+	Do ..VoegToeDefinitiesFineerMetKantenbandMelamineEnFineer(..Kleur.Wit, ..ProgrammaNaam.PVC13)
+	Do ..VoegToeDefinitiesFineerMetKantenbandMelamineEnFineer(..Kleur.OnyxGrijs, ..ProgrammaNaam.PVC13)
+	Do ..VoegToeDefinitiesFineerMetKantenbandMelamineEnFineer(..Kleur.Dakar, ..ProgrammaNaam.PVC13)
+	Do ..VoegToeDefinitiesFineerMetKantenbandMelamineEnFineer(..Kleur.Linnen, ..ProgrammaNaam.XPVC13)
+	
+	Do ..VoegToeDefinitiesMelamineMetKantenbandFineerEnMelamine(..Kleur.NatuurEikenhout, ..ProgrammaNaam.BINE13)
+	Do ..VoegToeDefinitiesMelamineMetKantenbandFineerEnMelamine(..Kleur.NatuurNotenhout, ..ProgrammaNaam.BINN13)
+	Do ..VoegToeDefinitiesMelamineMetKantenbandFineerEnMelamine(..Kleur.ZwartIngekleurdYaya, ..ProgrammaNaam.BIZY13)
+	Do ..VoegToeDefinitiesMelamineMetKantenbandFineerEnMelamine(..Kleur.Berk, ..ProgrammaNaam.BIBE13)
+	Do ..VoegToeDefinitiesMelamineMetKantenbandFineerEnMelamine(..Kleur.Sycomore, ..ProgrammaNaam.BISY13)
+	Do ..VoegToeDefinitiesMelamineMetKantenbandFineerEnMelamine(..Kleur.BrutEik, ..ProgrammaNaam.BIXE13)
+	Do ..VoegToeDefinitiesMelamineMetKantenbandFineerEnMelamine(..Kleur.MultiplexBerk, ..ProgrammaNaam.BIMB13)
+	
+	Do ..VoegToeDefinitiesMelamineMetKantenbandMelamineEnFineer(..Kleur.BardolinoEik, ..ProgrammaNaam.PVC13)
+	Do ..VoegToeDefinitiesMelamineMetKantenbandMelamineEnFineer(..Kleur.NebraskaEikenhout, ..ProgrammaNaam.PVC13)
+	Do ..VoegToeDefinitiesMelamineMetKantenbandMelamineEnFineer(..Kleur.Zwart, ..ProgrammaNaam.PVC13)
+	Do ..VoegToeDefinitiesMelamineMetKantenbandMelamineEnFineer(..Kleur.Wit, ..ProgrammaNaam.PVC13)
+	Do ..VoegToeDefinitiesMelamineMetKantenbandMelamineEnFineer(..Kleur.OnyxGrijs, ..ProgrammaNaam.PVC13)
+	Do ..VoegToeDefinitiesMelamineMetKantenbandMelamineEnFineer(..Kleur.Dakar, ..ProgrammaNaam.PVC13)
+	Do ..VoegToeDefinitiesMelamineMetKantenbandMelamineEnFineer(..Kleur.Linnen, ..ProgrammaNaam.XPVC13)
+]]></Implementation>
+</Method>
+
+<Method name="VoegToeDefinitiesFineerMetKantenbandFineerEnMelamine">
+<FormalSpec>KantenbandKleurBoven:DOM.PM.enu.TAORKantenbandKleur,ProgrammaNaamBoven:APPS.Halux.Machine.Kantenband.enu.ProgrammaNaam</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Do ..VoegToeDefinitieFineerMetKantenbandFineerEnMelamine(..GeefKantenbandDefinitie(..PlaatAfwerking.Fineer, KantenbandKleurBoven, ..Kleur.BardolinoEik, ProgrammaNaamBoven, ..ProgrammaNaam.PVC13))
+	Do ..VoegToeDefinitieFineerMetKantenbandFineerEnMelamine(..GeefKantenbandDefinitie(..PlaatAfwerking.Fineer, KantenbandKleurBoven, ..Kleur.NebraskaEikenhout, ProgrammaNaamBoven, ..ProgrammaNaam.PVC13))
+	Do ..VoegToeDefinitieFineerMetKantenbandFineerEnMelamine(..GeefKantenbandDefinitie(..PlaatAfwerking.Fineer, KantenbandKleurBoven, ..Kleur.Zwart, ProgrammaNaamBoven, ..ProgrammaNaam.PVC13))
+	Do ..VoegToeDefinitieFineerMetKantenbandFineerEnMelamine(..GeefKantenbandDefinitie(..PlaatAfwerking.Fineer, KantenbandKleurBoven, ..Kleur.Wit, ProgrammaNaamBoven, ..ProgrammaNaam.PVC13))
+	Do ..VoegToeDefinitieFineerMetKantenbandFineerEnMelamine(..GeefKantenbandDefinitie(..PlaatAfwerking.Fineer, KantenbandKleurBoven, ..Kleur.OnyxGrijs, ProgrammaNaamBoven, ..ProgrammaNaam.PVC13))
+	Do ..VoegToeDefinitieFineerMetKantenbandFineerEnMelamine(..GeefKantenbandDefinitie(..PlaatAfwerking.Fineer, KantenbandKleurBoven, ..Kleur.Dakar, ProgrammaNaamBoven, ..ProgrammaNaam.PVC13))
+	Do ..VoegToeDefinitieFineerMetKantenbandFineerEnMelamine(..GeefKantenbandDefinitie(..PlaatAfwerking.Fineer, KantenbandKleurBoven, ..Kleur.Linnen, ProgrammaNaamBoven, ..ProgrammaNaam.XPVC13))
+]]></Implementation>
+</Method>
+
+<Method name="VoegToeDefinitieFineerMetKantenbandFineerEnMelamine">
+<FormalSpec>KantenbandDefinitie:APPS.Halux.Machine.Kantenband.PassageDefinitieDefinieerder.KantenbandDefinitie</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, KantenbandDefinitie.KleurBoven, KantenbandDefinitie.KleurOnder).MetWaarde(..Passage.Een, KantenbandDefinitie.ProgrammaNaamBoven, $$$True, $$$False)
+	Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, KantenbandDefinitie.KleurBoven, KantenbandDefinitie.KleurOnder).MetWaarde(..Passage.Twee, KantenbandDefinitie.ProgrammaNaamOnder, $$$True, $$$True)
+	Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, KantenbandDefinitie.KleurBoven, KantenbandDefinitie.KleurOnder).MetWaarde(..Passage.Drie,  ..ProgrammaNaam.Transfer, $$$True, $$$False)
+	Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, KantenbandDefinitie.KleurBoven, KantenbandDefinitie.KleurOnder).MetWaarde(..Passage.Vier,  ..ProgrammaNaam.Schiele, $$$False, $$$False, ..Uitgang)
+]]></Implementation>
+</Method>
+
+<Method name="VoegToeDefinitiesFineerMetKantenbandMelamineEnFineer">
+<FormalSpec>KantenbandKleurBoven:DOM.PM.enu.TAORKantenbandKleur,ProgrammaNaamBoven:APPS.Halux.Machine.Kantenband.enu.ProgrammaNaam</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Do ..VoegToeDefinitieFineerMetKantenbandMelamineEnFineer(..GeefKantenbandDefinitie(..PlaatAfwerking.Fineer, KantenbandKleurBoven, ..Kleur.NatuurEikenhout, ProgrammaNaamBoven, ..ProgrammaNaam.NE13))
+	Do ..VoegToeDefinitieFineerMetKantenbandMelamineEnFineer(..GeefKantenbandDefinitie(..PlaatAfwerking.Fineer, KantenbandKleurBoven, ..Kleur.NatuurNotenhout, ProgrammaNaamBoven, ..ProgrammaNaam.NN13))
+	Do ..VoegToeDefinitieFineerMetKantenbandMelamineEnFineer(..GeefKantenbandDefinitie(..PlaatAfwerking.Fineer, KantenbandKleurBoven, ..Kleur.ZwartIngekleurdYaya, ProgrammaNaamBoven, ..ProgrammaNaam.ZY13))
+	Do ..VoegToeDefinitieFineerMetKantenbandMelamineEnFineer(..GeefKantenbandDefinitie(..PlaatAfwerking.Fineer, KantenbandKleurBoven, ..Kleur.Berk, ProgrammaNaamBoven, ..ProgrammaNaam.BE13))
+	Do ..VoegToeDefinitieFineerMetKantenbandMelamineEnFineer(..GeefKantenbandDefinitie(..PlaatAfwerking.Fineer, KantenbandKleurBoven, ..Kleur.Sycomore, ProgrammaNaamBoven, ..ProgrammaNaam.SY13))
+	Do ..VoegToeDefinitieFineerMetKantenbandMelamineEnFineer(..GeefKantenbandDefinitie(..PlaatAfwerking.Fineer, KantenbandKleurBoven, ..Kleur.BrutEik, ProgrammaNaamBoven, ..ProgrammaNaam.XE13))
+	Do ..VoegToeDefinitieFineerMetKantenbandMelamineEnFineer(..GeefKantenbandDefinitie(..PlaatAfwerking.Fineer, KantenbandKleurBoven, ..Kleur.MultiplexBerk, ProgrammaNaamBoven, ..ProgrammaNaam.MB13))
+]]></Implementation>
+</Method>
+
+<Method name="VoegToeDefinitieFineerMetKantenbandMelamineEnFineer">
+<FormalSpec>KantenbandDefinitie:APPS.Halux.Machine.Kantenband.PassageDefinitieDefinieerder.KantenbandDefinitie</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, KantenbandDefinitie.KleurBoven, KantenbandDefinitie.KleurOnder).MetWaarde(..Passage.Een, KantenbandDefinitie.ProgrammaNaamBoven, $$$True, $$$False)
+	Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, KantenbandDefinitie.KleurBoven, KantenbandDefinitie.KleurOnder).MetWaarde(..Passage.Twee, KantenbandDefinitie.ProgrammaNaamOnder, $$$True, $$$True)
+	Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, KantenbandDefinitie.KleurBoven, KantenbandDefinitie.KleurOnder).MetWaarde(..Passage.Drie,  ..ProgrammaNaam.Schiele, $$$True, $$$False)
+	Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, KantenbandDefinitie.KleurBoven, KantenbandDefinitie.KleurOnder).MetWaarde(..Passage.Vier,  ..ProgrammaNaam.Transfer, $$$False, $$$False, ..Uitgang)
+]]></Implementation>
+</Method>
+
+<Method name="VoegToeDefinitiesMelamineMetKantenbandFineerEnMelamine">
+<FormalSpec>KantenbandKleurBoven:DOM.PM.enu.TAORKantenbandKleur,ProgrammaNaamBoven:APPS.Halux.Machine.Kantenband.enu.ProgrammaNaam</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Do ..VoegToeDefinitieMelamineMetKantenbandFineerEnMelamine(..GeefKantenbandDefinitie(..PlaatAfwerking.Melamine, KantenbandKleurBoven, ..Kleur.BardolinoEik, ProgrammaNaamBoven, ..ProgrammaNaam.PVC13))
+	Do ..VoegToeDefinitieMelamineMetKantenbandFineerEnMelamine(..GeefKantenbandDefinitie(..PlaatAfwerking.Melamine, KantenbandKleurBoven, ..Kleur.NebraskaEikenhout, ProgrammaNaamBoven, ..ProgrammaNaam.PVC13))
+	Do ..VoegToeDefinitieMelamineMetKantenbandFineerEnMelamine(..GeefKantenbandDefinitie(..PlaatAfwerking.Melamine, KantenbandKleurBoven, ..Kleur.Zwart, ProgrammaNaamBoven, ..ProgrammaNaam.PVC13))
+	Do ..VoegToeDefinitieMelamineMetKantenbandFineerEnMelamine(..GeefKantenbandDefinitie(..PlaatAfwerking.Melamine, KantenbandKleurBoven, ..Kleur.Wit, ProgrammaNaamBoven, ..ProgrammaNaam.PVC13))
+	Do ..VoegToeDefinitieMelamineMetKantenbandFineerEnMelamine(..GeefKantenbandDefinitie(..PlaatAfwerking.Melamine, KantenbandKleurBoven, ..Kleur.OnyxGrijs, ProgrammaNaamBoven, ..ProgrammaNaam.PVC13))
+	Do ..VoegToeDefinitieMelamineMetKantenbandFineerEnMelamine(..GeefKantenbandDefinitie(..PlaatAfwerking.Melamine, KantenbandKleurBoven, ..Kleur.Dakar, ProgrammaNaamBoven, ..ProgrammaNaam.PVC13))
+	Do ..VoegToeDefinitieMelamineMetKantenbandFineerEnMelamine(..GeefKantenbandDefinitie(..PlaatAfwerking.Melamine, KantenbandKleurBoven, ..Kleur.Linnen, ProgrammaNaamBoven, ..ProgrammaNaam.XPVC13))
+]]></Implementation>
+</Method>
+
+<Method name="VoegToeDefinitieMelamineMetKantenbandFineerEnMelamine">
+<FormalSpec>KantenbandDefinitie:APPS.Halux.Machine.Kantenband.PassageDefinitieDefinieerder.KantenbandDefinitie</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, KantenbandDefinitie.KleurBoven, KantenbandDefinitie.KleurOnder).MetWaarde(..Passage.Een, KantenbandDefinitie.ProgrammaNaamBoven, $$$True, $$$False)
+	Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, KantenbandDefinitie.KleurBoven, KantenbandDefinitie.KleurOnder).MetWaarde(..Passage.Twee, KantenbandDefinitie.ProgrammaNaamOnder, $$$True, $$$True)
+	Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, KantenbandDefinitie.KleurBoven, KantenbandDefinitie.KleurOnder).MetWaarde(..Passage.Drie,  ..ProgrammaNaam.Transfer, $$$True, $$$False)
+	Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, KantenbandDefinitie.KleurBoven, KantenbandDefinitie.KleurOnder).MetWaarde(..Passage.Vier,  ..ProgrammaNaam.Schiele, $$$False, $$$False, ..Uitgang)
+]]></Implementation>
+</Method>
+
+<Method name="VoegToeDefinitiesMelamineMetKantenbandMelamineEnFineer">
+<FormalSpec>KantenbandKleurBoven:DOM.PM.enu.TAORKantenbandKleur,ProgrammaNaamBoven:APPS.Halux.Machine.Kantenband.enu.ProgrammaNaam</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Do ..VoegToeDefinitieMelamineMetKantenbandMelamineEnFineer(..GeefKantenbandDefinitie(..PlaatAfwerking.Melamine, KantenbandKleurBoven, ..Kleur.NatuurEikenhout, ProgrammaNaamBoven, ..ProgrammaNaam.BINE13))
+	Do ..VoegToeDefinitieMelamineMetKantenbandMelamineEnFineer(..GeefKantenbandDefinitie(..PlaatAfwerking.Melamine, KantenbandKleurBoven, ..Kleur.NatuurNotenhout, ProgrammaNaamBoven, ..ProgrammaNaam.BINN13))
+	Do ..VoegToeDefinitieMelamineMetKantenbandMelamineEnFineer(..GeefKantenbandDefinitie(..PlaatAfwerking.Melamine, KantenbandKleurBoven, ..Kleur.ZwartIngekleurdYaya, ProgrammaNaamBoven, ..ProgrammaNaam.BIZY13))
+	Do ..VoegToeDefinitieMelamineMetKantenbandMelamineEnFineer(..GeefKantenbandDefinitie(..PlaatAfwerking.Melamine, KantenbandKleurBoven, ..Kleur.Berk, ProgrammaNaamBoven, ..ProgrammaNaam.BIBE13))
+	Do ..VoegToeDefinitieMelamineMetKantenbandMelamineEnFineer(..GeefKantenbandDefinitie(..PlaatAfwerking.Melamine, KantenbandKleurBoven, ..Kleur.Sycomore, ProgrammaNaamBoven, ..ProgrammaNaam.BISY13))
+	Do ..VoegToeDefinitieMelamineMetKantenbandMelamineEnFineer(..GeefKantenbandDefinitie(..PlaatAfwerking.Melamine, KantenbandKleurBoven, ..Kleur.BrutEik, ProgrammaNaamBoven, ..ProgrammaNaam.BIXE13))
+	Do ..VoegToeDefinitieMelamineMetKantenbandMelamineEnFineer(..GeefKantenbandDefinitie(..PlaatAfwerking.Melamine, KantenbandKleurBoven, ..Kleur.MultiplexBerk, ProgrammaNaamBoven, ..ProgrammaNaam.BIMB13))
+]]></Implementation>
+</Method>
+
+<Method name="VoegToeDefinitieMelamineMetKantenbandMelamineEnFineer">
+<FormalSpec>KantenbandDefinitie:APPS.Halux.Machine.Kantenband.PassageDefinitieDefinieerder.KantenbandDefinitie</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, KantenbandDefinitie.KleurBoven, KantenbandDefinitie.KleurOnder).MetWaarde(..Passage.Een, KantenbandDefinitie.ProgrammaNaamBoven, $$$True, $$$False)
+	Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, KantenbandDefinitie.KleurBoven, KantenbandDefinitie.KleurOnder).MetWaarde(..Passage.Twee, KantenbandDefinitie.ProgrammaNaamOnder, $$$True, $$$True)
+	Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, KantenbandDefinitie.KleurBoven, KantenbandDefinitie.KleurOnder).MetWaarde(..Passage.Drie, ..ProgrammaNaam.Schiele, $$$True, $$$False)
+	Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, KantenbandDefinitie.KleurBoven, KantenbandDefinitie.KleurOnder).MetWaarde(..Passage.Vier, ..ProgrammaNaam.Transfer, $$$False, $$$False, ..Uitgang)
+]]></Implementation>
+</Method>
 </Class>