Index: APPS/MAG/UGLYPicking/impl/UglyPickingService.cls.xml
===================================================================
diff -u -r1582 -r1586
--- APPS/MAG/UGLYPicking/impl/UglyPickingService.cls.xml	(.../UglyPickingService.cls.xml)	(revision 1582)
+++ APPS/MAG/UGLYPicking/impl/UglyPickingService.cls.xml	(.../UglyPickingService.cls.xml)	(revision 1586)
@@ -66,22 +66,16 @@
 		
 		Set Bon.AantalLijnen = 0
 		Set Bon.AantalActieveLijnen = 0		
-		Set OrderHoofding = ##class(Flow.OrderWMS.Hoofding).%OpenId(BonNr,0)
-		Set LijnIterator = ##class(TECH.ListIterator).%New(OrderHoofding.Lijnen)
-		While (LijnIterator.HasNext())
+		Set SublijnIterator = ##class(APPS.MAG.UGLYPicking.impl.SublijnInBonIterator).%New(BonNr)
+		While (SublijnIterator.HasNext())
 		{
-			Set Lijn = LijnIterator.Next()
-			Set SublijnIterator = ##class(TECH.ListIterator).%New(Lijn.Subs)
-			While (SublijnIterator.HasNext())
+			Set Sublijn = SublijnIterator.Next()
+			If (Sublijn.VerwerkingSoftware = ##class(APPS.MAG.UGLYPicking.enu.Magazijn).DisplayToLogical(MagazijnNaam))
 			{
-				Set Sublijn = SublijnIterator.Next()
-				If (Sublijn.VerwerkingSoftware = ##class(APPS.MAG.UGLYPicking.enu.Magazijn).DisplayToLogical(MagazijnNaam))
+				Set Bon.AantalLijnen = Bon.AantalLijnen + 1
+				If (Sublijn.StatusWMS="W")
 				{
-					Set Bon.AantalLijnen = Bon.AantalLijnen + 1
-					If (Sublijn.StatusWMS="W")
-					{
-						Set Bon.AantalActieveLijnen = Bon.AantalActieveLijnen + 1
-					}
+					Set Bon.AantalActieveLijnen = Bon.AantalActieveLijnen + 1
 				}
 			}
 		}