Index: WS/Halux/AAP/DnaCodeService.cls.xml
===================================================================
diff -u -r56082 -r56087
--- WS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 56082)
+++ WS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 56087)
@@ -41,39 +41,39 @@
 <FormalSpec>ValideerPalletCodeRequest:WS.Halux.AAP.ValideerPalletCodeRequest</FormalSpec>
 <ReturnType>WS.Halux.AAP.ValideerPalletCodeResponse</ReturnType>
 <WebMethod>1</WebMethod>
-<Implementation><![CDATA[	Quit ..VerwerkRequest(ValideerPalletCodeRequest, "ValideerPalletCode")
+<Implementation><![CDATA[	Quit ..VerwerkRequest(ValideerPalletCodeRequest, $$$CurrentMethod)
 ]]></Implementation>
 </Method>
 
 <Method name="ZoekViaPalletcode">
 <FormalSpec>ZoakViaPalletCodeRequest:WS.Halux.AAP.ZoekViaPalletCodeRequest</FormalSpec>
 <ReturnType>WS.Halux.AAP.ZoekViaPalletCodeResponse</ReturnType>
 <WebMethod>1</WebMethod>
-<Implementation><![CDATA[	Quit ..VerwerkRequest(ZoakViaPalletCodeRequest, "ZoekViaPalletcode")
+<Implementation><![CDATA[	Quit ..VerwerkRequest(ZoakViaPalletCodeRequest, $$$CurrentMethod)
 ]]></Implementation>
 </Method>
 
 <Method name="ZoekViaToelevering">
 <FormalSpec>ZoekViaToeleveringRequest:WS.Halux.AAP.ZoekViaToeleveringRequest</FormalSpec>
 <ReturnType>WS.Halux.AAP.ZoekViaToeleveringResponse</ReturnType>
 <WebMethod>1</WebMethod>
-<Implementation><![CDATA[	Quit ..VerwerkRequest(ZoekViaToeleveringRequest, "ZoekViaToelevering")
+<Implementation><![CDATA[	Quit ..VerwerkRequest(ZoekViaToeleveringRequest, $$$CurrentMethod)
 ]]></Implementation>
 </Method>
 
 <Method name="DnaCodeAfmelden">
 <FormalSpec>DnaCodeAfmeldenRequest:WS.Halux.AAP.DnaCodeAfmeldenRequest</FormalSpec>
 <ReturnType>WS.Halux.AAP.DnaCodeAfmeldenResponse</ReturnType>
 <WebMethod>1</WebMethod>
-<Implementation><![CDATA[	Quit ..VerwerkRequest(DnaCodeAfmeldenRequest, "DnaCodeAfmelden")
+<Implementation><![CDATA[	Quit ..VerwerkRequest(DnaCodeAfmeldenRequest, $$$CurrentMethod)
 ]]></Implementation>
 </Method>
 
 <Method name="ToeleveringBijwerken">
 <FormalSpec>ToeleveringBijwerkenRequest:WS.Halux.AAP.ToeleveringBijwerkenRequest</FormalSpec>
 <ReturnType>WS.Halux.AAP.ToeleveringBijwerkenResponse</ReturnType>
 <WebMethod>1</WebMethod>
-<Implementation><![CDATA[	Quit ..VerwerkRequest(ToeleveringBijwerkenRequest, "ToeleveringBijwerken")
+<Implementation><![CDATA[	Quit ..VerwerkRequest(ToeleveringBijwerkenRequest, $$$CurrentMethod)
 ]]></Implementation>
 </Method>
 
@@ -91,6 +91,13 @@
 		Set Result.Header.Status = Exception.GeefExceptionCode()
 		Set Result.Header.Omschrijving = Exception.GeefOmschrijving()
 	}
+	If $$$HasLength(Result.Header.Omschrijving) {
+		If $$$HasLength(Result.Header.OmschrijvingVoorLogging) {
+			Do ##class(vhLib.Logger).%New("WS.Halux.AAP.DnaCodeService").Warning(UitTeVoerenMethod,Result.Header.OmschrijvingVoorLogging)
+		} Else {
+			Do ##class(vhLib.Logger).%New("WS.Halux.AAP.DnaCodeService").Warning(UitTeVoerenMethod,Result.Header.Omschrijving)
+		}
+	}
 	Quit Result
 ]]></Implementation>
 </Method>