Index: APPS/Halux/PPS/Activiteit/impl/TAOR/ZijkantPlaatPicking/ZijkantPlaatInfoAanvuller.cls.xml
===================================================================
diff -u -r30946 -r31004
--- APPS/Halux/PPS/Activiteit/impl/TAOR/ZijkantPlaatPicking/ZijkantPlaatInfoAanvuller.cls.xml	(.../ZijkantPlaatInfoAanvuller.cls.xml)	(revision 30946)
+++ APPS/Halux/PPS/Activiteit/impl/TAOR/ZijkantPlaatPicking/ZijkantPlaatInfoAanvuller.cls.xml	(.../ZijkantPlaatInfoAanvuller.cls.xml)	(revision 31004)
@@ -58,22 +58,19 @@
 		#dim LinksBinnenKleur As DOM.PM.enu.TAORLadeKleur
 		#dim ZijkantIterator As TECH.Iterator = ..Lade.GeefZijkantIterator()
 
-		while (ZijkantIterator.HasNext()) {
+		if (ZijkantIterator.HasNext()) {
 			#dim Zijkant As DOM.PM.Maatwerk.LadeInfo.impl.TAX.Zijkant = ZijkantIterator.Next()
 			#dim PlatenIterator As TECH.Iterator = Zijkant.GeefPlatenIterator()
-
-			while (PlatenIterator.HasNext()) {
+			if (PlatenIterator.HasNext()) {
 				#dim Plaat As DOM.PM.Maatwerk.LadeInfo.impl.TAX.ZijkantPlaat = PlatenIterator.Next()
 				set RechtsBuitenKleur = Plaat.GeefBuitenkleur()
 				set RechtsBinnenKleur = Plaat.GeefBinnenkleur()	
 				set LinksBuitenKleur = Plaat.GeefBuitenkleur()
 				set LinksBinnenKleur = Plaat.GeefBinnenkleur()	
 			}
+		   set Kleur = RechtsBuitenKleur _ "-" _ RechtsBinnenKleur _ "-" _ LinksBuitenKleur _ "-" _ LinksBinnenKleur	
 		}
-		
-		set Kleur = RechtsBuitenKleur _ "-" _ RechtsBinnenKleur _ "-" _ LinksBuitenKleur _ "-" _ LinksBinnenKleur
 	}
-
 	quit Kleur
 ]]></Implementation>
 </Method>