Index: TRANSPE.mac.rou
===================================================================
diff -u -r59933 -r71268
--- TRANSPE.mac.rou	(.../TRANSPE.mac.rou)	(revision 59933)
+++ TRANSPE.mac.rou	(.../TRANSPE.mac.rou)	(revision 71268)
@@ -55,6 +55,11 @@
 	Set lbAdressen=$lb("rdl@vanhoecke.be","nra@vanhoecke.be")
 	Do ExportEnMail^TRANSPExportPalleten(VervRef,lbAdressen)
 	Quit
+	
+ ;DB Schenker
+5719(VervRef)
+	Do ##class(DOM.TRANSP.event.EventRaiser).RitGeslotenEvent(VervRef)
+	Quit
  ; 
  ; Default verwerking
 DEFAULT(VervRef) 
Index: APPS/TRANSP/Transsmart/impl/CommunicatieService.cls.xml
===================================================================
diff -u -r70934 -r71268
--- APPS/TRANSP/Transsmart/impl/CommunicatieService.cls.xml	(.../CommunicatieService.cls.xml)	(revision 70934)
+++ APPS/TRANSP/Transsmart/impl/CommunicatieService.cls.xml	(.../CommunicatieService.cls.xml)	(revision 71268)
@@ -53,24 +53,27 @@
 <Method name="BevestigRit">
 <FormalSpec>RitID:%String</FormalSpec>
 <Implementation><![CDATA[
+	#dim Rit As DOM.TRANSP.Rit = ##class(DOM.DomeinContext).Instance().GeefTransportAPI().GeefRit(RitID)
+	Set Transporteur = ##class(DOM.TRANSP.enu.Transporteur.AutoComplete).%New()
 	Do ##class(vhLib.Logger).%New().Info(..%ClassName(1)_"::"_$$$CurrentMethod,"RitID " _ RitID)
+	// todo DBSchenker manifest call?
 	// Do ..UitgesteldeZendingLijst.Rapport(RitID)
 	Do ..ControleerRitVoorBevestiging(RitID)
+	If (Rit.GeefTransporteur() = Transporteur.Schenker) {
+		Do ..ManifesteerTransporteur("SNB",37598,##class(TECH.DateTime).BerekenWerkdag($h,-2),##class(TECH.DateTime).BerekenWerkdag($h,3))		
+	}
 ]]></Implementation>
 </Method>
 
 <Method name="ManifesteerTransporteur">
 <FormalSpec>Transporteur:%String,CostCenter:%String,PickupDatumVan:%Date,PickupDatumTot:%Date</FormalSpec>
 <Implementation><![CDATA[
-	Set Transporteurs = ##class(DOM.TRANSP.enu.Transporteur.AutoComplete).%New()
 	#Dim LogBericht as %String = "Manifest carrier " _ Transporteur _ " Costcenter " _ CostCenter _ " van pickupdatum "
 	Set LogBericht = LogBericht _ ##class(TECH.Format.impl.FormatAPI).%New().FormatHorolog(PickupDatumVan,"JJJJ-MM-DD")
 	Set LogBericht = LogBericht _ " tot " _ ##class(TECH.Format.impl.FormatAPI).%New().FormatHorolog(PickupDatumTot,"JJJJ-MM-DD")
 	Do ##class(vhLib.Logger).%New().Info(..%ClassName(1)_"::"_$$$CurrentMethod,LogBericht)
-	If (Transporteur = Transporteurs.Dachser) && (CostCenter = "30467") {
-		set ManifesteerTransporteur = ##class(APPS.TRANSP.Transsmart.impl.CommunicatieService.ManifesteerTransporteur).%New()
-		Do ManifesteerTransporteur.Manifesteer("DAC",30467,PickupDatumVan,PickupDatumTot)
-	}
+	set ManifesteerTransporteur = ##class(APPS.TRANSP.Transsmart.impl.CommunicatieService.ManifesteerTransporteur).%New()
+	Do ManifesteerTransporteur.Manifesteer(Transporteur,CostCenter,PickupDatumVan,PickupDatumTot)
 ]]></Implementation>
 </Method>
 </Class>