Index: OBJTimpl/WMSOrder/ImporteerPicking.cls.xml
===================================================================
diff -u -r67722 -r67736
--- OBJTimpl/WMSOrder/ImporteerPicking.cls.xml	(.../ImporteerPicking.cls.xml)	(revision 67722)
+++ OBJTimpl/WMSOrder/ImporteerPicking.cls.xml	(.../ImporteerPicking.cls.xml)	(revision 67736)
@@ -187,7 +187,7 @@
  	Set C("SOURCEPALID")=..rsPicking.GetDataByName("FROMLOC") 
  	If $Piece(..rsPicking.GetDataByName("TOLOC"),"-",1) = "KLZ.DI1" {
 	 	#Dim CodeKegeltje as %String = $Piece(..rsPicking.GetDataByName("TOLOC"),"-",2)
-	 	Set:($Length(CodeKegeltje)) C("SOURCEPALID")=..rsPicking.GetDataByName("FROMLOC") _"/"_ CodeKegeltje
+	 	Set:($Length(CodeKegeltje)) C("SOURCEPALID")=..rsPicking.GetDataByName("FROMLOC") _"-"_ CodeKegeltje
  	}
  	Set C("USER")=..rsPicking.GetDataByName("USERID")
  	Set C("LOCMSTR")=""