Index: Derde/EC/Logging.cls.xml
===================================================================
diff -u -r1761 -r1762
--- Derde/EC/Logging.cls.xml	(.../Logging.cls.xml)	(revision 1761)
+++ Derde/EC/Logging.cls.xml	(.../Logging.cls.xml)	(revision 1762)
@@ -51,7 +51,7 @@
 
 <Property name="Detail">
 <Type>%String</Type>
-<Parameter name="MAXLEN" value="10000"/>
+<Parameter name="MAXLEN" value="29000"/>
 </Property>
 
 <Property name="WebShop">
@@ -76,7 +76,7 @@
 	Set oLog=..%New()
 	Do oLog.Init(.Datum,.Tijd,.SessionKey,.ToegangID,.KLNr,.Niveau,.Groep,.Actie,.Detail,.ProgLabel)
 	Do oLog.%Save()
-	Do oLog.Debug()
+	;Do oLog.Debug()
 	Quit oLog
 ]]></Implementation>
 </Method>
Index: BL/EC/Session.cls.xml
===================================================================
diff -u -r1761 -r1762
--- BL/EC/Session.cls.xml	(.../Session.cls.xml)	(revision 1761)
+++ BL/EC/Session.cls.xml	(.../Session.cls.xml)	(revision 1762)
@@ -573,8 +573,7 @@
 	If $LF(%ECSession.Toegang,Toegang) Do
 	. Set %Logging=$$AddToLog^BL.EC.Common($$$logGrpToegang,Toegang,Actie,Detail)
 	Else  Do
-	. /// JBL opmerking 2011-08-03 : dit kan niet werken. 3e argument moet een status zijn, die wordt geparsed in AddErrorToLog !
-	. Set %Logging=$$AddErrorToLog^BL.EC.Common(Toegang,Actie,"Geen toegang tot '"_Toegang_"'",Detail)
+	. Set %Logging=$$AddErrorToLog^BL.EC.Common(Toegang,Actie,$$$ERROR($$$GeneralError,"Geen toegang tot '"_Toegang_"'"),Detail)
 	. Set Status=$$$errCreate(..#errToegangNotAllowed)
 	Quit Status
 ]]></Implementation>
Index: WS/EC/UserServer.cls.xml
===================================================================
diff -u -r1761 -r1762
--- WS/EC/UserServer.cls.xml	(.../UserServer.cls.xml)	(revision 1761)
+++ WS/EC/UserServer.cls.xml	(.../UserServer.cls.xml)	(revision 1762)
@@ -9,7 +9,7 @@
 &nbsp; - Toegangsrechten]]></Description>
 <IncludeCode>BL.EC.Common</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>WS.WebService</Super>
+<Super>%SOAP.WebService</Super>
 <ClassDefinitionError>0</ClassDefinitionError>
 
 <Parameter name="SERVICENAME">