Index: APPS/MAG/UGLYPicking/impl/BonInMagazijnIterator.cls.xml
===================================================================
diff -u -r1581 -r1594
--- APPS/MAG/UGLYPicking/impl/BonInMagazijnIterator.cls.xml	(.../BonInMagazijnIterator.cls.xml)	(revision 1581)
+++ APPS/MAG/UGLYPicking/impl/BonInMagazijnIterator.cls.xml	(.../BonInMagazijnIterator.cls.xml)	(revision 1594)
@@ -5,7 +5,7 @@
 <Super>%RegisteredObject,TECH.Iterator</Super>
 <ClassDefinitionError>0</ClassDefinitionError>
 
-<Property name="Magazijn">
+<Property name="MagazijnID">
 <Type>APPS.MAG.UGLYPicking.enu.Magazijn</Type>
 <Private>1</Private>
 </Property>
@@ -16,12 +16,12 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>MagazijnNaam:%String</FormalSpec>
+<FormalSpec>MagazijnID:APPS.MAG.UGLYPicking.enu.Magazijn</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
-	Set ..Magazijn = ##class(APPS.MAG.UGLYPicking.enu.Magazijn).DisplayToLogical(MagazijnNaam)
+	Set ..MagazijnID = MagazijnID
 	Do ..BepaalVolgende()
 	Quit $$$OK
 ]]></Implementation>
@@ -67,7 +67,7 @@
 	
 	Set OrderHoofding = ##class(Flow.OrderWMS.Hoofding).%OpenId(BonNr,0)
 	
-	If (OrderHoofding.VerwerkingSoftware [ ..Magazijn) && ((OrderHoofding.StatusWMS = "W") || (OrderHoofding.StatusWMS = "P"))
+	If (OrderHoofding.VerwerkingSoftware [ ..MagazijnID) && ((OrderHoofding.StatusWMS = "W") || (OrderHoofding.StatusWMS = "P"))
 	{
 		Set LijnIterator = ##class(TECH.ListIterator).%New(OrderHoofding.Lijnen)
 		While ('BevatActieveLijnen) && (LijnIterator.HasNext())
@@ -77,7 +77,7 @@
 			While ('BevatActieveLijnen) && (SublijnIterator.HasNext())
 			{
 				Set Sublijn = SublijnIterator.Next()
-				Set BevatActieveLijnen = (Sublijn.StatusWMS="W") && (Sublijn.VerwerkingSoftware = ..Magazijn)
+				Set BevatActieveLijnen = (Sublijn.StatusWMS="W") && (Sublijn.VerwerkingSoftware = ..MagazijnID)
 			}
 		}
 	}