Index: UI/MB/UGLYPicking/dlgOrderSel.cls.xml
===================================================================
diff -u -r60085 -r73957
--- UI/MB/UGLYPicking/dlgOrderSel.cls.xml	(.../dlgOrderSel.cls.xml)	(revision 60085)
+++ UI/MB/UGLYPicking/dlgOrderSel.cls.xml	(.../dlgOrderSel.cls.xml)	(revision 73957)
@@ -762,13 +762,11 @@
  Quit:(Button.Enabled="False")
 
  New frmOrderList
- Set frmOrderList=##class(UI.MB.UGLYPicking.dlgOrderList).%New($LB(%this.Form.Address,0))
+ Set frmOrderList=##class(UI.MB.UGLYPicking.dlgOrderListDeliverySelection).%New($LB(%this.Form.Address,0))
  Set frmOrderList.FilterMagazijn=Sender.Tag
- Quit:(frmOrderList.dCOMPWRITElbOrders()=0)
+ Quit:(frmOrderList.dCOMPWRITEOrders()=0)
  Quit:(frmOrderList.Form.ShowModal()=$$$mrCancel)
-
- Do ..dCOMPWRITEOrders(frmOrderList.outConsNr)
-
+ 
  ;End of user code
  s Args=$lb(Sender)
  q
@@ -1173,6 +1171,9 @@
 <Value name="55">
 <Value>MagazijnClicked</Value>
 </Value>
+<Value name="56">
+<Value>VerzendwijzeClicked</Value>
+</Value>
 </Data>
 </Storage>
 </Class>