Index: BL/Etiket/TBXProboxOverdoos.cls.xml
===================================================================
diff -u -r2024 -r2030
--- BL/Etiket/TBXProboxOverdoos.cls.xml	(.../TBXProboxOverdoos.cls.xml)	(revision 2024)
+++ BL/Etiket/TBXProboxOverdoos.cls.xml	(.../TBXProboxOverdoos.cls.xml)	(revision 2030)
@@ -37,6 +37,18 @@
 <Type>%String</Type>
 </Property>
 
+<Property name="ToeleveringNr">
+<Type>%String</Type>
+</Property>
+
+<Property name="VerzendWijze">
+<Type>%String</Type>
+</Property>
+
+<Property name="ProductieWeek">
+<Type>%String</Type>
+</Property>
+
 <Method name="WriteRow">
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
@@ -52,6 +64,11 @@
 	write ..OrderRef,$$$TAB
 	write ..OrderNr,$$$TAB
 	
+	write ..ToeleveringNr,$$$TAB
+	write ..VerzendWijze,$$$TAB
+	
+	write ..ProductieWeek,$$$TAB
+	
 	write $$$CRLF
 	quit $$$OK
 ]]></Implementation>
Index: BL/PPS/TBX/DocsV1.cls.xml
===================================================================
diff -u -r2027 -r2030
--- BL/PPS/TBX/DocsV1.cls.xml	(.../DocsV1.cls.xml)	(revision 2027)
+++ BL/PPS/TBX/DocsV1.cls.xml	(.../DocsV1.cls.xml)	(revision 2030)
@@ -1385,15 +1385,21 @@
  	
  	set PalletID = ..GeefNieuwPalletID(##class(BL.PPS.TBX.enu.PalletEtiketType).Probox())
  	
- 	set Label.Logo = ..GeefPalletEtiketLogo(##class(BL.PPS.TBX.enu.PalletEtiketType).Probox())
+ 	set Label.Logo = ..GeefEtiketLogo(Klant.GeefNummer())
  	
  	set Label.KlantNaam = Klant.GeefNaam()
+ 	
  	set Label.PalletBarcode = PalletID
  	set Label.PalletBarcodeTxt = ..FormatteerPalletID(PalletID)
  	
  	set Label.OrderRef = Order.GeefKlantReferentie()
  	set Label.OrderNr = Order.GeefOrderNr()
  	
+ 	set Label.ToeleveringNr = Toelevering.GeefToeNr()
+ 	set Label.VerzendWijze = Order.GeefVerzendWijze().VerzendWijze
+ 	
+ 	set Label.ProductieWeek = $translate($$EXTDATE^vhDTyp(Toelevering.GeefDueOutTime(),"DW"),"/","")
+ 	
  	set Label.Aantal = ..BepaalProboxAantal(Toelevering)
 
  	do blLabelPrinter.PrintDirect2Bartender(Label)