Index: APPS/Halux/Machine/Kantenband/PassageDefinitieDefinieerder/Zijkant.cls.xml
===================================================================
diff -u -r58614 -r58641
--- APPS/Halux/Machine/Kantenband/PassageDefinitieDefinieerder/Zijkant.cls.xml	(.../Zijkant.cls.xml)	(revision 58614)
+++ APPS/Halux/Machine/Kantenband/PassageDefinitieDefinieerder/Zijkant.cls.xml	(.../Zijkant.cls.xml)	(revision 58641)
@@ -81,8 +81,8 @@
 		Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, ..Kleur.BrutEik, ..Kleur.BrutEik).MetWaarde(..Passage.Een, ..ProgrammaNaam.XE13, $$$True, $$$False)
 		Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, ..Kleur.BrutEik, ..Kleur.BrutEik).MetWaarde(..Passage.Twee, ..ProgrammaNaam.XE13, $$$False, $$$True, ..Uitgang)
 	} Else {
-		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.Een, KantenbandDefinitie.ProgrammaNaamOnder, $$$True, $$$False)
+		Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, KantenbandDefinitie.KleurBoven, KantenbandDefinitie.KleurOnder).MetWaarde(..Passage.Twee, KantenbandDefinitie.ProgrammaNaamBoven, $$$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.Schiele, $$$False, $$$False, ..Uitgang)
 	}
@@ -202,10 +202,10 @@
 <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)
+	Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, KantenbandDefinitie.KleurBoven, KantenbandDefinitie.KleurOnder).MetWaarde(..Passage.Een, KantenbandDefinitie.ProgrammaNaamOnder, $$$True, $$$False)
+	Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, KantenbandDefinitie.KleurBoven, KantenbandDefinitie.KleurOnder).MetWaarde(..Passage.Twee, KantenbandDefinitie.ProgrammaNaamBoven, $$$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>
 
@@ -241,10 +241,10 @@
 <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)
+	Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, KantenbandDefinitie.KleurBoven, KantenbandDefinitie.KleurOnder).MetWaarde(..Passage.Een, KantenbandDefinitie.ProgrammaNaamOnder, $$$True, $$$False)
+	Do ..VoegToe(KantenbandDefinitie.PlaatAfwerking, KantenbandDefinitie.KleurBoven, KantenbandDefinitie.KleurOnder).MetWaarde(..Passage.Twee, KantenbandDefinitie.ProgrammaNaamBoven, $$$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>
 </Class>