Index: BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator.cls.xml
===================================================================
diff -u -r63126 -r63154
--- BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator.cls.xml	(.../ProboxInhoudEtiketGenerator.cls.xml)	(revision 63126)
+++ BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator.cls.xml	(.../ProboxInhoudEtiketGenerator.cls.xml)	(revision 63154)
@@ -66,6 +66,7 @@
 	Set ProboxInhoudLabel.OrderNr = Order.GeefID()
 	Set ProboxInhoudLabel.ToeleveringNr = ToeleveringId
 	Set ProboxInhoudLabel.VerzendingWijze = Order.GeefVerzendingWijze()
+	Set ProboxInhoudLabel.CommissieReferentie = Order.GeefCommissieReferentie()
 
  	Set ProboxInhoudLabel.Logo = ..GeefEtiketLogo(KlantNummer)
  	
Index: vhUnitTest/BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator/GenereerProboxInhoudEtiket/Test.cls.xml
===================================================================
diff -u -r63126 -r63154
--- vhUnitTest/BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator/GenereerProboxInhoudEtiket/Test.cls.xml	(.../Test.cls.xml)	(revision 63126)
+++ vhUnitTest/BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator/GenereerProboxInhoudEtiket/Test.cls.xml	(.../Test.cls.xml)	(revision 63154)
@@ -73,6 +73,7 @@
 	Do $$$AssertEquals(Etiket.OrderNr, Order.GeefID())
 	Do $$$AssertEquals(Etiket.ToeleveringNr, ..DnaCode1.Toelevering)
 	Do $$$AssertEquals(Etiket.VerzendingWijze, Order.GeefVerzendingWijze())
+	Do $$$AssertEquals(Etiket.CommissieReferentie, Order.GeefCommissieReferentie())
 		
 	Do PartijAPIMock.Verifieer()
 	Do HtmlInhoudProboxEtiketBepalerMock.Verifieer()
Index: BL/Etiket/ProboxInhoud.cls.xml
===================================================================
diff -u -r63126 -r63154
--- BL/Etiket/ProboxInhoud.cls.xml	(.../ProboxInhoud.cls.xml)	(revision 63126)
+++ BL/Etiket/ProboxInhoud.cls.xml	(.../ProboxInhoud.cls.xml)	(revision 63154)
@@ -54,6 +54,11 @@
 <Parameter name="TRUNCATE" value="1"/>
 </Property>
 
+<Property name="CommissieReferentie">
+<Type>%String</Type>
+<Parameter name="TRUNCATE" value="1"/>
+</Property>
+
 <Method name="WriteRow">
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
@@ -65,7 +70,8 @@
 	Write ..VervangNietPrintbareKaraktersDoorSpatie(..OrderRef),$$$TAB
 	Write ..VervangNietPrintbareKaraktersDoorSpatie(..OrderNr),$$$TAB
 	Write ..VervangNietPrintbareKaraktersDoorSpatie(..ToeleveringNr),$$$TAB
-	Write ..VervangNietPrintbareKaraktersDoorSpatie(..VerzendingWijze),$$$TAB
+	Write ..VervangNietPrintbareKaraktersDoorSpatie(..VerzendingWijze),$$$TAB	
+	Write ..VervangNietPrintbareKaraktersDoorSpatie(..CommissieReferentie),$$$TAB
 	
 	write $$$CRLF
 	quit $$$OK