Index: vhUnitTest/BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator/GenereerProboxInhoudEtiket/Test.cls.xml
===================================================================
diff -u -r63119 -r63122
--- vhUnitTest/BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator/GenereerProboxInhoudEtiket/Test.cls.xml	(.../Test.cls.xml)	(revision 63119)
+++ vhUnitTest/BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator/GenereerProboxInhoudEtiket/Test.cls.xml	(.../Test.cls.xml)	(revision 63122)
@@ -67,7 +67,9 @@
 	Do $$$AssertEquals(Etiket.InhoudAlsHTML, InhoudAlsHTML)
 	Do $$$AssertEquals(Etiket.PalletBarcode, ..DnaCode1.PalletCode)
 	Do $$$AssertEquals(Etiket.PalletBarcodeTxt, "TBX1 2345")
+	
 	Do $$$AssertEquals(Etiket.OrderRef, Order.GeefOrderReferentie())
+	Do $$$AssertEquals(Etiket.OrderNr, Order.GeefID())
 		
 	Do PartijAPIMock.Verifieer()
 	Do HtmlInhoudProboxEtiketBepalerMock.Verifieer()
Index: BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator.cls.xml
===================================================================
diff -u -r63119 -r63122
--- BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator.cls.xml	(.../ProboxInhoudEtiketGenerator.cls.xml)	(revision 63119)
+++ BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator.cls.xml	(.../ProboxInhoudEtiketGenerator.cls.xml)	(revision 63122)
@@ -62,6 +62,8 @@
  	Set ProboxInhoudLabel.PalletBarcode = PalletId
  	Set ProboxInhoudLabel.PalletBarcodeTxt = ..FormatteerPalletID(PalletId)
 	Set ProboxInhoudLabel.OrderRef = Order.GeefOrderReferentie()
+	Do ##class(Tools.Wlip).%New(26).String(Order.GeefID())
+	Set ProboxInhoudLabel.OrderNr = Order.GeefID()
 
  	Set ProboxInhoudLabel.Logo = ..GeefEtiketLogo(KlantNummer)
  	
Index: BL/Etiket/ProboxInhoud.cls.xml
===================================================================
diff -u -r63119 -r63122
--- BL/Etiket/ProboxInhoud.cls.xml	(.../ProboxInhoud.cls.xml)	(revision 63119)
+++ BL/Etiket/ProboxInhoud.cls.xml	(.../ProboxInhoud.cls.xml)	(revision 63122)
@@ -39,6 +39,11 @@
 <Parameter name="TRUNCATE" value="1"/>
 </Property>
 
+<Property name="OrderNr">
+<Type>%String</Type>
+<Parameter name="TRUNCATE" value="1"/>
+</Property>
+
 <Method name="WriteRow">
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
@@ -48,6 +53,7 @@
 	write ..VervangNietPrintbareKaraktersDoorSpatie(..PalletBarcodeTxt),$$$TAB
 	write ..VervangNietPrintbareKaraktersDoorSpatie(..PalletBarcode),$$$TAB
 	Write ..VervangNietPrintbareKaraktersDoorSpatie(..OrderRef),$$$TAB
+	Write ..VervangNietPrintbareKaraktersDoorSpatie(..OrderNr),$$$TAB
 	
 	write $$$CRLF
 	quit $$$OK