Index: APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/PrintEtiketten.cls.xml
===================================================================
diff -u -r70177 -r72338
--- APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/PrintEtiketten.cls.xml	(.../PrintEtiketten.cls.xml)	(revision 70177)
+++ APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/PrintEtiketten.cls.xml	(.../PrintEtiketten.cls.xml)	(revision 72338)
@@ -196,6 +196,7 @@
 	Set Etiket.ExtraInfo1 = KlantEtiketData.ExtraInfo1
 	Set Etiket.Ean = KlantEtiketData.Ean
 	Set Etiket.DnaCode = KlantEtiketData.DnaCode
+	Set Etiket.BatchID = KlantEtiketData.BatchID
 	
 	Quit Etiket
 ]]></Implementation>
Index: APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/KlantEtiketDataProductAanvuller.cls.xml
===================================================================
diff -u -r61692 -r72338
--- APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/KlantEtiketDataProductAanvuller.cls.xml	(.../KlantEtiketDataProductAanvuller.cls.xml)	(revision 61692)
+++ APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/KlantEtiketDataProductAanvuller.cls.xml	(.../KlantEtiketDataProductAanvuller.cls.xml)	(revision 72338)
@@ -95,6 +95,7 @@
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = Product.GeefIngegevenKenmerken()
 	#dim LadeInfo As DOM.PM.Maatwerk.LadeInfo.Lade = ..LadeInfoAPI.GeefLade(Product.GeefHalffabItemsBoom(), IngegevenKenmerken)
 
+	Set UitvoeringInfo.KlantEtiketData.BatchID = UitvoeringInfo.BatchID
 	Set UitvoeringInfo.KlantEtiketData.TypeNaam = "TA'OR BOX"
 	Set UitvoeringInfo.KlantEtiketData.Code = IngegevenKenmerken.GeefLadeCode()
 	Set UitvoeringInfo.KlantEtiketData.Dimensie = ..GeefDimensieString(LadeInfo)
Index: APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/Etiket.cls.xml
===================================================================
diff -u -r59238 -r72338
--- APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/Etiket.cls.xml	(.../Etiket.cls.xml)	(revision 59238)
+++ APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/Etiket.cls.xml	(.../Etiket.cls.xml)	(revision 72338)
@@ -121,6 +121,10 @@
 <Type>TECH.String</Type>
 </Property>
 
+<Property name="BatchID">
+<Type>TECH.Integer</Type>
+</Property>
+
 <Method name="WriteRow">
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
@@ -162,6 +166,7 @@
 	Write ..VervangNietPrintbareKaraktersDoorSpatie(..ExtraInfo1), $$$TAB
 	Write ..VervangNietPrintbareKaraktersDoorSpatie(..Ean), $$$TAB
 	Write ..VervangNietPrintbareKaraktersDoorSpatie(..DnaCode), $$$TAB
+	Write ..VervangNietPrintbareKaraktersDoorSpatie(..BatchID), $$$TAB
 ]]></Implementation>
 </Method>
 
@@ -205,6 +210,7 @@
 	Write "ExtraInfo1", $$$TAB
 	Write "Ean", $$$TAB
 	Write "DnaCode", $$$TAB
+	Write "BatchID", $$$TAB
 ]]></Implementation>
 </Method>
 </Class>