Index: vhTest/Mock/APPS/TRANSP/Transsmart/RequestDataBouwer.cls.xml
===================================================================
diff -u -r60474 -r68311
--- vhTest/Mock/APPS/TRANSP/Transsmart/RequestDataBouwer.cls.xml	(.../RequestDataBouwer.cls.xml)	(revision 60474)
+++ vhTest/Mock/APPS/TRANSP/Transsmart/RequestDataBouwer.cls.xml	(.../RequestDataBouwer.cls.xml)	(revision 68311)
@@ -22,6 +22,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="MaakdoManifestRequest">
+<FormalSpec>Carrier:%String,CostCenter:%String,PickupDateFrom:%Date,PickupDateTo:%Date</FormalSpec>
+<ReturnType>WS.Transsmart.tns.doManifest</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("MaakdoManifestRequest",Carrier,CostCenter,PickupDateFrom,PickupDateTo)
+]]></Implementation>
+</Method>
+
 <Method name="MaakgetDocsRequest">
 <FormalSpec>Reference:%String</FormalSpec>
 <ReturnType>WS.Transsmart.tns.getDocs</ReturnType>
Index: APPS/TRANSP/Transsmart/impl/BerichtVerzenderTemplate.cls.xml
===================================================================
diff -u -r60900 -r68311
--- APPS/TRANSP/Transsmart/impl/BerichtVerzenderTemplate.cls.xml	(.../BerichtVerzenderTemplate.cls.xml)	(revision 60900)
+++ APPS/TRANSP/Transsmart/impl/BerichtVerzenderTemplate.cls.xml	(.../BerichtVerzenderTemplate.cls.xml)	(revision 68311)
@@ -89,7 +89,7 @@
 
 <Method name="ThrowError">
 <Final>1</Final>
