Index: APPS/TRANSP/GLS/impl/CommunicatieService.cls.xml
===================================================================
diff -u -r40639 -r54196
--- APPS/TRANSP/GLS/impl/CommunicatieService.cls.xml	(.../CommunicatieService.cls.xml)	(revision 40639)
+++ APPS/TRANSP/GLS/impl/CommunicatieService.cls.xml	(.../CommunicatieService.cls.xml)	(revision 54196)
@@ -25,34 +25,37 @@
 <FormalSpec>RitID:%String,LeveringID:%String</FormalSpec>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
+	do ##class(vhLib.Logger).%New().Info(..%ClassName(1)_"::"_$$$CurrentMethod,"RitID " _ RitID _ " LeveringID " _ LeveringID)
 	#dim Rit As DOM.TRANSP.Rit = ##class(DOM.DomeinContext).Instance().GeefTransportAPI().GeefRit(RitID)
 	#dim Levering As DOM.TRANSP.Levering = ##class(DOM.DomeinContext).Instance().GeefTransportAPI().GeefLevering(RitID,LeveringID)
-	set AnnuleerLevering = ##class(APPS.TRANSP.GLS.impl.CommunicatieService.AnnuleerLevering).%New(..CommunicatieServiceLocator,Rit, Levering)
+	set AnnuleerLevering = ##class(APPS.TRANSP.GLS.impl.CommunicatieService.AnnuleerLevering).%New(..CommunicatieServiceLocator,,Rit, Levering)
 	do AnnuleerLevering.VoerUit()
 ]]></Implementation>
 </Method>
 
 <Method name="RegistreerLevering">
 <FormalSpec>RitID:%String,LeveringID:%String</FormalSpec>
 <Implementation><![CDATA[
+	do ##class(vhLib.Logger).%New().Info(..%ClassName(1)_"::"_$$$CurrentMethod,"RitID " _ RitID _ " LeveringID " _ LeveringID)
 	#dim Rit As DOM.TRANSP.Rit = ##class(DOM.DomeinContext).Instance().GeefTransportAPI().GeefRit(RitID)
 	#dim Levering As DOM.TRANSP.Levering = ##class(DOM.DomeinContext).Instance().GeefTransportAPI().GeefLevering(RitID,LeveringID)
-	set RegistreerLevering = ##class(APPS.TRANSP.GLS.impl.CommunicatieService.RegistreerLevering).%New(..CommunicatieServiceLocator,Rit, Levering)
+	set RegistreerLevering = ##class(APPS.TRANSP.GLS.impl.CommunicatieService.RegistreerLevering).%New(..CommunicatieServiceLocator,,Rit, Levering)
 	do RegistreerLevering.VoerUit()
 ]]></Implementation>
 </Method>
 
 <Method name="BevestigRit">
 <FormalSpec>RitID:%String</FormalSpec>
 <Implementation><![CDATA[
+	do ##class(vhLib.Logger).%New().Info(..%ClassName(1)_"::"_$$$CurrentMethod,"RitID " _ RitID)
 	Do ..ControleerRitVoorBevestiging(RitID)
 	
 	Do ..AnnuleerNietGelukteRequest()
 	
 	#dim Rit As DOM.TRANSP.Rit = ##class(DOM.DomeinContext).Instance().GeefTransportAPI().GeefRit(RitID)
 	#dim itLevering As TECH.ListIterator = Rit.GeefLeveringIterator()
 	while itLevering.HasNext() {
-		set BevestigLevering = ##class(APPS.TRANSP.GLS.impl.CommunicatieService.BevestigLevering).%New(..CommunicatieServiceLocator,Rit,itLevering.Next())
+		set BevestigLevering = ##class(APPS.TRANSP.GLS.impl.CommunicatieService.BevestigLevering).%New(..CommunicatieServiceLocator,,Rit,itLevering.Next())
 		do BevestigLevering.VoerUit()
 	}
 ]]></Implementation>