Index: APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml
===================================================================
diff -u -r71131 -r71139
--- APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml	(.../RequestDataBouwer.cls.xml)	(revision 71131)
+++ APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml	(.../RequestDataBouwer.cls.xml)	(revision 71139)
@@ -231,9 +231,9 @@
 		}
 	}
 	If (Rit.GeefTransporteur() = Transporteur.Schenker) {
-		w !,LeveringInfo.GeleverdAanKlantNummer
+		
 		If (LeveringInfo.GeleverdAanKlantNummer = ##class(DOM.DomeinContext).Instance().GeefLegacyPartijAPI().GeefKlantNummerVoorPartijID(Klant.BlumPolen) ) {
-			Set Incoterms = "CPT"
+			Set Incoterms = "DAP"
 		}
 
 	} 
@@ -414,17 +414,42 @@
 	Set ShipmentLine.lineNo = Lijnnummmer
 	Set ShipmentLine.packageType = ..BepaalPackageType(VerpakkingEenheid.Type,Carrier)
 	Set ShipmentLine.quantity = VerpakkingEenheid.Aantal
-	Set ShipmentLine.measurements = ##class(WS.Transsmart.tns.DoBookingMeasurements).%New()
-	Set ShipmentLine.measurements.length = 0
-	Set ShipmentLine.measurements.width = 0
-	Set ShipmentLine.measurements.height = 0
-	Set ShipmentLine.measurements.sizeUom = "CM"
-	Set ShipmentLine.measurements.weightUom = "KG"
-	Set ShipmentLine.measurements.weight = Gewicht
+	Set ShipmentLine.measurements = ..GeefMeasurements(ShipmentLine.packageType,Gewicht,Carrier)
+	
+	
 	Quit ShipmentLine
 ]]></Implementation>
 </Method>
 
+<Method name="GeefMeasurements">
+<FormalSpec>PackageType:%String,Gewicht:%Numeric,Carrier:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>WS.Transsmart.tns.DoBookingMeasurements</ReturnType>
+<Implementation><![CDATA[
+	Set Measurements = ##class(WS.Transsmart.tns.DoBookingMeasurements).%New()
+	
+	Set Measurements.length = 0
+	Set Measurements.width = 0
+	Set Measurements.height = 0
+	Set Measurements.sizeUom = "CM"
+	Set Measurements.weightUom = "KG"
+	Set Measurements.weight = Gewicht
+	If (Carrier = "SNB") {
+		Set Measurements.height = 120
+		If (##class(TECH.StringUtils).Equals(PackageType,"EUROPALLET","Wwpallet","Pallet")){
+			Set Measurements.length = 80
+			Set Measurements.width = 120	
+		}
+		If (##class(TECH.StringUtils).Equals(PackageType,"Pallet80x60")){
+			Set Measurements.length = 80
+			Set Measurements.width = 60	
+		}
+		
+	} 	
+	Quit Measurements
+]]></Implementation>
+</Method>
+
 <Method name="BepaalCostCenter">
 <FormalSpec>LeveringInfo:APPS.TRANSP.dto.LeveringInfo</FormalSpec>
 <Private>1</Private>