Index: APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml
===================================================================
diff -u -r60033 -r60073
--- APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml	(.../RequestDataBouwer.cls.xml)	(revision 60033)
+++ APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml	(.../RequestDataBouwer.cls.xml)	(revision 60073)
@@ -90,7 +90,8 @@
 	Set BookingInfo = ##class(WS.Transsmart.tns.DoBookingBookingInfo).%New()
 	Set BookingInfo.origin = "WEB"
 	Set BookingInfo.mailType = "0"
-	Set BookingInfo.language = "EN"
+	#dim Taal as %String = LeveringInfo.LeverAdres.Taal
+	Set BookingInfo.language = $Select(Taal="N":"NL",Taal="F":"FR",Taal="D":"DE",1:"EN")
 	Set BookingInfo.action= "doBooking"
 	Set BookingInfo.version = "2.0"
 	
@@ -130,7 +131,9 @@
 	
 	Do ShipmentInfo.additionalReferences.Insert(..GeefVrachtwagenAdditionalReference(Rit))
 	Do ShipmentInfo.additionalReferences.Insert(..GeefKlantAdditionalReference(LeveringInfo))
+	Do ShipmentInfo.additionalReferences.Insert(..GeefZendingAdditionalReference(LeveringInfo))
 	
+	
 	Quit ShipmentInfo
 ]]></Implementation>
 </Method>
@@ -141,12 +144,24 @@
 <ReturnType>WS.Transsmart.tns.additionalReference</ReturnType>
 <Implementation><![CDATA[
 	Set AdditionalReference = ##class(WS.Transsmart.tns.additionalReference).%New()
-	Set AdditionalReference.type = "OTHER"
+	Set AdditionalReference.type = "DELIVERYID"
 	Set AdditionalReference.value = Rit.GeefID()
 	Quit AdditionalReference
 ]]></Implementation>
 </Method>
 
+<Method name="GeefZendingAdditionalReference">
+<FormalSpec>LeveringInfo:APPS.TRANSP.dto.LeveringInfo</FormalSpec>
+<Private>1</Private>
+<ReturnType>WS.Transsmart.tns.additionalReference</ReturnType>
+<Implementation><![CDATA[
+	Set AdditionalReference = ##class(WS.Transsmart.tns.additionalReference).%New()
+	Set AdditionalReference.type = "OTHER"
+	Set AdditionalReference.value = LeveringInfo.Referentie
+	Quit AdditionalReference
+]]></Implementation>
+</Method>
+
 <Method name="GeefKlantAdditionalReference">
 <FormalSpec>LeveringInfo:APPS.TRANSP.dto.LeveringInfo</FormalSpec>
 <Private>1</Private>