Index: AXimpl/Dynamics/DocumentLocationOut/DocumentLocationService.cls.xml
===================================================================
diff -u -r48895 -r58623
--- AXimpl/Dynamics/DocumentLocationOut/DocumentLocationService.cls.xml	(.../DocumentLocationService.cls.xml)	(revision 48895)
+++ AXimpl/Dynamics/DocumentLocationOut/DocumentLocationService.cls.xml	(.../DocumentLocationService.cls.xml)	(revision 58623)
@@ -2,7 +2,7 @@
 <Export generator="Cache" version="24">
 <Class name="AXimpl.Dynamics.DocumentLocationOut.DocumentLocationService">
 <ProcedureBlock>1</ProcedureBlock>
-<Super>%SOAP.WebClient</Super>
+<Super>vhLib.WebClient</Super>
 
 <Parameter name="NAMESPACE">
 <Description>
@@ -59,6 +59,8 @@
 <FormalSpec>DocumentId:%String,DocumentType:%String</FormalSpec>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
+	Do ..Logger.Debug("GeefBestandslocatie","WS AXimpl DocumentLocationService : Opvragen Bestandslocatie voor type '"_DocumentType_"' en id '"_DocumentId_"'.")
+	
 	#dim FilenamePDF As %String
 	Try {
 		Set Request = ##class(AXif.Dynamics.DocumentLocationOut.tns.ADUSalesInvoicePDFInDC).%New()
@@ -70,6 +72,9 @@
 		 #dim Exception As TECH.IException = ##class(TECH.ExceptionHandler).Catch()
 		 Do ##class(TECH.ExceptionHandler).Throw(Exception)
 	}
+	
+	Do ..Logger.Debug("GeefBestandslocatie","WS AXimpl DocumentLocationService : Return FilenamePDF : '"_FilenamePDF_"'.")
+	
 	Quit FilenamePDF
 ]]></Implementation>
 </Method>