Index: vhLib/LogOpkuiser.cls.xml
===================================================================
diff -u -r3554 -r3570
--- vhLib/LogOpkuiser.cls.xml	(.../LogOpkuiser.cls.xml)	(revision 3554)
+++ vhLib/LogOpkuiser.cls.xml	(.../LogOpkuiser.cls.xml)	(revision 3570)
@@ -109,16 +109,14 @@
 	
 	Do ..Logger.%New("vhLib.Logger").Info("VerwijderLogRecords", "'" _ LoggingIdsToDelete.Count() _ "' te wissen voor datum '" _ Datum _ "', Niveau '" _ Niveau _ "'.")
 		
-	Do $system.OBJ.SetTransactionMode(0)
 	#Dim AantalGewist As %Integer = 0
 	Set IdsToDeleteIterator = ##class(TECH.ListIterator).%New( LoggingIdsToDelete )
 	While IdsToDeleteIterator.HasNext() {
 		Set IdToDelete = IdsToDeleteIterator.Next()
 		Do ##class(vhLib.Logging).DeleteLogging(IdToDelete)
 		Set AantalGewist = AantalGewist + 1
 	}
-	Do $system.OBJ.SetTransactionMode(1)
-	
+		
 	Do:(LoggingIdsToDelete.Count() > 0) ..Logger.Info("VerwijderLogRecords", "'" _ AantalGewist _ "' gewist voor datum '" _ Datum _ "', Niveau '" _ Niveau _ "'.")
 	
 	Quit AantalGewist