-<FormalSpec>Error:APPS.TRANSP.Transsmart.Error,VerzendData:APPS.TRANSP.Transsmart.data.VerzendData</FormalSpec>
+<FormalSpec>Error:APPS.TRANSP.Transsmart.Error,VerzendData:APPS.TRANSP.Transsmart.data.VerzendData=""</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	#dim BerichtVoorGebruiker As %String = ""
@@ -122,6 +122,7 @@
 	Try {
 		Set:(Request.%IsA(##class(WS.Transsmart.tns.doBooking).%ClassName(1))) Response = ..TranssmartWSClient.doBooking(Request)
 		Set:(Request.%IsA(##class(WS.Transsmart.tns.doDelete).%ClassName(1))) Response = ..TranssmartWSClient.doDelete(Request)
+		Set:(Request.%IsA(##class(WS.Transsmart.tns.doManifest).%ClassName(1))) Response = ..TranssmartWSClient.doManifest(Request)
 	} Catch {
 		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
 		Do ##class(vhLib.Logger).LogEnMailExceptie(Exception)
Index: vhCARETAKER.mac.rou
===================================================================
diff -u -r67865 -r68311
--- vhCARETAKER.mac.rou	(.../vhCARETAKER.mac.rou)	(revision 67865)
+++ vhCARETAKER.mac.rou	(.../vhCARETAKER.mac.rou)	(revision 68311)
@@ -1280,6 +1280,18 @@
 		Do OnError
 	}
 	Quit
+
+ManifesteerDachserTransportenVoorOPO ; maken dat EDI vroeger van Transsmart naar Dachser gestuurd wordt. (normaal dag voor pickup. wij/dachser willen 2 werkdagen voor)
+	Try {
+		Do InitRuntimeContext
+		do ##class(APPS.TRANSP.Transsmart.impl.CommunicatieService).%New().ManifesteerTransporteur("DAC","30467",$h,##class(TECH.DateTime).BerekenWerkdag($h,2))
+	} Catch {
+		Do OnError
+	}
+	Quit
+
+
+
 		
 OnError 
 	set $ztrap="EndErrorTrapping"
Index: vhUnitTest/APPS/TRANSP/Transsmart/impl/RequestDataBouwer/Test.cls.xml
===================================================================
diff -u -r67757 -r68311
--- vhUnitTest/APPS/TRANSP/Transsmart/impl/RequestDataBouwer/Test.cls.xml	(.../Test.cls.xml)	(revision 67757)
+++ vhUnitTest/APPS/TRANSP/Transsmart/impl/RequestDataBouwer/Test.cls.xml	(.../Test.cls.xml)	(revision 68311)
@@ -240,6 +240,14 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test doManifest voor Dachser">
+<Implementation><![CDATA[
+	#dim Datum as %Date = +(##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog())	
+	Do ..DataExporteerder.ExporteerDataTransferObject(..Bouwer.MaakdoManifestRequest("DAC","1234",Datum,Datum+4), "doBookingRequestERBLeveringVolgendeWerkdag.xml", "")
+	Do $$$AssertCorrectGemaakteBestanden(..GeefBestandLocatie())
+]]></Implementation>
+</Method>
+
 <Method name="Test doDelete">
 <Implementation><![CDATA[
 	Do ..DataExporteerder.ExporteerDataTransferObject(..Bouwer.MaakdoDeleteRequest(..GeefVerzendDataVoorAnnulatie()), "doDeleteRequest.xml", "")
Index: APPS/TRANSP/Transsmart/impl/ResponseControleur.cls.xml
===================================================================
diff -u -r60532 -r68311
--- APPS/TRANSP/Transsmart/impl/ResponseControleur.cls.xml	(.../ResponseControleur.cls.xml)	(revision 60532)
+++ APPS/TRANSP/Transsmart/impl/ResponseControleur.cls.xml	(.../ResponseControleur.cls.xml)	(revision 68311)
@@ -7,14 +7,29 @@
 <FormalSpec>Response:WS.Transsmart.tns.getStatusResponse</FormalSpec>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
-	
+	// rare constructie door inconsistentie in de Transsmart interface. Type van response object is niet altijd juist.
+	// Gelukkig is Cache non typed.
 	#dim BevatFout As %Boolean = $$$False
-	If $$$Not(##class(TECH.StringUtils).Equals(Response.statusResponseInfo.status, "OK")){		
-		Set BevatFout = $$$True
+	if Response.%ClassName(1) = "WS.Transsmart.tns.doManifestResponse" {
+		#dim ManifResponse as WS.Transsmart.tns.doManifestResponse = Response
+		If $$$Not(##class(TECH.StringUtils).Equals(ManifResponse.manifestResponseInfo.status, "OK")){		
+			Set BevatFout = $$$True
+		} 
+		Set ListIt = ##class(TECH.ListIterator).%New(ManifResponse.shipments)
+		while (ListIt.HasNext()) {
+			#dim Shipment as WS.Transsmart.tns.DoManifestResponseShipmentStatus = ListIt.Next()
+		 	if $$$Not(Shipment.manifestStatus="OK") {
+		 		Set BevatFout = $$$True
+		 	}			
+		}
 	} else {
-		#dim ResponseStatus = ##class(APPS.TRANSP.Transsmart.enu.ShipmentStatusCode.AutoComplete).%New()
-		Set BevatFout = ##class(TECH.StringUtils).Equals(Response.shipmentStatus.shipmentStatusCode, ResponseStatus.Refu,ResponseStatus.Err )
-	}	
+		If $$$Not(##class(TECH.StringUtils).Equals(Response.statusResponseInfo.status, "OK")){		
+			Set BevatFout = $$$True
+		} else {
+			#dim ResponseStatus = ##class(APPS.TRANSP.Transsmart.enu.ShipmentStatusCode.AutoComplete).%New()
+			Set BevatFout = ##class(TECH.StringUtils).Equals(Response.shipmentStatus.shipmentStatusCode, ResponseStatus.Refu,ResponseStatus.Err )
+		}	
+	}
 	Quit BevatFout
 ]]></Implementation>
 </Method>
@@ -24,17 +39,33 @@
 <ReturnType>APPS.TRANSP.Transsmart.Error</ReturnType>
 <Implementation><![CDATA[
 	set Fout = ##class(APPS.TRANSP.Transsmart.Error).%New()
-	
-	Set Fout.Niveau = ..BepaalNiveau(Response.statusResponseInfo.status)
-	
-	If $$$Not(##class(TECH.StringUtils).Equals(Response.statusResponseInfo.status, "OK")){			
-		Set Fout.ErrorCode = Response.statusResponseInfo.requestType _":"_ Response.statusResponseInfo.status
-		Set Fout.Omschrijving = ##class(TECH.StringUtils).Replace(Response.statusResponseInfo.description,"""] [","""]"_$$$CRLF_"[")	
-	} else {
-		Set Fout.ErrorCode = "TBD"
-		Set Fout.Omschrijving = "Shipment status code is "_	Response.shipmentStatus.shipmentStatusCode
+	Set Fout.Niveau =##class(TECH.Exceptions.enu.Niveau).Waarschuwing()
+	Set Fout.Omschrijving=""
+	if Response.%ClassName(1) = "WS.Transsmart.tns.doManifestResponse" {
+		#dim ManifResponse as WS.Transsmart.tns.doManifestResponse = Response
+		If $$$Not(##class(TECH.StringUtils).Equals(ManifResponse.manifestResponseInfo.status, "OK")){		
+			Set:$$$HasLength(Fout.Omschrijving) Fout.Omschrijving = Fout.Omschrijving _ $$$CRLF
+			Set Fout.Omschrijving = Fout.Omschrijving _ ManifResponse.manifestResponseInfo.description
+		}
+		Set ListIt = ##class(TECH.ListIterator).%New(ManifResponse.shipments)
+		while (ListIt.HasNext()) {
+	 		#dim Shipment as WS.Transsmart.tns.DoManifestResponseShipmentStatus = ListIt.Next()
+	 		if $$$Not(Shipment.manifestStatus="OK") {
+				Set:$$$HasLength(Fout.Omschrijving) Fout.Omschrijving = Fout.Omschrijving _ $$$CRLF
+				Set Fout.Omschrijving = Fout.Omschrijving _ "Shipment ref " _ Shipment.reference _" : " _ Shipment.description		 			
+	 		}
+		}		
+	} else {	
+		Set Fout.Niveau = ..BepaalNiveau(Response.statusResponseInfo.status)
+		
+		If $$$Not(##class(TECH.StringUtils).Equals(Response.statusResponseInfo.status, "OK")){			
+			Set Fout.ErrorCode = Response.statusResponseInfo.requestType _":"_ Response.statusResponseInfo.status
+			Set Fout.Omschrijving = ##class(TECH.StringUtils).Replace(Response.statusResponseInfo.description,"""] [","""]"_$$$CRLF_"[")	
+		} else {
+			Set Fout.ErrorCode = "TBD"
+			Set Fout.Omschrijving = "Shipment status code is "_	Response.shipmentStatus.shipmentStatusCode
+		}
 	}
-	
 	Quit Fout
 ]]></Implementation>
 </Method>
Index: WS/Transsmart/impl/TboxServicePort.cls.xml
===================================================================
diff -u -r62625 -r68311
--- WS/Transsmart/impl/TboxServicePort.cls.xml	(.../TboxServicePort.cls.xml)	(revision 62625)
+++ WS/Transsmart/impl/TboxServicePort.cls.xml	(.../TboxServicePort.cls.xml)	(revision 68311)
@@ -175,15 +175,32 @@
 ]]></Implementation>
 </Method>
 
+<Method name="doManifest">
+<Final>1</Final>
+<FormalSpec>doManifest:WS.Transsmart.tns.doManifest</FormalSpec>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>WS.Transsmart.tns.doManifestResponse</ReturnType>
+<WebMethod>1</WebMethod>
+<SoapBindingStyle>document</SoapBindingStyle>
+<SoapBodyUse>literal</SoapBodyUse>
+<ReturnTypeParams>XMLNAME="doManifestResponse"</ReturnTypeParams>
+<Implementation><![CDATA[
+ 	Do ..LogHeaders("Transsmart doManifest headers")	
+	Do ..LogXmlAsStream("Transsmart doManifest request",doManifest)
+	
+	try {
+		#dim Response as WS.Transsmart.tns.doManifestResponse = ..WebMethod("doManifest").Invoke($this,"",.doManifest)
+	} catch {
+		Do ..RaiseException($$$CurrentMethod)
+	}
+	Do ..LogXmlAsStream("Transsmart doManifest response",Response)
+	Quit Response
+]]></Implementation>
+</Method>
+
 <UDLText name="T">
 <Content><![CDATA[
 /*
-Method doManifest(doManifest As WS.Transmart.tns.doManifest) As WS.Transmart.tns.doManifestResponse(XMLNAME="doManifestResponse") [ Final, ProcedureBlock = 1, SoapBindingStyle = document, SoapBodyUse = literal, WebMethod ]
-{
- Quit ..WebMethod("doManifest").Invoke($this,"",.doManifest)
-}
-
-
 Method getRates(getRates As WS.Transmart.tns.getRates) As WS.Transmart.tns.getStatusResponse(XMLNAME="getStatusResponse") [ Final, ProcedureBlock = 1, SoapBindingStyle = document, SoapBodyUse = literal, WebMethod ]
 {
  Quit ..WebMethod("getRates").Invoke($this,"",.getRates)
Index: APPS/TRANSP/Transsmart/impl/CommunicatieService.cls.xml
===================================================================
diff -u -r66680 -r68311
--- APPS/TRANSP/Transsmart/impl/CommunicatieService.cls.xml	(.../CommunicatieService.cls.xml)	(revision 66680)
+++ APPS/TRANSP/Transsmart/impl/CommunicatieService.cls.xml	(.../CommunicatieService.cls.xml)	(revision 68311)
@@ -58,6 +58,19 @@
 	Do ..ControleerRitVoorBevestiging(RitID)
 ]]></Implementation>
 </Method>
+
+<Method name="ManifesteerTransporteur">
+<FormalSpec>RitID:%String,CostCenter:%String,PickupDatumVan:%Date,PickupDatumTot:%Date</FormalSpec>
+<Implementation><![CDATA[
+	Set Transporteurs = ##class(DOM.TRANSP.enu.Transporteur.AutoComplete).%New()
+	Do ##class(vhLib.Logger).%New().Info(..%ClassName(1)_"::"_$$$CurrentMethod,"RitID " _ RitID)
+	#dim Rit As DOM.TRANSP.Rit = ##class(DOM.DomeinContext).Instance().GeefTransportAPI().GeefRit(RitID)
+	If (Rit.GeefTransporteur() = Transporteurs.Dachser) && (CostCenter = "30467") {
+		set ManifesteerTransporteur = ##class(APPS.TRANSP.Transsmart.impl.CommunicatieService.ManifesteerTransporteur).%New()
+		Do ManifesteerTransporteur.Manifesteer("DAC",30467,##class(TECH.Format.impl.FormatAPI).%New().FormatHorolog(PickupDatumVan,"JJJJ-MM-DD"),##class(TECH.Format.impl.FormatAPI).%New().FormatHorolog(PickupDatumTot,"JJJJ-MM-DD"))
+	}
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: WS/Transsmart/TboxServicePort.cls.xml
===================================================================
diff -u -r60393 -r68311
--- WS/Transsmart/TboxServicePort.cls.xml	(.../TboxServicePort.cls.xml)	(revision 60393)
+++ WS/Transsmart/TboxServicePort.cls.xml	(.../TboxServicePort.cls.xml)	(revision 68311)
@@ -42,14 +42,16 @@
 <FormalSpec>SSLConfiguration:%String</FormalSpec>
 </Method>
 
+<Method name="doManifest">
+<Abstract>1</Abstract>
+<FormalSpec>doManifest:WS.Transsmart.tns.doManifest</FormalSpec>
+<ReturnType>WS.Transsmart.tns.doManifestResponse</ReturnType>
+<ReturnTypeParams>XMLNAME="doManifestResponse"</ReturnTypeParams>
+</Method>
+
 <UDLText name="T">
 <Content><![CDATA[
 /*
-Method doManifest(doManifest As WS.Transmart.tns.doManifest) As WS.Transmart.tns.doManifestResponse(XMLNAME="doManifestResponse") [ Final, ProcedureBlock = 1, SoapBindingStyle = document, SoapBodyUse = literal, WebMethod ]
-{
- Quit ..WebMethod("doManifest").Invoke($this,"",.doManifest)
-}
-
 Method getRates(getRates As WS.Transmart.tns.getRates) As WS.Transmart.tns.getStatusResponse(XMLNAME="getStatusResponse") [ Final, ProcedureBlock = 1, SoapBindingStyle = document, SoapBodyUse = literal, WebMethod ]
 {
  Quit ..WebMethod("getRates").Invoke($this,"",.getRates)
Index: WS/Transsmart/tns/doManifest.cls.xml
===================================================================
diff -u -r59489 -r68311
--- WS/Transsmart/tns/doManifest.cls.xml	(.../doManifest.cls.xml)	(revision 59489)
+++ WS/Transsmart/tns/doManifest.cls.xml	(.../doManifest.cls.xml)	(revision 68311)
@@ -6,7 +6,7 @@
 <ClassType>serial</ClassType>
 <CompileAfter/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>%SerialObject,%XML.Adaptor</Super>
+<Super>WS.Transsmart.tns.RequestBase,%SerialObject,%XML.Adaptor</Super>
 <Inheritance>right</Inheritance>
 
 <Parameter name="ELEMENTQUALIFIED">
@@ -38,6 +38,9 @@
 <Value name="1">
 <Value>manifestInfo</Value>
 </Value>
+<Value name="2">
+<Value>VerzendDataID</Value>
+</Value>
 </Data>
 </Storage>
 </Class>
Index: APPS/TRANSP/Transsmart/RequestDataBouwer.cls.xml
===================================================================
diff -u -r60473 -r68311
--- APPS/TRANSP/Transsmart/RequestDataBouwer.cls.xml	(.../RequestDataBouwer.cls.xml)	(revision 60473)
+++ APPS/TRANSP/Transsmart/RequestDataBouwer.cls.xml	(.../RequestDataBouwer.cls.xml)	(revision 68311)
@@ -22,6 +22,12 @@
 <ReturnType>WS.Transsmart.tns.getDocs</ReturnType>
 </Method>
 
+<Method name="MaakdoManifestRequest">
+<Abstract>1</Abstract>
+<FormalSpec>Carrier:%String,CostCenter:%String,PickupDateFrom:%Date,PickupDateTo:%Date</FormalSpec>
+<ReturnType>WS.Transsmart.tns.doManifest</ReturnType>
+</Method>
+
 <UDLText name="T">
 <Content><![CDATA[
 /*Method MaakReleaseRequests(LijstVerzendData As APPS.TRANSP.GLS.dto.VerzendDataLijst) As %ListOfObjects(ELEMENTTYPE="APPS.TRANSP.GLS.GLSv1.Bericht.dto.AbstractRequest") [ Abstract ]
Index: vhTest/Mock/APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml
===================================================================
diff -u -r63826 -r68311
--- vhTest/Mock/APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml	(.../RequestDataBouwer.cls.xml)	(revision 63826)
+++ vhTest/Mock/APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml	(.../RequestDataBouwer.cls.xml)	(revision 68311)
@@ -43,6 +43,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="MaakdoManifestRequest">
+<FormalSpec>Carrier:%String,CostCenter:%String,PickupDateFrom:%Date,PickupDateTo:%Date</FormalSpec>
+<ReturnType>WS.Transsmart.tns.doManifest</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("MaakdoManifestRequest",Carrier,CostCenter,PickupDateFrom,PickupDateTo)
+]]></Implementation>
+</Method>
+
 <Method name="MaakgetDocsRequest">
 <FormalSpec>Reference:%String</FormalSpec>
 <ReturnType>WS.Transsmart.tns.getDocs</ReturnType>
Index: APPS/TRANSP/Transsmart/impl/CommunicatieService/ManifesteerTransporteur.cls.xml
===================================================================
diff -u
--- APPS/TRANSP/Transsmart/impl/CommunicatieService/ManifesteerTransporteur.cls.xml	(revision 0)
+++ APPS/TRANSP/Transsmart/impl/CommunicatieService/ManifesteerTransporteur.cls.xml	(revision 68311)
@@ -0,0 +1,43 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.TRANSP.Transsmart.impl.CommunicatieService.ManifesteerTransporteur">
+<Super>APPS.TRANSP.Transsmart.impl.BerichtVerzenderTemplate</Super>
+
+<Method name="Manifesteer">
+<FormalSpec>Carrier:%String,CostCenter:%String,PickupDateFrom:%Date,PickupDateTo:%Date</FormalSpec>
+<Implementation><![CDATA[
+	Quit:$$$Not(..IsActief())	
+	#dim Request as WS.Transsmart.tns.doManifest = ..RequestBouwer.MaakdoManifestRequest(Carrier,CostCenter,PickupDateFrom,PickupDateTo)
+	Do ..VerwerkRequest(Request)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkRequest">
+<FormalSpec>Request:WS.Transsmart.tns.RequestBase</FormalSpec>
+<Private>1</Private>
+<ReturnType>APPS.TRANSP.Transsmart.data.VerzendData</ReturnType>
+<Implementation><![CDATA[
+	Try {
+		#dim Response As WS.Transsmart.tns.doManifestResponse = ..VerzendBericht(Request)
+	} Catch {
+		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+		Do ##class(vhLib.Logger).%New("Transsmart").ErrorMail("VerwerkRequest","Verzenden bericht mislukt."_$C(13,10)_$C(13,10)_Exception.ToString())
+
+		Set Error =##class(APPS.TRANSP.Transsmart.Error).%New()
+		Set Error.ErrorCode = "VH99"
+		Set Error.Omschrijving = Exception.GeefOmschrijving()
+		Set Error.Niveau = ##class(TECH.Exceptions.enu.Niveau).Error()		
+	}
+	
+	If ..ResponseControleur.ResponseBevatFout(Response) {
+		Set Error = ..ResponseControleur.GeefFoutInResponse(Response)
+		Do ..ThrowError(Error)
+	}
+		
+	Quit ""
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Mock/WS/Transsmart/TboxServicePort.cls.xml
===================================================================
diff -u -r60393 -r68311
--- vhTest/Mock/WS/Transsmart/TboxServicePort.cls.xml	(.../TboxServicePort.cls.xml)	(revision 60393)
+++ vhTest/Mock/WS/Transsmart/TboxServicePort.cls.xml	(.../TboxServicePort.cls.xml)	(revision 68311)
@@ -34,6 +34,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="doManifest">
+<FormalSpec>doManifest:WS.Transsmart.tns.doManifest</FormalSpec>
+<ReturnType>WS.Transsmart.tns.doManifestResponse</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("doManifest",doManifest)
+]]></Implementation>
+</Method>
+
 <Method name="getDocs">
 <FormalSpec>getDocs:WS.Transsmart.tns.getDocs</FormalSpec>
 <ReturnType>WS.Transsmart.tns.getDocsResponse</ReturnType>
Index: APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml
===================================================================
diff -u -r67981 -r68311
--- APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml	(.../RequestDataBouwer.cls.xml)	(revision 67981)
+++ APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml	(.../RequestDataBouwer.cls.xml)	(revision 68311)
@@ -64,6 +64,22 @@
 ]]></Implementation>
 </Method>
 
+<Method name="MaakdoManifestRequest">
+<FormalSpec>Carrier:%String,CostCenter:%String,PickupDateFrom:%Date,PickupDateTo:%Date</FormalSpec>
+<ReturnType>WS.Transsmart.tns.doManifest</ReturnType>
+<Implementation><![CDATA[
+	Set Request = ##class(WS.Transsmart.tns.doManifest).%New()
+	Set Request.manifestInfo.action = "doManifest"
+	Set Request.manifestInfo.carrier = Carrier
+	Set Request.manifestInfo.costcenter = CostCenter
+	Set Request.manifestInfo.version = "2.0"
+	Set Request.manifestInfo.pickupDateFrom = ##class(TECH.Format.impl.FormatAPI).%New().FormatHorolog(PickupDateFrom,"JJJJ-MM-DD")
+	Set Request.manifestInfo.pickupDateTo = ##class(TECH.Format.impl.FormatAPI).%New().FormatHorolog(PickupDateTo,"JJJJ-MM-DD")
+	
+	Quit Request
+]]></Implementation>
+</Method>
+
 <Method name="GeefActionInfoGetDocs">
 <Private>1</Private>
 <ReturnType>WS.Transsmart.tns.GetDocsActionInfo</ReturnType>
Index: vhTest/Fake/APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml
===================================================================
diff -u -r63826 -r68311
--- vhTest/Fake/APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml	(.../RequestDataBouwer.cls.xml)	(revision 63826)
+++ vhTest/Fake/APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml	(.../RequestDataBouwer.cls.xml)	(revision 68311)
@@ -28,6 +28,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="MaakdoManifestRequest">
+<FormalSpec>Carrier:%String,CostCenter:%String,PickupDateFrom:%Date,PickupDateTo:%Date</FormalSpec>
+<ReturnType>WS.Transsmart.tns.doManifest</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
 <Method name="MaakdoDeleteRequest">
 <FormalSpec>VerzendData:APPS.TRANSP.Transsmart.data.VerzendData</FormalSpec>
 <ReturnType>WS.Transsmart.tns.doDelete</ReturnType>