Index: UI/MB/UGLYPicking/dlgCC.cls.xml
===================================================================
diff -u -r33875 -r66116
--- UI/MB/UGLYPicking/dlgCC.cls.xml	(.../dlgCC.cls.xml)	(revision 33875)
+++ UI/MB/UGLYPicking/dlgCC.cls.xml	(.../dlgCC.cls.xml)	(revision 66116)
@@ -1209,7 +1209,7 @@
  Set ProdsOnPal=CCProdSelForm.dCOMPWRITElvProducts()
  Set MApplication.ScreenCursor=$$$crDefault
 
- If ProdsOnPal=1 Do
+ If ((ProdsOnPal=1) && ($$IsGroep^vhUSER(..UserId, "CC"))) Do
  . New InventoryID
  . Set InventoryID=CCProdSelForm.lvProducts.Items.GetItems(0).SubItems.GetStrings($$$lvcInventoryID)
  . New PrepareOK
@@ -1220,7 +1220,7 @@
  . Else  Do
  ..  Set ..txtLocatie.Text=""
  ..  Do pdaMsgBox^vhVisual(..Form.Caption,PrepareOK,$$$MBICONERROR)
- Else  If ProdsOnPal>1 Do
+ Else  If ((ProdsOnPal>1)  && ($$IsGroep^vhUSER(..UserId, "CC"))) Do
  . Do CCProdSelForm.Form.ShowModal()
  . Do ..txtPalletID.SelectAll()
  . Set ..Form.ActiveControl=..txtPalletID