Index: APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml
===================================================================
diff -u -r72373 -r72584
--- APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml	(.../RequestDataBouwer.cls.xml)	(revision 72373)
+++ APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml	(.../RequestDataBouwer.cls.xml)	(revision 72584)
@@ -572,6 +572,7 @@
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	Set Transporteur = ##class(DOM.TRANSP.enu.Transporteur.AutoComplete).%New()
+	set PalletType = ##class(DOM.TRANSP.enu.VerpakkingEenheidType.AutoComplete).%New()
 	#dim ServiceLevelTime as %String = ""
 	if (Rit.GeefTransporteur() = Transporteur.VRD){
 		set ServiceLevelTime = "STANDARD"
@@ -588,7 +589,20 @@
 	} elseif (Rit.GeefTransporteur() = Transporteur.Weiss) {
 		Set ServiceLevelTime ="STANDARD"
 	} elseif (Rit.GeefTransporteur() = Transporteur.Schenker) {
-		Set ServiceLevelTime ="PREMIUM"
+		#dim TotaalPalletPlaatsen as %Decimal = 0
+		#dim TotaalGewicht as %Decimal = LeveringInfo.Gewicht
+		set it = ##class(TECH.ListIterator).%New(LeveringInfo.VerpakkingEenheden)
+		While (it.HasNext()){
+			#dim VEenheid as APPS.TRANSP.dto.VerpakkingEenheid = it.Next()
+			Set TotaalPalletPlaatsen = TotaalPalletPlaatsen + ( $Select((VEenheid.Type = PalletType.HalveEuroPallet):0.5,$$$True:1) * VEenheid.Aantal)
+		}
+		If ( ( TotaalPalletPlaatsen >= 27 ) || ( LeveringInfo.Gewicht >= 19400 ) ) {
+			Set ServiceLevelTime ="FTL"
+		} elseif ( (TotaalPalletPlaatsen >= 9) || (LeveringInfo.Gewicht >= 2500) ) {
+			Set ServiceLevelTime ="LTL"
+		} else {
+			Set ServiceLevelTime ="PREMIUM"
+		}
 	} else {
 		Set ServiceLevelTime = ""
 	}