Index: APPS/VKP/impl/Offerte/VerzendingItem.cls.xml
===================================================================
diff -u -r37020 -r37054
--- APPS/VKP/impl/Offerte/VerzendingItem.cls.xml	(.../VerzendingItem.cls.xml)	(revision 37020)
+++ APPS/VKP/impl/Offerte/VerzendingItem.cls.xml	(.../VerzendingItem.cls.xml)	(revision 37054)
@@ -40,6 +40,10 @@
 <Type>TECH.Decimal</Type>
 </Property>
 
+<Property name="AantalPalletten">
+<Type>TECH.Integer</Type>
+</Property>
+
 <Storage name="Default">
 <Type>%Library.CacheSerialState</Type>
 <State>VerzendingItemState</State>
@@ -72,6 +76,9 @@
 <Value name="9">
 <Value>VerkoopPrijs</Value>
 </Value>
+<Value name="10">
+<Value>AantalPalletten</Value>
+</Value>
 </Data>
 </Storage>
 </Class>
Index: WS/EC/Unishop/InternationaleZending/Service.cls.xml
===================================================================
diff -u -r37015 -r37054
--- WS/EC/Unishop/InternationaleZending/Service.cls.xml	(.../Service.cls.xml)	(revision 37015)
+++ WS/EC/Unishop/InternationaleZending/Service.cls.xml	(.../Service.cls.xml)	(revision 37054)
@@ -125,17 +125,34 @@
 ]]></Implementation>
 </Method>
 
