Index: vhLib/WebServiceLogger/Logger.cls.xml
===================================================================
diff -u -r3460 -r3750
--- vhLib/WebServiceLogger/Logger.cls.xml	(.../Logger.cls.xml)	(revision 3460)
+++ vhLib/WebServiceLogger/Logger.cls.xml	(.../Logger.cls.xml)	(revision 3750)
@@ -25,7 +25,7 @@
 
 <Method name="LogStream">
 <Abstract>1</Abstract>
-<FormalSpec>Stream:%Stream,Direction:%String,ClassName:%String</FormalSpec>
+<FormalSpec>Stream:%Stream,Direction:%String,ClassName:%String,ThisWebService:%SOAP.WebService</FormalSpec>
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
@@ -42,6 +42,25 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefWebMethodFromService">
+<FormalSpec>ThisWebService:%SOAP.WebService</FormalSpec>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim Webmethod As %String = ""
+	
+	If $IsObject(ThisWebService) && $IsObject(ThisWebService.MsgClass) {
+		Set Webmethod = ThisWebService.MsgClass.%ClassName(0)
+	}
+	
+	If (Webmethod = "") {
+		Set Webmethod = ..GeefWebMethod()   ; fallback naar de vorige implementatie 
+	}
+	
+	Quit Webmethod
+]]></Implementation>
+</Method>
+
 <Method name="GeefWebMethod">
 <Private>1</Private>
 <ReturnType>%String</ReturnType>