Index: APPS/MAG/UGLYPicking/impl/UglyPickingService.cls.xml
===================================================================
diff -u -r2142 -r2322
--- APPS/MAG/UGLYPicking/impl/UglyPickingService.cls.xml	(.../UglyPickingService.cls.xml)	(revision 2142)
+++ APPS/MAG/UGLYPicking/impl/UglyPickingService.cls.xml	(.../UglyPickingService.cls.xml)	(revision 2322)
@@ -442,6 +442,7 @@
 	{
 		Set ProductLijn = ..GeefProductLijnBasis(ResultSet.Data("AantalTePicken"), ResultSet.Data("Product"), MagazijnID)
 		Set ProductLijn.LocatieID = ResultSet.Data("LocTrans")
+		Set ProductLijn.IsPickbaar = ##class(EWMS.TransLoc).IsPickbaar(ProductLijn.LocatieID)
 		Set ProductLijn.PalletID = ResultSet.Data("PalletID")
 		Set ProductLijn.HeeftChargeNummer = ##class(BL.ProdHist.ChargeTrace).IsChargeProduct(ResultSet.Data("Product"),1)
 		If (ResultSet.Data("NeedAll"))