Index: APPS/Halux/PPS/Document/impl/common/OnderdelenPicking.cls.xml
===================================================================
diff -u -r70914 -r70915
--- APPS/Halux/PPS/Document/impl/common/OnderdelenPicking.cls.xml	(.../OnderdelenPicking.cls.xml)	(revision 70914)
+++ APPS/Halux/PPS/Document/impl/common/OnderdelenPicking.cls.xml	(.../OnderdelenPicking.cls.xml)	(revision 70915)
@@ -179,12 +179,11 @@
 		#dim IsProductiegroepFlatackV1 As %Boolean = (Productiegroep = ##class(APPS.Halux.common.enu.ProductieGroep).FlatpackV1())
 		#dim IsProductiegroepV1 As %Boolean = (Productiegroep = ##class(APPS.Halux.common.enu.ProductieGroep).Stuk())
 		
-		If ((Categorie = ##class(APPS.Halux.common.enu.Categorie).TAORbox()) && (IsProductiegroepProbox || IsProductiegroepFlatackV1)) {
-			Set GesorteerdeUitvoeringInfoIterator =  ..GeefAlleProductenMetSamengeteldeGeleiders(GesorteerdeUitvoeringInfoIterator)
-			
-			If (IsProductiegroepProbox) {
-				Set GesorteerdeUitvoeringInfoIterator =  ..GeefAlleProductenBehalveBodemplatenIterator(GesorteerdeUitvoeringInfoIterator)			//Bodemplaten horen niet thuis op een pickinglijst
+		If (Categorie = ##class(APPS.Halux.common.enu.Categorie).TAORbox()) {
+			If (IsProductiegroepProbox || IsProductiegroepFlatackV1) {
+				Set GesorteerdeUitvoeringInfoIterator =  ..GeefAlleProductenMetSamengeteldeGeleiders(GesorteerdeUitvoeringInfoIterator)
 			}
+			;Set GesorteerdeUitvoeringInfoIterator =  ..GeefAlleProductenBehalveBodemplatenIterator(GesorteerdeUitvoeringInfoIterator)
 		} 
 		
 		If (Categorie = ##class(APPS.Halux.common.enu.Categorie).Merivobox()) {
@@ -280,7 +279,9 @@
 	
 	While GesorteerdeUitvoeringInfoIterator.HasNext() {
 		Set Product = GesorteerdeUitvoeringInfoIterator.Next()
+		Do ##class(Tools.Wlip).%New(110).String(Product.HFV.GeefOmschrijving())
 		If $$$Not(##class(TECH.StringUtils).StartsWith(Product.HFV.GeefOmschrijving(), "Bodemplaat")) {
+			Do ##class(Tools.Wlip).%New(110).String("Insert")
 			Do NieuweLijst.Insert(Product)
 		}
 	}
@@ -333,7 +334,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefAlleProductenMetHerberekendeAfdekkappenRugwandhouders">
+<Method name="GeefAlleProductenMetSamengeteldeAfdekkappenRugwandhouders">
 <FormalSpec>GesorteerdeUitvoeringInfoIterator:TECH.Iterator</FormalSpec>
 <Private>1</Private>
 <ReturnType>TECH.Iterator</ReturnType>