Index: APPS/TRANSP/Transsmart/impl/CommunicatieService.cls.xml
===================================================================
diff -u -r59728 -r59884
--- APPS/TRANSP/Transsmart/impl/CommunicatieService.cls.xml	(.../CommunicatieService.cls.xml)	(revision 59728)
+++ APPS/TRANSP/Transsmart/impl/CommunicatieService.cls.xml	(.../CommunicatieService.cls.xml)	(revision 59884)
@@ -46,29 +46,9 @@
 
 <Method name="BevestigRit">
 <FormalSpec>RitID:%String</FormalSpec>
-</Method>
-
-<Method name="ControleerRitVoorBevestiging">
-<FormalSpec>RitID:%String</FormalSpec>
 <Implementation><![CDATA[
-	/*
-	#dim Rit As DOM.TRANSP.Rit = ##class(DOM.DomeinContext).Instance().GeefTransportAPI().GeefRit(RitID)
-	#dim itLeveringID As TECH.ListIterator = Rit.GeefLeveringIDIterator()
-
-	Set StatusControleur = ##class(APPS.TRANSP.GLS.impl.StatusControleurDistributeurDataVisitor).%New()		
-	while itLeveringID.HasNext() {
-		#dim Levering As DOM.TRANSP.Levering = ##class(DOM.DomeinContext).Instance().GeefTransportAPI().GeefLevering(RitID,itLeveringID.Next())
-		Set DistributeurDataIt = ##class(TECH.ListIterator).%New(Levering.GeefDistributeurDataLijst())
-		While DistributeurDataIt.HasNext(){
-			#dim DistributeurData As DOM.TRANSP.DistributeurData = DistributeurDataIt.Next()
-			Do DistributeurData.Accept(StatusControleur)	
-		}
-	}
-
-	If 'StatusControleur.ZijnAlleStatussenInOrde() {
-		Do ##class(TECH.ExceptionHandler).Throw(##class(APPS.TRANSP.GLS.Exceptions.CommunicatieException).%New("Rit '"_RitID_"': "_StatusControleur.GeefInfo()))
-	}
-	*/
+	do ##class(vhLib.Logger).%New().Info(..%ClassName(1)_"::"_$$$CurrentMethod,"RitID " _ RitID)
+	Do ..ControleerRitVoorBevestiging(Rit)
 ]]></Implementation>
 </Method>
 </Class>