-<Method name="ZetGekozenVerzendingMogelijkheid">
-<FormalSpec>OfferteID:%String,VerzendingMogelijkheidID:%Integer,OptieKeuze:%Integer</FormalSpec>
+<Method name="ValideerVerzendingMogelijkheidID">
+<FormalSpec>VerzendingMogelijkheidID:%Integer</FormalSpec>
 <Implementation><![CDATA[
-	if (VerzendingMogelijkheidID > 5) {
+	set Range = ##class(TECH.Range).%New(1,5)
+	if $$$Not(Range.IsValid(VerzendingMogelijkheidID)) {
 		Do ..OngeldigeVerzendKeuze()
-	} elseif (OptieKeuze > 1) {
+	}
+]]></Implementation>
+</Method>
+
+<Method name="ValideerOptieKeuze">
+<FormalSpec>OptieKeuze:%Integer</FormalSpec>
+<Implementation><![CDATA[
+	set Range = ##class(TECH.Range).%New(0,1)
+	if $$$Not(Range.IsValid(OptieKeuze)) {
 		Do ..OngeldigeOptieKeuze()
 	}
+]]></Implementation>
+</Method>
 
+<Method name="ZetGekozenVerzendingMogelijkheid">
+<FormalSpec>OfferteID:%String,VerzendingMogelijkheidID:%Integer,OptieKeuze:%Integer</FormalSpec>
+<Implementation><![CDATA[
+	Do ..ValideerVerzendingMogelijkheidID(VerzendingMogelijkheidID)
+	Do ..ValideerOptieKeuze(OptieKeuze)
+
 	#dim Offerte As APPS.VKP.Offerte = ..OfferteService.GeefOfferte(OfferteID)
-	#dim VerzendingMogelijkheid As WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid.VerzendingMogelijkheid = ..VerzendingMogelijkheidRepository.GeefViaOfferteIDEnVerzendingMogelijkheidID(OfferteID,VerzendingMogelijkheidID) 
+	Set VerzendingMogelijkheid = ..VerzendingMogelijkheidRepository.GeefViaOfferteIDEnVerzendingMogelijkheidID(OfferteID,VerzendingMogelijkheidID) 
 	Do Offerte.ZetVerzendingItem($$ConstructClone^vhLib.Class(VerzendingMogelijkheid.Verzending,##class(APPS.VKP.impl.Offerte.VerzendingItem).%ClassName(1)))
 	
 	#dim GeselecteerdeOptie As WS.EC.ExterneVerkoop.dto.Selectie = ..GeefGeselecteerdeOptie(VerzendingMogelijkheid, OptieKeuze)
Index: vhUnitTest/APPS/VKP/OrderIngaveService/MaakOrderVanOfferte/TestVerzendwijze.cls.xml
===================================================================
diff -u -r34678 -r37054
--- vhUnitTest/APPS/VKP/OrderIngaveService/MaakOrderVanOfferte/TestVerzendwijze.cls.xml	(.../TestVerzendwijze.cls.xml)	(revision 34678)
+++ vhUnitTest/APPS/VKP/OrderIngaveService/MaakOrderVanOfferte/TestVerzendwijze.cls.xml	(.../TestVerzendwijze.cls.xml)	(revision 37054)
@@ -5,47 +5,47 @@
 Do ##class(vhUnitTest.Manager).RunTest("/debug/display=all","APPS.VKP.OrderIngaveService.MaakOrderVanOfferte.TestOrderIngaveService")</Description>
 <Super>vhUnitTest.APPS.VKP.OrderIngaveService.MaakOrderVanOfferte.TestBase</Super>
 
-<Method name="Test: MaakOrderVanOfferte mag geen KostManueleLijn als Leveringsvoorwaarde hebben voor offerte met VerzendItem UPS 1 dag">
+<Method name="Test: MaakOrderVanOfferte maakt order met verzendwijze U01 voor offerte met VerzendItem UPS 1 dag">
 <Implementation><![CDATA[	Do ..MaakOrderVanOfferteMetGeldigeVerzendItemTest(1, 1, "U01")
 ]]></Implementation>
 </Method>
 
-<Method name="Test: MaakOrderVanOfferte mag geen KostManueleLijn als Leveringsvoorwaarde hebben voor offerte met VerzendItem UPS 2 dagen">
+<Method name="Test: MaakOrderVanOfferte maakt order met verzendwijze U02 voor offerte met VerzendItem UPS 2 dagen">
 <Implementation><![CDATA[	Do ..MaakOrderVanOfferteMetGeldigeVerzendItemTest(2, 2, "U02")
 ]]></Implementation>
 </Method>
 
-<Method name="Test: MaakOrderVanOfferte mag geen KostManueleLijn als Leveringsvoorwaarde hebben voor offerte met VerzendItem UPS 3 dagen">
+<Method name="Test: MaakOrderVanOfferte maakt order met verzendwijze U03 voor offerte met VerzendItem UPS 3 dagen">
 <Implementation><![CDATA[	Do ..MaakOrderVanOfferteMetGeldigeVerzendItemTest(3, 3, "U03")
 ]]></Implementation>
 </Method>
 
-<Method name="Test: MaakOrderVanOfferte mag geen KostManueleLijn als Leveringsvoorwaarde hebben voor offerte met VerzendItem UPS 4 dagen">
+<Method name="Test: MaakOrderVanOfferte maakt order met verzendwijze U04 voor offerte met VerzendItem UPS 4 dagen">
 <Implementation><![CDATA[	Do ..MaakOrderVanOfferteMetGeldigeVerzendItemTest(3, 4, "U04")
 ]]></Implementation>
 </Method>
 
-<Method name="Test: MaakOrderVanOfferte mag geen KostManueleLijn als Leveringsvoorwaarde hebben voor offerte met VerzendItem UPS 5 dagen">
+<Method name="Test: MaakOrderVanOfferte maakt order met verzendwijze U05 voor offerte met VerzendItem UPS 5 dagen">
 <Implementation><![CDATA[	Do ..MaakOrderVanOfferteMetGeldigeVerzendItemTest(4, 5, "U05")
 ]]></Implementation>
 </Method>
 
-<Method name="Test: MaakOrderVanOfferte mag geen KostManueleLijn als Leveringsvoorwaarde hebben voor offerte met VerzendItem UPS 6 dagen">
+<Method name="Test: MaakOrderVanOfferte maakt order met verzendwijze U06 voor offerte met VerzendItem UPS 6 dagen">
 <Implementation><![CDATA[	Do ..MaakOrderVanOfferteMetGeldigeVerzendItemTest(4, 6, "U06")
 ]]></Implementation>
 </Method>
 
-<Method name="Test: MaakOrderVanOfferte mag geen KostManueleLijn als Leveringsvoorwaarde hebben voor offerte met VerzendItem DHL 2 dagen">
+<Method name="Test: MaakOrderVanOfferte maakt order met verzendwijze E02 voor offerte met VerzendItem DHL 2 dagen">
 <Implementation><![CDATA[	Do ..MaakOrderVanOfferteMetGeldigeVerzendItemTest(5, 2, "E02")
 ]]></Implementation>
 </Method>
 
-<Method name="Test: MaakOrderVanOfferte mag geen KostManueleLijn als Leveringsvoorwaarde hebben voor offerte met VerzendItem DHL 6 dagen">
+<Method name="Test: MaakOrderVanOfferte maakt order met verzendwijze E06 voor offerte met VerzendItem DHL 6 dagen">
 <Implementation><![CDATA[	Do ..MaakOrderVanOfferteMetGeldigeVerzendItemTest(5, 6, "E06")
 ]]></Implementation>
 </Method>
 
-<Method name="Test: MaakOrderVanOfferte mag geen KostManueleLijn als Leveringsvoorwaarde hebben voor offerte met VerzendItem UPS 12 dagen">
+<Method name="Test: MaakOrderVanOfferte maakt order met verzendwijze E12 voor offerte met VerzendItem DHL 12 dagen">
 <Implementation><![CDATA[	Do ..MaakOrderVanOfferteMetGeldigeVerzendItemTest(5, 12, "E12")
 ]]></Implementation>
 </Method>