Index: UI/MB/UGLYPicking/dlgOrderListDeliverySelection.cls.xml
===================================================================
diff -u -r73957 -r74614
--- UI/MB/UGLYPicking/dlgOrderListDeliverySelection.cls.xml	(.../dlgOrderListDeliverySelection.cls.xml)	(revision 73957)
+++ UI/MB/UGLYPicking/dlgOrderListDeliverySelection.cls.xml	(.../dlgOrderListDeliverySelection.cls.xml)	(revision 74614)
@@ -818,7 +818,7 @@
  . Set Verzendwijze=RS.Get("VerzendWijze")
  . Set Magazijn=RS.Get("Magazijn")
  . Quit:(CheckMagazijn && (Magazijn'=..FilterMagazijn))
- . Set:(##class(TECH.StringUtils).Equals(Verzendwijze, "HD", "HD1", "HD2", "HD3", "HD4", "HD5", "HD6", "HD7", "HW", "HW3", "DA", "DA1", "DA2", "DA3", "DA4", "DA5", "DA6", "DA7", "DA8", "DA9", "DAX", "BS", "BS3", "DO", "DO3", "DO4", "U01", "U02", "U03", "U04", "U05", "U06", "U07", "U08", "U09", "U10", "U11", "E01", "E02", "E03", "E04", "E05", "E06", "E07", "E08", "E09", "E10", "E11", "E12", "EX", "EXU", "SFS", "T01", "T02", "T03", "T04", "T05", "T06", "T07", "T08", "HA1", "HA2", "HA3", "HA4", "AFH", "SNT")) Verzendwijze = "EXPORT + URGENT"
+ . Set:(##class(TECH.StringUtils).Equals(Verzendwijze, "HD", "HD1", "HD2", "HD3", "HD4", "HD5", "HD6", "HD7", "HW", "HW3", "DA", "DA1", "DA2", "DA3", "DA4", "DA5", "DA6", "DA7", "DA8", "DA9", "DAX", "BS", "BS3", "DO", "DO3", "DO4", "U01", "U02", "U03", "U04", "U05", "U06", "U07", "U08", "U09", "U10", "U11", "E01", "E02", "E03", "E04", "E05", "E06", "E07", "E08", "E09", "E10", "E11", "E12", "EX", "EXU", "SFS", "T01", "T02", "T03", "T04", "T05", "T06", "T07", "T08", "HA1", "HA2", "HA3", "HA4", "SNT")) Verzendwijze = "EXPORT + URGENT"
  . Set:(##class(TECH.StringUtils).Equals(Verzendwijze,"DI2", "OD", "OD1", "OD2", "OD3", "OD4", "OD5")) Verzendwijze = "DI2 + OD"
  . Set:(##class(TECH.StringUtils).Equals(Verzendwijze,"DD1")) Verzendwijze = "DD1"
  . Set:(##class(TECH.StringUtils).Equals(Verzendwijze,"DI1")) Verzendwijze = "DI1"