Index: BL/PPS/common/impl/OnderdelenEtiketPrinterBijLade.cls.xml
===================================================================
diff -u -r71814 -r71930
--- BL/PPS/common/impl/OnderdelenEtiketPrinterBijLade.cls.xml	(.../OnderdelenEtiketPrinterBijLade.cls.xml)	(revision 71814)
+++ BL/PPS/common/impl/OnderdelenEtiketPrinterBijLade.cls.xml	(.../OnderdelenEtiketPrinterBijLade.cls.xml)	(revision 71930)
@@ -64,7 +64,7 @@
 			#dim ToeleveringID As %String = OnderdelenInfoArrayIt.Key()
 			Set AantalEtikettenPerToeleveringBepaler = ##class(BL.PPS.common.impl.AantalEtikettenPerToeleveringBepaler).%New()
 			Set AantalEtiketten = AantalEtikettenPerToeleveringBepaler.GeefAantalEtiketten(OnderdelenInfoIt)
-			Set pxLabel = ..EtikettenCommissieOne(ToeleveringID,AantalEtiketten,"ONDERDELEN")
+			Set pxLabel = ..EtikettenCommissieOne(ToeleveringID,AantalEtiketten,"ONDERDELEN", ..BatchID)
 			Do LijstVanToeleveringenMetOnderdelendoos.Insert(ToeleveringID)
 			Do blLabelPrinter.Add(pxLabel)
 		}
Index: BL/PPS/TBX/sub/pxCommissie.cls.xml
===================================================================
diff -u -r59138 -r71930
--- BL/PPS/TBX/sub/pxCommissie.cls.xml	(.../pxCommissie.cls.xml)	(revision 59138)
+++ BL/PPS/TBX/sub/pxCommissie.cls.xml	(.../pxCommissie.cls.xml)	(revision 71930)
@@ -74,6 +74,13 @@
 <Parameter name="TRUNCATE" value="1"/>
 </Property>
 
+<Property name="BatchNr">
+<Description>
+9</Description>
+<Type>%String</Type>
+<Parameter name="TRUNCATE" value="1"/>
+</Property>
+
 <Method name="WriteRow">
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
@@ -85,7 +92,8 @@
 	Write ..VervangNietPrintbareKaraktersDoorSpatie(..OrderNr),$$$TAB
 	Write ..VervangNietPrintbareKaraktersDoorSpatie(..TOENr),$$$TAB
 	Write ..VervangNietPrintbareKaraktersDoorSpatie(..OrderRef),$$$TAB
-	Write ..VervangNietPrintbareKaraktersDoorSpatie(..PalletType)
+	Write ..VervangNietPrintbareKaraktersDoorSpatie(..PalletType),$$$TAB
+	Write ..VervangNietPrintbareKaraktersDoorSpatie(..BatchNr)
 	Write $$$CRLF
 	Quit $$$OK
 ]]></Implementation>
Index: BL/PPS/common/impl/OnderdelenEtiketPrinterBase.cls.xml
===================================================================
diff -u -r71814 -r71930
--- BL/PPS/common/impl/OnderdelenEtiketPrinterBase.cls.xml	(.../OnderdelenEtiketPrinterBase.cls.xml)	(revision 71814)
+++ BL/PPS/common/impl/OnderdelenEtiketPrinterBase.cls.xml	(.../OnderdelenEtiketPrinterBase.cls.xml)	(revision 71930)
@@ -90,7 +90,7 @@
 </Method>
 
 <Method name="EtikettenCommissieOne">
-<FormalSpec>ToeleveringID:%Numeric,Aantal:%Numeric,Titel:%String</FormalSpec>
+<FormalSpec>ToeleveringID:%Numeric,Aantal:%Numeric,Titel:%String,BatchNr:%String=""</FormalSpec>
 <Private>1</Private>
 <ReturnType>BL.PPS.TBX.sub.pxCommissie</ReturnType>
 <Implementation><![CDATA[
@@ -120,6 +120,7 @@
     Set pxLabel.Titel = Titel
     Set pxLabel.OrderRef = Order.GeefOrderReferentie()
     Set pxLabel.PalletType = ..GeefPalletType(Order.GeefVerzendingWijze())
+    Set pxLabel.BatchNr = BatchNr
 	Quit pxLabel
 ]]></Implementation>
 </Method>