Index: OBJTimpl/WMSOrder/ImporteerPicking.cls.xml
===================================================================
diff -u -r67352 -r67353
--- OBJTimpl/WMSOrder/ImporteerPicking.cls.xml	(.../ImporteerPicking.cls.xml)	(revision 67352)
+++ OBJTimpl/WMSOrder/ImporteerPicking.cls.xml	(.../ImporteerPicking.cls.xml)	(revision 67353)
@@ -78,6 +78,7 @@
 	Set it=##class(TECH.ListIterator).%New(PickLijst.PickLijnen)
 	
 	#dim AantalPerOrderLijn as %CacheString
+	K AantalPerOrderLijn
 	While it.HasNext()
 	{
 		Set ..pxPicking=it.Next()
@@ -86,20 +87,20 @@
 	
 	do it.Reset()
 	#dim CountPerOrderLijn as %CacheString
-	
+	k CountPerOrderLijn
 	While it.HasNext()
 	{
 		Set ..pxPicking=it.Next()
-		Set CountPerOrderLijn(..pxPicking.LijnNr) = $Get(AantalPerOrderLijn(..pxPicking.LijnNr),0) + 1 
+		Set CountPerOrderLijn(..pxPicking.LijnNr) = $Get(CountPerOrderLijn(..pxPicking.LijnNr),0) + 1 
 		#dim Full as %Boolean = (CountPerOrderLijn(..pxPicking.LijnNr) = AantalPerOrderLijn(..pxPicking.LijnNr))
-		Do ..VerwerkPicking(Full)
+		Do ..VerwerkPicking(Full,CountPerOrderLijn(..pxPicking.LijnNr)-1)
 	}
 	Do ..VerwerkEinde()
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkPicking">
-<FormalSpec>Full:%Boolean</FormalSpec>
+<FormalSpec>Full:%Boolean,SplitsNummer:%Integer</FormalSpec>
 <ProcedureBlock>0</ProcedureBlock>
 <Implementation><![CDATA[
 	Set ..pxPicking.ConsNr=$E(..pxPicking.ConsNr,5,10) ; YYMM moet erafgehaald worden
@@ -117,7 +118,7 @@
 	Set C("CONSNR")=..CONSNr
 	Set C("ORDNR")=$P(..pxPicking.LijnNr,Delimiter)
  	Set C("OLNR")=$P(..pxPicking.LijnNr,Delimiter,2)
- 	Set C("OLSPLITSNR")=0
+ 	Set C("OLSPLITSNR")=SplitsNummer
 	Set C("SOFTV")="V"
  	Set C("DELTAUIT")=..pxPicking.Aantal