Index: Sys/MaskedQuery.cls.xml
===================================================================
diff -u -r1074 -r3049
--- Sys/MaskedQuery.cls.xml	(.../MaskedQuery.cls.xml)	(revision 1074)
+++ Sys/MaskedQuery.cls.xml	(.../MaskedQuery.cls.xml)	(revision 3049)
@@ -1453,6 +1453,11 @@
 ]]></Implementation>
 </Method>
 
+<Method name="LogSQLStatement">
+<Implementation><![CDATA[	Do ##class(vhLib.Logger).%New("Sys.MaskedQuery").Info("FGetResultSet",..FdynRawSQL)
+]]></Implementation>
+</Method>
+
 <Method name="FGetResultSet">
 <FormalSpec>varResultSet:%Library.ResultSet</FormalSpec>
 <ReturnType>%Library.Boolean</ReturnType>
@@ -1467,6 +1472,7 @@
 	. If '..FUpdateRawSQL() Do  Quit
 	..  Set Error=1  ;LastErrorMsg reeds aanwezig 
 	. New Status
+	. Do ..LogSQLStatement()
 	. Set Status=varResultSet.Prepare(..FdynRawSQL)
 	. If $$$ISERR(Status) Do  Quit
 	..  Do ..SetMsg("Fout tijdens 'prepare' SQL-statement: "_$$ParseStatus^vhLib(Status))
@@ -1805,6 +1811,7 @@
 <FormalSpec>ParamStr:%Library.String</FormalSpec>
 <ReturnType>%Library.Boolean</ReturnType>
 <Implementation><![CDATA[
+	
 	;Modified status onthouden, bij Close terugzetten
 	Set ..FModifiedBeforeExec=..%ObjectModified()