Index: BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator.cls.xml
===================================================================
diff -u -r63124 -r63126
--- BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator.cls.xml	(.../ProboxInhoudEtiketGenerator.cls.xml)	(revision 63124)
+++ BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator.cls.xml	(.../ProboxInhoudEtiketGenerator.cls.xml)	(revision 63126)
@@ -65,6 +65,7 @@
 	Set ProboxInhoudLabel.OrderRef = Order.GeefOrderReferentie()
 	Set ProboxInhoudLabel.OrderNr = Order.GeefID()
 	Set ProboxInhoudLabel.ToeleveringNr = ToeleveringId
+	Set ProboxInhoudLabel.VerzendingWijze = Order.GeefVerzendingWijze()
 
  	Set ProboxInhoudLabel.Logo = ..GeefEtiketLogo(KlantNummer)
  	
Index: vhTest/Utils/DOM/VKP/Order.cls.xml
===================================================================
diff -u -r58343 -r63126
--- vhTest/Utils/DOM/VKP/Order.cls.xml	(.../Order.cls.xml)	(revision 58343)
+++ vhTest/Utils/DOM/VKP/Order.cls.xml	(.../Order.cls.xml)	(revision 63126)
@@ -33,6 +33,7 @@
 	Do Order.IndienMethodCall("GeefEindPersonality").DanReturn(##class(DOM.common.VanHoeckePersonality).Instance())
 	Do Order.IndienMethodCall("GeefEmailAdresBesteller").DanReturn("EmailAdresBesteller@vanhoecke.be")
 	Do Order.IndienMethodCall("GeefEmailAdresBevestiging").DanReturn("EmailAdresBevestiging@vanhoecke.be")
+	Do Order.IndienMethodCall("GeefVerzendingWijze").DanReturn("VerzendingWijze")
 
 	Quit Order
 ]]></Implementation>
Index: vhUnitTest/BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator/GenereerProboxInhoudEtiket/Test.cls.xml
===================================================================
diff -u -r63124 -r63126
--- vhUnitTest/BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator/GenereerProboxInhoudEtiket/Test.cls.xml	(.../Test.cls.xml)	(revision 63124)
+++ vhUnitTest/BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator/GenereerProboxInhoudEtiket/Test.cls.xml	(.../Test.cls.xml)	(revision 63126)
@@ -72,6 +72,7 @@
 	Do $$$AssertEquals(Etiket.OrderRef, Order.GeefOrderReferentie())
 	Do $$$AssertEquals(Etiket.OrderNr, Order.GeefID())
 	Do $$$AssertEquals(Etiket.ToeleveringNr, ..DnaCode1.Toelevering)
+	Do $$$AssertEquals(Etiket.VerzendingWijze, Order.GeefVerzendingWijze())
 		
 	Do PartijAPIMock.Verifieer()
 	Do HtmlInhoudProboxEtiketBepalerMock.Verifieer()
Index: BL/Etiket/ProboxInhoud.cls.xml
===================================================================
diff -u -r63124 -r63126
--- BL/Etiket/ProboxInhoud.cls.xml	(.../ProboxInhoud.cls.xml)	(revision 63124)
+++ BL/Etiket/ProboxInhoud.cls.xml	(.../ProboxInhoud.cls.xml)	(revision 63126)
@@ -49,6 +49,11 @@
 <Parameter name="TRUNCATE" value="1"/>
 </Property>
 
+<Property name="VerzendingWijze">
+<Type>%String</Type>
+<Parameter name="TRUNCATE" value="1"/>
+</Property>
+
 <Method name="WriteRow">
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
@@ -60,6 +65,7 @@
 	Write ..VervangNietPrintbareKaraktersDoorSpatie(..OrderRef),$$$TAB
 	Write ..VervangNietPrintbareKaraktersDoorSpatie(..OrderNr),$$$TAB
 	Write ..VervangNietPrintbareKaraktersDoorSpatie(..ToeleveringNr),$$$TAB
+	Write ..VervangNietPrintbareKaraktersDoorSpatie(..VerzendingWijze),$$$TAB
 	
 	write $$$CRLF
 	quit $$$OK